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


Please Help Members By Posting Answers For Below Questions

Difference Between Skip Before & Space Before?

763


how can I give more performance to some selected pages?

701


how many types of display are available on as/400 for user interaction?

743


how to define to define a hidden filed in dspf ?

900


at what level s,o are defined and what they will do?

1126






What is RETURN CURSER LOCATION in subfile?

1171


how can you detect overflow for a print program that prints multiple lines per cycle?

1132


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

3012


What Does Lokup Does In Tables & Arrays?

837


how can I control the way a remote browser uses its cache?

695


can anybody give the interview questions list of RLU. plz mail me: dinesh_sati07@yahoo.com

2333


what does opcode post do ?

1243


what is the function of cpyf command?

1151


How to Define a Procedure in RPG?

1298


What are the mandatory keywords of sub file?

905