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

What you have to do in the display file when you are using message subfile?

1 Answers  

---

What is the difference between inner join @ outer join

4 Answers  

---

in rpg could u please tell me errors types and meanings like 3030 that ....

1 Answers   EXL, UHG,

---

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

2 Answers  

---

What is difference between bind by copy and bind by reference?

0 Answers  

---

In case if I want to know whether a record exists in a file, which one do you prefer CHAIN or a SETLL and why ?

1 Answers  

---

what is the rpg system?

0 Answers   IBM,

---

what is use of sflnxtchg and use of MDT(modify data tag).both r same r not and can we use these on dspf and subfile.

2 Answers  

---

Difference between RESET and CLEAR

1 Answers   TCS,

---

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

3 Answers   HSBC,

---

two types of read performed in dataqueue?????

4 Answers   CTS,

---

in a cl pgm records are copied to a file in qtemp a pgm is called to delete records from the file in qtemp no of records in file in library qtemp is checked wat shud be the count of records let say it was 10 initially endpgm

2 Answers  

---