how we retrieve records without using key field (ex:name)
from Physical File through RPG in as/400?
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
what was the robotech rpg?
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
Hi Viewers can any body explain me how to update and ahange the already existed data in physical file using subfile ? please explain me with the code if possible?
How many program bind in one module....
are there any useful c runtime apis that I can call from rpg iv?
How to handle duplicate error handling in RPG?
What is the difference between copybooks and subprocedures in as400?
what are the key words you must use when using a subfile?
How to define data area in RPG program? In which scenario multi occurrence DS is use in AS400?
What is the difference between iter and do?
Program to read marks of 10 students for 4 subjects and compute and display total marks and status of each student in rpg
what is an online rpg?
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?
How to declare the pull button in AS/400..
what is data area and how it is used in rpg program ?