what is code for reading member in rpgle when wehave like extmbr(*all) so

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

Question Posted / suresh

2 Answers
13663 Views
HCL, I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

what is code for reading member in rpgle when wehave like extmbr(*all) so we have 3 members i..

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

what is code for reading member in rpgle when wehave like extmbr(*all) so we have 3 members i..

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

Post New Answer

More IBM AS400 AllOther Interview Questions

what are two types of record are used in subfile?

1 Answers IBM,

what is the difference between seton lr and retrn?

1 Answers IBM,

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

1 Answers

define a output queue?

1 Answers IBM,

how can a procedure will be added in to a srvpgm

4 Answers TCS,

what is overlay?

0 Answers IBM,

What is a message file?

1 Answers

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

0 Answers

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?

1 Answers

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.

7 Answers HanceInc, IBM,

What is the function of DSPATR (display attributes) keyword?

1 Answers

For more IBM AS400 AllOther Interview Questions Click Here