wirte a simple program for read file in cl

Answer Posted / uday bagdi

PGM
DCLF FILE(PGMUDAY/PF1)
Read: RCVF RCDFMT(R1)
MONMSG MSGID(CPF0864) EXEC(GOTO CMDLBL(end))
SNDPGMMSG MSG(&Name) TOPGMQ(*EXT)
GOTO CMDLBL(Read)
END: ENDPGM

Is This Answer Correct ?    1 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Suppose I have a pf, it contains 5 members, how to access particular member data from logical file? What is the use of member in pf?

808


What is FORMAT keyword and its use?

376


How to find the list of source physical files in a library?

819


What is the difference between access path and open data path?

818


What is the purpose of the chain and setll and setgt?

794


How to retrieve a physical file after deleting that?

757


Last statement of any rpg program is lr?

817


How to know the particular record in pf with out reading?

777


What is open data path?

750


I have a pf, it contains 5 members, how to access particular member data from logical file?

719


How to index LF by relative record no (RRN)

3032


How to read a pf in reverse(from last record to first) using cl?

799


How to update physical file using logical file with example?

787


What is the interactive job?

772


What is the batch job?

758