CAN WE READ RECORDS WITHOUT USING SETLL,READ,CHAIN IN RPG?
Answers were Sorted based on User's Feedback
Answer / mathan kumar
It is Possible by Declare the pf file as a primary file
then you can access the records from pf by using the pf
fields in the program....
Is This Answer Correct ? | 26 Yes | 3 No |
Answer / rosh
above both answers are correct,as well if you use the flat
file and define this flat file as peogram decribe file and
define pre - run time array with file, so when program get
active, records will derectly comes to array.
Is This Answer Correct ? | 4 Yes | 0 No |
Answer / baratiya
File information DS can be used for this purpose as well.
Ffile1 IF E INFDS(fileinfo)
Dfileinfo DS
rcds *Records
Is This Answer Correct ? | 2 Yes | 1 No |
Hi Sai,
We can read records in so many ways in RPG Program.
1) primary file as file designation
2) file information data structure
3) Using pre-run-time array
0001.00 FFLAT01 IT F 5 DISK
0002.00 DPRE_ARR S 5 DIM(5) FROMFILE(FLAT01)PERRCD(1)
0003.00 C PRE_ARR(1) DSPLY
0004.00 C PRE_ARR(2) DSPLY
0005.00 C PRE_ARR(3) DSPLY
0006.00 C PRE_ARR(4) DSPLY
0007.00 C PRE_ARR(5) DSPLY
0008.00 C SETON LR
OUTPUT :
-----------
AAAAA
BBBBB
CCCCC
DDDDD
EEEEE
Is This Answer Correct ? | 1 Yes | 0 No |
Answer / sai829
H Rosh,
CAN YOU PLEASE Elaborate your answer.i.e how to Define pre - run time array with file in RPG?...Thanks in Advance.
Is This Answer Correct ? | 0 Yes | 0 No |
can we use cl programming to update or delete physical files
Im traying to get out put of this below mention simple logic code.But im geting out of different.(im trying with my laptop trhough my company server. DCL &FIELD1 *CHAR 10 VALUE('TCS AS/400') DCL &FIELD2 *CHAR 10 CHGVAR(%SST(&FIELD2 1 10))(%SST(&FIELD1 10 1) Can you tell me the value of field2 after excuted of CHGVAR command.
how to retrieve RRN value in RPGLE program
Delete FileName at first statement in RPG.
how to run only 10 modules of existing N modules in service program in RPGILE ?
What is a record lock error?
can I touch the array during treatments?
What is the difference between inner join @ outer join
Hi guys, anybody know How RPG/400 code can be converted to RPG IV code with a single command?
suppose i i am changing / updating record of subfile and i want to change the record in reverse order . means i want to change the bottom record first and so on through readc . how i do it please any one explain .
what is *place and *auto keyword in prtf ?plz explain
Can we found a record existance in a file w/o reading the file?
6 Answers Traitsys Technologies,