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

give three main purposes of file specification ?

1 Answers   IBM,


how can u check no of records in a file?

0 Answers   IBM,


How to reverse the string in rpg

0 Answers  


How can the user implicitly open and close the files in RPG program ?

2 Answers  


How to reverse a string using RPG?

0 Answers  






what are the different types of keys in AS400

2 Answers   HSBC,


What is array in as400? What are the types of array?

0 Answers  


1.what are the builtin funtions in cl pgg?Explain with example 2.what is meant by left outer join?where we can use this?

2 Answers  


What Is Ddm ?

1 Answers  


define a output queue?

1 Answers   IBM,


What Does Lokup Does In Tables & Arrays?

0 Answers   IBM,


what is the main use of OPNQRYF ?? in that query why we can use OVERDBF and in that OVERDBY why should we use SHARE(*YES)

2 Answers   IBM,


Categories