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 / 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 |
Pgm A is invoked through HTTP. It is in Activtion group QILE. Pgm A calls Pgm B and Pgm C. Pgm B is in activation group TEMPACTGRP. Pgm A ends in error. Pgm A is called again. But it gives an error that TEMPACTGRP still exists and files are present in QTEMP. What is the cause and how will u fix?
records can be read/update/deleted with which file?
Want to know related Interview questions and answers for seniors
What process the command SBMRJEJOB does?
which type of object is used in db2/400?
what do we can do with the embedded sql statements?
What is the default access path of a file?
What the purpose of the keywords FIFO, LIFO, FCFO?
Difference between NOPASS & OMIT?
What are the types of data areas?
How do you set the keywords SFLSIZ and SFLPAG if you want the subfile to dynamically expand?
define what a data area is along with a brief example of what it may be used for?