1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3)

Categories >> Software >> MainFrame >> IBM AS400 >> RPG400
Suggest New Category

1) How to retrieve RRN through RPG ?
2) How to pass parameter by value ?
3) How to trap the error through the RPG/400

Question Posted / girish kulkarni

10 Answers
33323 Views
IBM, Tech Mahindra, I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / swetha p rao

1. File information Data Strucutre

2. Using Parm

3. Monitor
On-Error *All
Endmon

Is This Answer Correct ?

20 Yes

4 No

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / zhang

1. in F specification, use RECNO keyword.
2.
3. Use error capture subrountine, *PSSR

Is This Answer Correct ?

6 Yes

2 No

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / deepu

1.USING SETLL OR CHAIN BY GIVING RRN IN FACTOR ONE,OR
SPECIFY RECNO KEYWORD IN FILE LEVEL.

2.USING CALL AND PARM

3.USING ON-ERROR OPCODE

Is This Answer Correct ?

8 Yes

5 No

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / vishal

using recno(var) keyword in f spec where var is a variable
to store rrn.

Is This Answer Correct ?

3 Yes

1 No

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / guest

1 we can retrieve RRN through RPG by SFLRCDRRN along with
dds

3. we can trap the error through the RPG/400 by PSSR, INFDS

Is This Answer Correct ?

5 Yes

4 No

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / dileep

WE CAN RETRIEVE RRN BY USING INFDS

Is This Answer Correct ?

2 Yes

1 No

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / kumar

1) using CHAIN OR SETLL
EX : FSAMP IF E DISK
C 5 CHAIN SAMP
FLD DSPLY
EVAL *INLR=*ON

2) Using call and parm

3)Indicators, infds(file information datastructure) *pssr

Is This Answer Correct ?

2 Yes

1 No

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / sbakshi4

useing below query:

select rrn(a),a.* from Lib_name/File_name a

Is This Answer Correct ?

0 Yes

0 No

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / prateek

we can pass parameter by value to *PGM object.

Is This Answer Correct ?

0 Yes

5 No

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the erro..

Answer / girish kulkarni

1) Through CHAIN opcode it is possible , give RRN in Fact1
2) Write the value in Fact2 of Parm Opcode and name of
parameter in result field
3) Through the program status data structure or File
information data structure

Is This Answer Correct ?

4 Yes

14 No

Post New Answer