1) How to retrieve RRN through RPG ?
2) How to pass parameter by value ?
3) How to trap the error through the RPG/400
Answers were Sorted based on User's Feedback
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 |
Answer / zhang
1. in F specification, use RECNO keyword.
2.
3. Use error capture subrountine, *PSSR
| Is This Answer Correct ? | 6 Yes | 2 No |
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 |
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 |
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 |
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 |
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 |
What will be your approach in going either for OPNQRYF or Logical files. Which one to go for?
How do you code file / field renames in ILE RPG?
i 'm new to as/400.in an interview i was asked this question.give a practical example for passing information or data through local data area. I know only that data area is an object used to store tiny bits of data or it can store one value at a time and it is used to store frequently changing values or datas.thats all i know about data area can any one tell me how local data area and user defined data area are used to pass data between jobs with a example or coding.thanks in advance.
check existence of one record without using chain or read?
i have 1000 records in pf.what are all the ways to read a particular name records in rpg?? ie.. in pf i have a name called demo appeared around 52 times hw will we read this particular records in rpg/400?.
what is meant by record lock.how records are locked.what is the purpose of record lock.if records are locked what happens.how to find out which record is locked.
Im traying to get out put of this below mention simple logic code.But im geting out of different.(im trying with my laptop trhough my company server. DCL &FIELD1 *CHAR 10 VALUE('TCS AS/400') DCL &FIELD2 *CHAR 10 CHGVAR(%SST(&FIELD2 1 10))(%SST(&FIELD1 10 1) Can you tell me the value of field2 after excuted of CHGVAR command.
i want to perform uniqness on db file bt my db file nt hving key by useing rpgle.
1.Coding in cl to send an message? 2..What is turnover and use? What are the different levels?
Can we create 300 logical files based on a single physical file using the CRTLF command only once?.
if i have three programs progA,progB and progC .now i call progB from progA. but the progB does not exist . now i want to call progC instead of starting dump. how can we achieve this.
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