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
How to Define a Procedure in RPG?
how can I control the way a remote browser uses its cache?
what is the syntax for plist?
A join logical file has how many record formats?
what are the various types of device files?
what does the ovrdbf command do?
the maximum number of subfiles that can defined in a rpg program for one display file is ___ .
Using %check we are checking monika in mona what is output? What is %SCAN?
How to convert a spool file to PDF file in AS400?
can you have multiple key lists for a single file ?
what keyword must be used with protect keyword ?
what is the use of data structures?
where can you specify an indicator in lokup operation?
when would you use or not use this approach?
explain the purpose of keep and assume keywords?