Define the purpose of the following code (If you know, how would this be written in RPG ILE)
HI LO EQ
C *IN66 DOUEQ *OFF
C KEY1 CHAIN
FILEA 90 66
C 66 CALL
PGM1 PRM
C ENDDO
Answer Posted / sanjeet kumar
Whenever the indicator *IN66 becomes *OFF, the control transfers after ENDDO statement. Otherwise, it reads the records from the data base file based on indicator specified on HI position. If the specified indicator on LO position becomes *OFF, then only CALL statement will execute.
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
explain the purpose of keep and assume keywords?
which are the query selection criteria, which can be given in a query?
what is the favicon.ico request that my site receives now and then?
can we define multi-dimensional arrays in rpg ?
Write a CL program which will run a batch job at 1 am every night
how many specifications are there in rpg/400? What are they?
What is a query can be displayed without saving it?
how many files, printer files you can describe in a rpg?
What Is The Object Type Of Pf, Lf, Printer File & Display File?
which cl command is used to trap error messages during program execution?
what is arrival sequence?
what is a join logical file?
what is the difference between udate and the system date?
how can I predict the performance of my cgis?
is there any way to dynamically merge other html scripts into a given html?