IBM RPG400 Interview Preparation Guide

Refine your IBM RPG400 interview skills with our 20 critical questions. Our questions cover a wide range of topics in IBM RPG400 to ensure youre well-prepared. Whether youre new to the field or have years of experience, these questions are designed to help you succeed. Get the free PDF download to access all 20 questions and excel in your IBM RPG400 interview. This comprehensive guide is essential for effective study and confidence building.
Tweet Share WhatsApp

20 IBM RPG400 Questions and Answers:

1 :: What is importance of MAPFLD IN OPNQRYF FILE?

Specifies the definition of query fields that are
mapped or derived from other fields. MAPFLD is generally
not needed if the field names specified on other parameters
are simple field names that exist in only one of the file,
member, and record format elements specified for the File
specifications (FILE) parameter.

Up to 50 mapped field definitions can be specified.
Download PDFRead All IBM RPG400 Questions

2 :: How can we know running job is batch or interactive?

From a CL program you can do a RTVJOBA command, if the job
type value is 0 then batch job, if 1 then interactive job.
Can take a WRKSMBJOB and see the value in TYPe field. If
*INT then it is interactive, If *BCH,then batch job.

3 :: Need a sql query: retrieve all duplicate records in table?

let us assume we have some duplicate records in sample table
and we can identify duplicates with eid.

The the query looks like this.

Select * from sample
where eid=any
(select eid from sample having count(eid)>1 group by eid);

Note: This should be used SQl .. but i never tried in as400
when ever it is necessary means i use following sql
statement in as400 .......

select * from sample where eid=111

it displays all duplicate records related to 111

4 :: WHAT IS MENT BY RECORD LEVEL IDENTIFIER?
WHAT IS THE PURPOSE OF THIS?

Record level Identifier gives the information about the
specific record format in the file. This can be used to
make sure that the record format of the file is same at
present as it was when the program was compiled.This will
protect the program from going into error due to changes
made to the record format after the compilation of the
program.The system tells the program, when it tries to open
the file, that a significant change occurred to the
definition of the file since the last time the program was
compiled.

5 :: If my rpg program has a date field, What extra care I have to take while compiling that RPG program?
If the file is keyed and I have declared the file as well as Key list properly in my program. Still am getting an error message like "Chain/reade operation is not allowed" What may be the case?

format of variable, length of variable should be date and sep(-/).should be define

extra key "A"

May be you have define you file as output mode
Download PDFRead All IBM RPG400 Questions

6 :: Suppose my file has 10 fields and I want to make the 2nd field Zeros in all records. And assume I have millions of records and I dont want to read each record and update the desired field with 0. Any other way to do this in one step operation?

Using SQL, we can set second field value as '0'

7 :: Assume my file has 100 records and I want to see only first 10 records. Is this possible through LF?

Based on RRN number we can retrieve the first 10 records
or otherwise copy the first 10 records using CPYF command
and you can use RUNQRY for new created file

8 :: Suppose I have 3 jobs A B and C. I want to submit B after successful completion of A and want to submit C after successful completion of B. Without using job scheduler or job queue, how can i do that through CL program?

Write a CL program in which u have to submit the 'A' job
after completion you can write code for 'B' and after 'C'

9 :: What is difference between Bind by copy and bind by reference?

bind by copy: here module will static
bind by reference: here module will be dynamic.

10 :: Why we cannot call a service program? If I add a PEP can i call the service program?

There is no PEP parameter for CRTSRVPGM command so question
is invalid.
Download PDFRead All IBM RPG400 Questions