How to know the number of records in a pf through clp program?
Answers were Sorted based on User's Feedback
Answer / syam
My above both answer is CL Command
for CL Program use this code (RTVMBRD - Retrive Member
Description)
PGM
DCL &NBRRCD TYPE(*DEC) LEN(10 0)
RTVMBRD FILE(FILLIB/FILEA1) MBR(*FIRST)
NBRCURRCD(&NBRRCD)
ENDPGM
Is This Answer Correct ? | 83 Yes | 1 No |
Answer / syam
The correct answer...
use command DSPFD FILE(LIBOBJ/FILEA1) then Enter
then PGDOWN to last there u can see no.of records
Total number of
members . . . . . . . . . : 1
Total number of members not
available . . : 0
Total records . . . . . . . . . . . . . . :
2488
Is This Answer Correct ? | 18 Yes | 11 No |
Answer / ashok
pgm
declare the file
runqry with output form as *SUMMARY parameter
endpgm
Is This Answer Correct ? | 12 Yes | 8 No |
This is the EXACT CODE if you have any doubt.... mail me@
Gatlakarthik@gmail.com
DCL VAR(&R1) TYPE(*DEC) LEN(10 0)
DCL VAR(&D1) TYPE(*CHAR) LEN(2)
DCLF FILE(PF12) RCDFMT(RCD1)
RTVMBRD FILE(PF12) NBRCURRCD(&R1)
CHGVAR VAR(&D1) VALUE(&R1)
SNDPGMMSG MSG(&D1)
Is This Answer Correct ? | 5 Yes | 2 No |
Answer / ravi shankar porwal
U can also find out the total no of record in a pf using
the OPNQRYF Commond in CL Pgm.
Is This Answer Correct ? | 1 Yes | 3 No |
Answer / syam
Very simple....just copy pf file to another pf file.
after copy system will display subfile message on
last line of display move cursor to last line
24th line on the monitor then press PGDown key 2 times
"2488 records copied from member SALEDT."
CPYF FROMFILE(LIBOBJ/FILEA1) TOFILE(LIBOBJ/FILEA2) MBROPT
(*ADD) CRTFIL(*YES).
Is This Answer Correct ? | 1 Yes | 19 No |
what is rpg ?
To Add A File To The 'file Selection' Option Of A Query, The Function Key To Be Pressed Is?
what is *iso date format?
What is %CHECK?
how to write code for singlepage in sqlrpgle with update ?
How can I automate sftp commands(ls & get) in CL program.. If I want to write two scripts one for each command... can u plz tell where the script should be written? & what will be the content of each scripts?
Want to know related Interview questions and answers for seniors
Difference Between Ca & Cf?
how many printer files can be defined in f specs ?
how can I automatically refresh a web page?
What is an authorization list?
Which is better LF or OPNQRYF ? When should we use LF and when should we use OPNQRYF ?