what is code for reading member in rpgle when wehave
like extmbr(*all)
so we have 3 members in *all then i want to read first
record in 2member
Answers were Sorted based on User's Feedback
Answer / svankipu
Use OVRDBF & replace the member(MBR(*FIRST)) with second
member's name.
Now call the RPG pgm to read the second(2nd) member.
- OR -
If u r already in RPG pgm, use QCMDEXC for overriding the
member with 2nd mbr & continue.
- OR -
If it permits use EXTMBR(2nd mbr-name) instead of EXTMBR(*ALL)
| Is This Answer Correct ? | 16 Yes | 0 No |
Answer / adhar246
First do *HIVAL SSETGT on the file. It will set the pointer after the last record of first member. than do simple read operation. it will start reading from first record of second member.
| Is This Answer Correct ? | 3 Yes | 5 No |
what are two types of record are used in subfile?
what is the difference between seton lr and retrn?
Define what the operation will do, the purpose of the result field and the purpose of *IN66? HI LO EQ C CALL 'CVTDAT' DTPRM 66
define a output queue?
how can a procedure will be added in to a srvpgm
what is overlay?
What is a message file?
Service Program : S1 Modules in S1 : M1 M1 having two procedures : ADD, SUB Current Binder Language STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP Doubt: I need to add one new Module to the Service Program M2 having one procedure ‘MULT’ How to add this new module to the service program S1 ? If I need to recreate the service program again, Do I need to mention the Module M1 again while recreating along with new Module M2? There is no Binding Directory. Binder language structure will be like this STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") EXPORT SYMBOL("MULT") ENDPGMEXP STRPGMEXP PGMLVL(*PREVIOUS) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP
write the SQL statement to retrieve the 2nd Highest salary ammount(File Name="EMPLOY",Field Name="SALARY")
6 Answers Bally Technologies, Cognizant, Vertex,
Describe the function of SETLL operation in RPG language?
Hello friends, i am new to AS/400. Can any one help me in AS/400 i meant say can you send me some FAQS and interview questions.
What is the function of DSPATR (display attributes) keyword?