in a cl pgm
records are copied to a file in qtemp
a pgm is called to delete records from the file in qtemp
no of records in file in library qtemp is checked wat shud
be the count of records let say it was 10 initially
endpgm
Answer Posted / raghav
In following scenario the Record count will be 10.
CL program:
PGM
CPYF FROMFILE(LIB1/PF1) TOFILE(QTEMP/PF1) MBROPT(*ADD) CRTFILE(*YES)
SBMJOB CMD(CALL PGM(PGM1)) JOB(PGM1)
ENDPGM
In this scenario when a job is submitted in the batch, the system has its own QTEMP library and hence RPG program PGM1 will not find file PF1 in Qtemp.
| Is This Answer Correct ? | 1 Yes | 1 No |
Post New Answer View All Answers
how do you use commitment control in rpg?
what is the difference between do while and do until?
what are the key words you must use when using a subfile?
Explain mdt?
how do I play {insert rpg system here}?
How to create a login screen using a command instead of display file.... intention is to get a password field on a command..... how do you achieve this...
what is the necessary keyword needed to scroll subfile records?
how do I declare a table or array in rpg iv?
what happens when sflsiz = sflpag? What are the advantages and disadvantages?
Suppose we have one database file and it is used by 5 programs and in 3 program we have to add some records in datbase file s what is the impact on other program?
what is data area and how it is used in rpg program ?
How to define data area in RPG program? In which scenario multi occurrence DS is use in AS400?
Program to read marks of 10 students for 4 subjects and compute and display total marks and status of each student in rpg
what do you mean by an input subfile, what are the keywords required?
When we have a file with Duplicate records and I want to read the unique record from the file. For example a file containing Emp Name as 'Ram' and there are 3 entries of it. So how to read a unique record from File?