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
Difference Between Skip Before & Space Before?
how can I give more performance to some selected pages?
how many types of display are available on as/400 for user interaction?
how to define to define a hidden filed in dspf ?
at what level s,o are defined and what they will do?
What is RETURN CURSER LOCATION in subfile?
how can you detect overflow for a print program that prints multiple lines per cycle?
Can any one explain the basic things about RLU and Printer Files and their Definitions for both and why are they used,i'm a newbee so please help me out
What Does Lokup Does In Tables & Arrays?
how can I control the way a remote browser uses its cache?
can anybody give the interview questions list of RLU. plz mail me: dinesh_sati07@yahoo.com
what does opcode post do ?
what is the function of cpyf command?
How to Define a Procedure in RPG?
What are the mandatory keywords of sub file?