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
- 9356 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 |
what was the robotech rpg?
How do I read records from Subfile? what is the purpose of READC explain with example?
are there any useful c runtime apis that I can call from rpg iv?
what is file information data structure?
Can we create 300 logical files based on a single physical file using the CRTLF command only once?.
We have a Physical file, after reading 5 records,it has to read LF of that same Physical file,Will it start reading from Ist record or will start reading from 5th record?
how do I declare a minor?
Can we trigger an rpg program which has user interaction with display file when updating a file using the command ADDPFTRG?
Can we possible to key with the date field?
1.How to read a subfile in out put mode? 2.what are the keywords used to share same file? 3.using composite key which rpg code used?
i have 6 char field in program, but this field is using in all files i want to chage field size as 10 char , how can i do this except using *like defn...?
Can somebody tell me that, Is it possible to read all the member of PF without OVRDBF?
RPG400 
