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



Define the purpose of the following code (If you know, how would this be written in RPG ILE) ..

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

Post New Answer

More IBM AS400 AllOther Interview Questions

What is the purpose of the "N" in the following calculation specification? C KEY CHAIN FILE N 99

1 Answers  


Dear All, I have one confusion related to my platform. I am working with Wipro from last two year however still I am looking for AS400 platform kindly show me the way out of it. And please share with me the hardware knowledge that how I grow myself in hardware (AS/400) also.

1 Answers   Wipro,


How to read data from *LDA (Local Data Area) in RPGLE program without using IN opcode?

1 Answers  


How we will get issues on AS/400 technology ? I mean which issue/Defect Tracking tool is using in all companies when any issue comes? Can anybody explain about the work flow of AS/400 project ? plzzz

0 Answers  


define what a data area is along with a brief example of what it may be used for?

1 Answers   IBM,






i want to display the 10000 record in a subfile by using loadall , can we do it?

10 Answers   CybAge,


What is a job log?

1 Answers  


what is the use of CPYFRMQRYF?

4 Answers  


what is message file?

0 Answers   IBM,


what are the different methods to access seu?

0 Answers   IBM,


How to avoid using indicators in ile ?

0 Answers   IBM,


How do you check object lock

0 Answers  


Categories