Interested to Buy Any Domain ? << Click Here >> for more details...
RPG/400 number of Records present in a physical file using
file information data structure
FPF001 IP E DISK
F KINFDS INFDS1
IINFDS1 DS
I *RECORD RECORD
Is this coding correct sir,i have given I P E that is I-
input,P-primary file,E-externally described.
Primary to use RPG logic cycle,is this the correct method
because we have to find number of records present using file
information data structure in RPG/400 without doing any
input/output operations on the file and also without using
DSPFD,SQL.
If the above coding is correct means,when i compile the
program it gets compiled,but if i call the program it does
not return anything,i need number of records,please complete
the coding sir.
- 1 Answers
- 9811 Views
- IBM, I also Faced
- E-Mail Answers
Answer / prince
FAAPPOLM IP E K DISK INFDS
(FILE)
DFILE
DS
DREC 156 159I
0
C DSPLY
REC
C EVAL *INLR = *ON
I have declared file information data structure in position
156 to 159 it will hold the number of records in the
file.
| Is This Answer Correct ? | 7 Yes | 2 No |
1.I have a Batch job, Running for 4 hours, i want to reduce the executing time to 2 hours what should you do?
please help me answer to this question what is the difference between the binding and srvpgm in ilerpg?
Can somebody tell me that, Is it possible to read all the member of PF without OVRDBF?
why we do STRSRVJOB in batch debugging in as400
what is the rpg system?
1. Which Built-In-Function will you use to achieve the following functionality? CLONO1NO2NO3 Factorl÷÷+OpcdeFactor2++÷ResultLenDHHiLoEq C QTY IFLT *ZERO C QTY MULT -1 QTY C ENDIF a) %ABS b) %TRIM c) %TRIMS d) %UNS
How can a screen field that has changed since the last output operation be detected?
I have a PF(ABC)with no key fields. PF(ABC)have 2 fields (cusno and cusname). Please let me know how can i read the cusno = 1150 directly from PF in CL and RPG program(Without creating the LF and without reading the complete file and then compare 1150)
What is the purpose of PUTOVR keyword?
How to identify the object has compiled with the debug view as *source without using STRDBG?
You have a *USE authority on a Library and *All authority on a file in that Library.Can you change the data in that file?
are there any useful c runtime apis that I can call from rpg iv?
RPG400 
