1) How to declare a file?
2) How to define a display file?
3) How to monitor error messages in RPG?
4) How to find the attributes for subfiles? and what is the
DDS for subfiles?
Answers were Sorted based on User's Feedback
Answer / mehul
Answer to 3)
Method 1:
To moniter Error in RPG make use of
MONITIOR
.....
ON-ERROR <some error number>
ENDMON
u can place a subroutine , procedure etc under this to
handle the error for the following
Method 2:
Activate the Error Indicator, for the field you want to
place the error handling
if any error occurs for that field %error is SETON, and u
can use this indicator to take action accordingly
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / madhu
1Ans).DCL VAR(&A) TYPE(*DEC) VALUE(54)
2ans). DCLF FILE(LIBNAME/FILENAME) RCDFMT(SCREEN NAME)
3Ans.) In FREE FORMAT WE ARE USING MONITOR AND END-MON,THE
CODE LIKE MONITOR;
--------
ON-ERROR(FILE NAME/PGM NAME);
---------
END-MON;
AND ALSO IN RPG/400 WE ARE USING *PSSR SUBROTEN WE CAN TRAP
THE ERRORS
AND ALSO WE R USING FILE INFORMATION DATASTRCTERS, PROGRAM
STATUS DATA STRUCTERS WE CAN TRAP THE ERRORS
4Ans)in subfile we can find out varibles and varibles
lengths in subfile record format key word.
| Is This Answer Correct ? | 1 Yes | 1 No |
which program rpg or cl is efficent to update a transaction onto a database file and why ?
How can we change element of compile time array?Can we do so
Why we need to give File and To file Names While we are using OVRDBF. What is your understanding related to this?
Hi,Please give me complete code with this logic. The question is how to read the records from a file with load an array of size with error condition? (The logic is Z-Add 0 IDX *LOVAL SETLL FILE READ FILE 99 *IN9 DOWEQ *OFF IDX ANDLT 99 ADD 1 IDX MOVE FIELD ARR,IDX READ FILE 99 ENDDO)please give me complete code with explanation?
Can we possible to key with the date field?
What is the difference between ITER and DO ? I know both are used to execute set of statements repeatedly, but what is the main difference?
Why we cannot call a service program? If I add a PEP can i call the service program?
1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the error through the RPG/400
10 Answers IBM, Tech Mahindra,
what is commitment control?explain about it?
what will happen two jobs have same name are submitted
How to call one program from another program in RPG? please help me with the code
What are the types of identifiers?