Answer / indraneel

Z-Add 0 IDX --- Initialize a array index field to 0
*LOVAL SETLL FILE -- repostion pointer to a file.
READ FILE 99 -- read file (EoF indicator is *in99)
*IN9 DOWEQ *OFF -- read FILE till EoF not reached
IDX ANDLT 99 -- and array index is less than 99
ADD 1 IDX -- add one to index
MOVE FIELD ARR,IDX -- moved data from FILE (field)
to array ARR(1)..
READ FILE 99

This code is reading records from a file and moving the
FIELD data to a array..

How to change the name of physical members Dynamically?

1 Answers  

---

What is the Record Address file. How can we use it in RPG program?

4 Answers  

---

Anyone help me for the below question:- If problem/error occur in *PSSR subroutine,how should I handel it in RPG program.

1 Answers  

---

A rpg or clp command to find if the file field is defined as a character or numeric field.

1 Answers   IBM,

---

Can more than one subfile record be displayed on one line?

7 Answers   IBM,

---

why we do STRSRVJOB in batch debugging in as400

1 Answers  

---

ESCAPE message sent by child program can be handled by parent program using which keyword?

2 Answers  

---

Q1.How to read the Array? Q2.How to copy the content of one Array to another Array?

4 Answers   IBM,

---

what is the necessary command needed before OPNQRYF and why?

5 Answers  

---

write an RPG program to calculate the marks of 5 students (A,B, C, D, E)in 3 different subjects (eng, math, sci) an display on the screen

0 Answers  

---

Hi,Please give me complete code with this logic. The question is how to read the records from a file with load an array of size with error condition? (The logic is Z-Add 0 IDX *LOVAL SETLL FILE READ FILE 99 *IN9 DOWEQ *OFF IDX ANDLT 99 ADD 1 IDX MOVE FIELD ARR,IDX READ FILE 99 ENDDO)please give me complete code with explanation?

1 Answers  

---

what r drawbacks of OPM? Why do we go for ILE RPG?

1 Answers  

---