Interested to Buy Any Domain ? << Click Here >> for more details...
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
- 2 Answers
- 7060 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / 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 |
Answer / aa
Considering that all the records in the file in library QTEMP were deleted, the record count at the end would be zero.
| Is This Answer Correct ? | 0 Yes | 1 No |
How to identify the object has compiled with the debug view as *source without using STRDBG?
How to set on/off a group of indicators in a single statement?
What would be the result on writing a data record to a PF file using the "WRITE" opcode after the SETON *ON *INLR statment?
Errors in Sql query will be in which state?
How I can reread the physical file in CL program once the end of file reached in same CL program.
how do u find whether a record is locked or not??/
Hi guys. Im in AS/400(RPGLE,CLP) from last 1 year.Now i wan to upgrade my Knowledge in AS/400. Suggest me some new fields & courses which falls under AS/400. Waiting for your quick Response.
How to declare the dynamic(run time) array in rpgle? can you please give example
i have a file with the values 10, 20, 30, 40, if am setll with the value 25 then readp, so what it will return?
how to retrieve particular field records from a physical file,say i have a physical file called 'employee' in it i have to retrieve the records of a field 'admin' present in pf 'employee' using rpg,but i should not use logical file or openquery file.
ESCAPE message sent by child program can be handled by parent program using which keyword?
i 'm new to as/400.in an interview i was asked this question.give a practical example for passing information or data through local data area. I know only that data area is an object used to store tiny bits of data or it can store one value at a time and it is used to store frequently changing values or datas.thats all i know about data area can any one tell me how local data area and user defined data area are used to pass data between jobs with a example or coding.thanks in advance.
RPG400 
