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 |
An rpg program is processing an openquery file.The file is declared in update mode in F spec.Can we update this file? Please explain?
What is a Device file?
what is the maximum number of subroutines allowed in rpg?
I/o error detected,Record Out of sequence,Permanent I/o error occured....I mean give one eg for these errors...i understand only,update/delete operation without prior read oprn..give details of remaining
What is Group Job?
what are the limitations of cl (compare to rpg) ?
what is the function of cpyf command?
how to insert the data in pf by using cl program
how can see logical file based on which physical file and vice versa
what is the correct about QTEMP library(below mention)? a.it is Unique to a job b.it can be shared between different job c.it can only be deleted by QSECOFR d.Non Please give me the answer for this?
How do you set the keywords SFLSIZ and SFLPAG if you want the subfile to dynamically expand?
what if my system I runs with system value qccsid 65535?