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

Answer Posted / 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



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

what is the necessary keyword needed to scroll subfile records?

697


can you debug ile rpg program using isdb?

735


what is *place and *auto keyword in prtf ?plz explain

2721


are there any useful c runtime apis that I can call from rpg iv?

697


What is difference between bind by copy and bind by reference?

1725






give an eg of ACQ-(ACQUIRE),BIT OFF,BIT ON,DEALLOC,DUMP,FEOD,FORCE,MHHZO,MHLZO,MHLLZO,MLHZO,REL,RESET,TESTZ,TESTB,TESTN----GIVE SMALL EXAMPLE TO THE OPCODES...TO UNDERSTAND FUNCTIONING...........

3282


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

827


what is the procedure and explain about real time scenario.

1474


can anybody help me to solve this problem. the program that i m checking display error message saying "Record format for file AJDSPFFD does not match model file and decimal error. how to solve this problem. The AJDSPFFD is snapshot the AJTLOG that is the audit trail list.

2275


How can we know running job is batch or interactive?

648


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.

2046


What is the difference between copybooks and subprocedures in as400?

802


What is the difference between iter and do?

669


what is kids-rpg?

662


How to declare the pull button in AS/400..

1873