Answer / syam

A2. Share open data path = *Yes
A3. KLIST & KFLD in Free Format %KDS

Answer / preethi

1. Why do u need to read a subfile which is in output mode? There is going to be no changed record, so READC will not work.
3. KLIST

Answer / abhiraj

a1. by CHAIN opcode
a2 and a3 same as syam's ans

can anybody explain significance of *loval setll with example code????

3 Answers   HSBC,

---

1.WHAT IS WRONG WITH THE CODE BELOW? C CUSTNO CHAIN CUSTMAST IF %ERROR can any body find the wrong please? 2.What builtin function will you use to achieve the following functionality? C QTY IFLT *ZERO C QTY MULT-1 QTY ENDIF

5 Answers   CTS,

---

Q:HI friends accually ihave one problem plesase let me know the alternate code of this code. Related field description of code: Add a field, CALvsPRD, "Calendar Day Starts Before/After Production Day" to the parameter set WRKORDER which accepts values 'A' or 'B' o B = Calendar Day Starts Before Production Day o A = Calendar Day Starts After Production Day o Any other value indicates the production and calendar dates are always the same. code: Automatic Execution Of *INZSR Subroutine /Z01 * retrieves WRKORDER field values. /Z01 * Calculate default Production Date and return it to caller. /Z01 * Production date defaults to system date /Z01 C Eval P@Pdate = %DATE() /Z01 * unless Calendar date starts Before PDN(production) date and /Z01 * system time is before PDN Start Time then /Z01 * PDN date is yesterday. /Z01 C If W@CALvsPRD = 'B' and /Z01 C %TIME() < %TIME (W@Strtime) /Z01 C Eval P@Pdate -= %Day(1) /Z01 * unless Calendar date starts After PDN date and /Z01 * system time is *GE PDN(production) Start Time then /Z01 * PDN date is tomorrow. /Z01 C ElseIf W@CALvsPRD = 'A' and W@Strtime > *Zero and /Z01 C %TIME() >= %TIME (W@STrtime) /Z01 C Eval P@Pdate += %Day(1) /Z01 C EndIf /Z01 C Eval *InLr = *On

0 Answers   IBM,

---

How to create a key field for a logical file inside RPG?

4 Answers   HSBC,

---

What is the name of default out queue when user logs inn to syatem with valid profile?

3 Answers   IBM,

---

1. If there are two programs using same file and 2 users are using the file at the same time and what can be done to allow them both to access? 2. How can remove lock from the file for accessing it by both users?

0 Answers  

---

Setps to create .csv file on IFS folder in AS/400( V4R3)....?

3 Answers   TCS,

---

how do u find whether a record is locked or not??

4 Answers   CTS,

---

1. I have2 records in a PF. READ PF DO DSPLY EMPNO RETRN DSPLY EMPNO ENDDO What was the output 2. SETON LR vs RETURN 3. Primary File 4. How to delete a deleted spaces 5. How to read a PF in reverse order in CL 6. I have a object in Lib A, B and C. But it shows in D Lib..Why? 7.

4 Answers   HCL,

---

How to update only a field of a PF in an RPG program. I don't want to update the record, only one field.

2 Answers  

---

what is program status data structure?

1 Answers   IBM,

---

wat is the difference between dataarea and data queue?

5 Answers   Airtel, Four soft, Shahi Exports,

---