Witout key u can use either SETGT or SETLL.And witought key these two opc

how we retrieve records without using key field (ex:name)
from Physical File through RPG in as/400?

Question Posted / sujit kumar biswal.

8 Answers
29855 Views
I also Faced
E-Mail Answers

Answer Posted / sujit kumar biswal.

Witout key u can use either SETGT or SETLL.And witought key
these two opcodes work only folloing conditions.
1.U can spesify any sequence no in factor1
2.Also *hival is work with it.
3.Field name work but only for intiger.

so code ur programe as answer4,but just change the *loval
to any sequence no or *hival then readp or any int field
one ex.
F PF/LFNAME IF E DISK

C *HIVAL SETLL RECORDFORMATNAME/PROG.NAME
C DOW %EOF
C READP RECORDFORMATNAME/PROG.NAME
C FIELDNAME1 DSPLY
C FIELDNAME DSPLY
C ENDDO
C EVAL *INLR=*ON

Is This Answer Correct ?

0 Yes

0 No

Post New Answer View All Answers

Please Help Members By Posting Answers For Below Questions

can you debug ile rpg program using isdb?

1262

can any one help in hawkeye and turnover or any change management system plzzzzz or send the documents to my mail id :gvsp.as4@gmail.com

2399

When we have a file with Duplicate records and I want to read the unique record from the file. For example a file containing Emp Name as 'Ram' and there are 3 entries of it. So how to read a unique record from File?

951

What is the diff bw PF/LF Name and their Record format name? what is restriction in record format then file name?

2992

what is the use of sflnxtchg?

1256

what was the robotech rpg?

1194

what happens when sflsiz = sflpag? What are the advantages and disadvantages?

1187

write an RPG program to calculate the marks of 5 students (A,B, C, D, E)in 3 different subjects (eng, math, sci) an display on the screen

1303

thanks mr.Harshad R Suryawaunshi,i'm new to as400 i think you are telling in rpgile i know only rpg400 if possible can you tell in rpg400

2311

how do I preserve and clean the array?

1140

Please tell me how to read the records from a file with load an array of size with error conditions(The logic answer for this question is ARR is array of 99 elements Z-ADD 0 IDX *LOVAL SETLL FILE READ FILE 99 *IN99 DOWEQ *OFF IDX ANDLT 99 ADD 1 IDX MOVE FIELD ARR,IDX READ FILE 99 ENDDO).So,Please give me the complete of this code.

2512

what is the procedure and explain about real time scenario.

1950

what is an online rpg?

1257

what are the key words you must use when using a subfile?

1175

do you use message subfiles? What are the necessary keywords required coding a message subfile?

1124