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 know why the OPM job is in MSGWAIT state?..WHAT COULD BE THE REASON FOR it?
Pose, there are 100 records in the file.i need to retrieve all the records matching/equal to the particular name field. How can we do the above using search criteria other than using the if cond?
What is the draw back of Procedures? why we are going to Modules?
what is the use of jdftval in join logical file?
all i need to know about cmpseqdat parameter in cmppfm, how it works and can we retrieve line sequence and date from the output?
which are the figurative constants used in rpg?
What Does 'sr' In Columns 7-8 Of C Specs Mean?
under given circumstances, my cgi should link to another site. How to implement this?
how to read database records without locking them?
What is compiler directive in as400? Give example of compiler directive.?
If I want to execute Sftp commands(LS & GET) stored in Physical file from CL program automatically...Can u Plz tell me how can I do this?...How the script will look?? THANX FOR NY HELP...
what keyword must be used with protect keyword ?
define the purpose of the *bcat function?
define the purpose of the %sst function?
the maximum number of subfiles that can defined in a rpg program for one display file is ___ .