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..

Suppose we add one field in physical file and this physical file is used by several programs.how do we know which program is using that file? What are the impact analysis.

6 Answers  

---

What is a record lock error?

0 Answers   Wipro,

---

what happens when sflsiz = sflpag? What are the advantages and disadvantages?

0 Answers   IBM,

---

What is the purpose of FRCDTA keyword?

3 Answers   IBM,

---

Can you copy the records created by the OPNQRYF to other files and how?

2 Answers  

---

how do you use commitment control in rpg?

0 Answers   IBM,

---

Let?s consider a variable X of length 20. Move value ?ABC? to it.How to determine how many characters does X have?

1 Answers  

---

1. Which Built-In-Function will you use to achieve the following functionality? CLONO1NO2NO3 Factorl÷÷+OpcdeFactor2++÷ResultLenDHHiLoEq C QTY IFLT *ZERO C QTY MULT -1 QTY C ENDIF a) %ABS b) %TRIM c) %TRIMS d) %UNS

3 Answers   IBM,

---

can you debug ile rpg program using isdb?

0 Answers   IBM,

---

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

0 Answers  

---

Suppose i am having 3 programs PgmA,pgmB,pgmC and using source debugger. At debugging time i found that pgmC having some code error..then in debug mode directly how can i debug pgmC

2 Answers  

---

Are all these RPG/400 Interviewed Questions being asked recently? are current?

1 Answers  

---