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
- 9705 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 |
How to change the name of physical members Dynamically?
is this a rpg channel?
Maximum how many files declare in rpgle
How to index LF by relative record no (RRN)
1) How to declare a file? 2) How to define a display file? 3) How to monitor error messages in RPG? 4) How to find the attributes for subfiles? and what is the DDS for subfiles?
Need a sql query: retrive all duplicate records in table
If the last record of a file has been read, and the next operation on that file is a READ operation, what will be the values of the input fields for that file? A. They will be blank and/or zero. B. They will be null. C. They will equal the values of the first record in the file. D. They will equal the values of the last record read.
How do u design a physical file, when you have 2 Unique fields like for eg in A student file student ID and student examination no both are unique
how do I preserve and clean the array?
Can an indexed file be accessed in arrival sequence in RPG?
What is the syntax of passing parameters to a procedure by value?
in which journalling which attributes are necessary
RPG400 
