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

How do you set the keywords SFLSIZ and SFLPAG if you want the subfile to dynamically expand?

1 Answers  


What are the different ways to input data into data area?

1 Answers  


What is the purpose of the following? A CSRLOC (F1ROW F1COL)

1 Answers  


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

0 Answers   Virtusa,


How can you check the existence of object in a system?

1 Answers  






The content of Physical file is as below: hfcftp wruquief SENDPASV 0 CDUP ASCII GET 01100901.CSV ramndk/ECP505.EC0110090 (REPLACE QUIT Thw above commands will get executed when we call STRTCPFTP from CL program.... Now if I want to use SFTP what can be the solution? plz reply in detail....Thank you for ny help...

1 Answers  


What is the use of jdftval in as400?

0 Answers  


does cl support arrays

1 Answers  


what is a primary file?

1 Answers   IBM,


Can we use OVRDBF command without using of OPNQRYF ? Or can we use OPNQRYF command without using of OVRDBF command ?

4 Answers   HCL, iGate,


what is the use of sflend keyword?

1 Answers   IBM,


what is a program described file in rpg?

1 Answers   IBM,


Categories