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?
- 2 Answers
- 9821 Views
- TCS, I also Faced
- E-Mail Answers
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 |
what is use of sflnxtchg and use of MDT(modify data tag).both r same r not and can we use these on dspf and subfile.
How to print output from openquery in as400 ?
wat is scan and check ? give me real time scenarios where we used these keywords in ur projects?
We have job which is running as batch. It takes atleast 06 hours to complete tht job. But I wanna do tht job with in 3 hours?
What would be the effect on the field where reverse image, underline and high intensity?
As400 Command to find the Name of the Program to which a Particular Module is Bound..? Ex: IC210AMR (*MODULE) is bound with Other Modules which Forms Program Object as IC210ABP(*PGM) . As400 Command to find the IC210ABP Using IC210AMR..? Thanks
What is ment by record level identifier?
What is the syntax of passing parameters to a procedure by value?
what was the robotech rpg?
Suppose we have 10 records with same name and we are reading using READE,after 4 record i have to use CHAIN what is the output
Can someone tell me tell me what is meant by message wait...?
IN RLU what are the record level keyword is used?
RPG400 
