write a pgm to read p.f using cl pgm?
Answers were Sorted based on User's Feedback
Answer / remya
dclf file(dsp) recfmt(recdsp)
dclf file(pf) recfmt(recpf) opnid(p)
l1: rcvf rcdfmt(recpf)
monmsg msgid(cpf0864) exec(goto cmdlbl(end))
sndrcvf rcdfmt(recdsp)
goto cmdlbl(l1)
end:endpgm
| Is This Answer Correct ? | 8 Yes | 3 No |
Answer / avinash
START: PGM
DCL VAR(&COUNT) TYPE(*DEC) LEN(10)
DCL VAR(&OUTPUT) TYPE(*CHAR) LEN(10)
DCLF FILE(*LIBL/PGMNAME)
FILE: SNDRCVF RCDFMT(RFMT)
END: ENDPGM
| Is This Answer Correct ? | 2 Yes | 2 No |
What Is The Difference Between Goto & Exsr?
What is the use of E specification in RPG?
OVRDBF FILE(xxx) TOFILE(libl/filename) share(*yes) In which scenario is share(*yes) used? could any one explain with an example?
what is the purpose of overrides?
How do you put jobs in batch mode?
what is the difference between packed decimal and zoned decimal?
what is the use of UNIQUEUE KEY WORD? what is the difference between PFILE AND REF?
define the purpose of the *bcat function?
can a indexed file be accessed in arrival sequence in rpg program?
what would be the effect on the field where reverse image, underline and highlight display attributes are active ?
what is the maximum number of records you can specify in a display file?
What is the difference between crtdupobj and copyf?