Answer / royal

Dmonth S 5s 0 DIM(5)
DI S 2p 0 inz(1)
c dow i <= 10
c* eval month(i) = i
c month(i) dsply
c eval i = i + 1
c enddo
/FREE
*INLR = *ON ;
/END-FREE


this answer is not correct please give me correct code

Answer / karthik

Dary1 s dim(5)
Dn s 2p 0 inz(1)
c dow(n<=10)
c ary1(n) dsply
c eval n=n+1
c enddo
c seton lr

1.Are there any errors in the following statement?If so then list them.DTAARA is a data area having a field EMP # and EMPNO is a field in the file EMPPF.Which has one record. READ EMPPF IF %FOUND(EMPPF) IN DTAARA EVAL EMP#=EMPNO OUT DTAARA ENDIF

5 Answers  

---

Is it possible to call a subfile using CL. IF yes.. kindly help me out with explanation...?

3 Answers  

---

how to change the length of the field in a physicalfile?

12 Answers  

---

are there any useful c runtime apis that I can call from rpg iv?

0 Answers   IBM,

---

1.I Have a physical file , i want to read the data from the each and every member of the File in the CL Program.How do you achieve this. 2.How do you do the same in RPG?. do think is it possible to read data from all the members in the RPG?

2 Answers   Cap Gemini,

---

What is the purpose of Panel Groups?

4 Answers  

---

how can i retrieve the field name from display file at run time? Devendra Singh Tomar

3 Answers  

---

How to find d key field of a pf that doesn’t have source physical file?

2 Answers  

---

how do I play {insert rpg system here}?

0 Answers   IBM,

---

What would be the result on writing a data record to a PF file using the "WRITE" opcode after the SETON *ON *INLR statment?

10 Answers  

---

What does Implicit Open means with respect to a file ? What about the Explicit Open?..what are the major differences between these two?

1 Answers   IBM,

---

RPG/400 faqs?

1 Answers   HSBC,

---