RPG400 Interview Questions
Questions Answers Views Company eMail

In case if I want to know whether a record exists in a file, which one do you prefer CHAIN or a SETLL and why ?

1 3062

How to create a login screen using a command instead of display file.... intention is to get a password field on a command..... how do you achieve this...

1304

I have a file .In that file i have 3 fields. Those fields are eno, ename, esal.Keyfield is eno. In that file i have data like this for eno 1,2,3,4,5. Now i need to display 2nd record. That means i need to set the pointer on 2nd record... Then, write the complete rpg program using setll.

1 3002

When it is desirable to describe files Internally?

1182

How Chain operation copies the record's data to the input buffer for the program?

IBM,

1076

Interviewer asked me write down DDS for load all subfile .can anybody write dds

1011

How to call one program from another program in RPG? please help me with the code

HCL,

1252

Write a program to display prime numbers between 1 to 100 using RPGLE.

1 4409

How to add 2 new fields in a file? How many ways are there in as400?

2 1997

How to print Superscript / Subscript from RPG400

1 2030

A rpg or clp command to find if the file field is defined as a character or numeric field.

IBM,

1 1739

what is the necessary keyword needed to scroll subfile records?

IBM,

695

can I touch the array during treatments?

IBM,

750

can you debug ile rpg program using isdb?

IBM,

732

check existence of one record without using chain or read?

IBM,

1 1353


Post New RPG400 Questions

Un-Answered Questions { RPG400 }

How do u design a physical file, when you have 2 Unique fields like for eg in A student file student ID and student examination no both are unique

546


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.

2272


Set on command is used for closed all opened files , initialize var and release resource , return cmd is used for return to calling program but my req. Is dnt close opened files and resource must released while doing transactions , how can i do this...?

1457


explain sflclr, sflend, sfldlt, and sflcsrrrn?

882


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?

760






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

1959


What is the diff bw PF/LF Name and their Record format name? what is restriction in record format then file name?

2513


how can you display specific subfile page on the screen in unequal subfile?

671


How to handle duplicate error handling in RPG?

1672


do you use message subfiles? What are the necessary keywords required coding a message subfile?

682


How to call one program from another program in RPG? please help me with the code

1252


Explain mdt?

660


what is file information data structure?

1360


How can we know running job is batch or interactive?

647


Q:HI friends accually ihave one problem plesase let me know the alternate code of this code. Related field description of code: Add a field, CALvsPRD, "Calendar Day Starts Before/After Production Day" to the parameter set WRKORDER which accepts values 'A' or 'B' o B = Calendar Day Starts Before Production Day o A = Calendar Day Starts After Production Day o Any other value indicates the production and calendar dates are always the same. code: Automatic Execution Of *INZSR Subroutine /Z01 * retrieves WRKORDER field values. /Z01 * Calculate default Production Date and return it to caller. /Z01 * Production date defaults to system date /Z01 C Eval P@Pdate = %DATE() /Z01 * unless Calendar date starts Before PDN(production) date and /Z01 * system time is before PDN Start Time then /Z01 * PDN date is yesterday. /Z01 C If W@CALvsPRD = 'B' and /Z01 C %TIME() < %TIME (W@Strtime) /Z01 C Eval P@Pdate -= %Day(1) /Z01 * unless Calendar date starts After PDN date and /Z01 * system time is *GE PDN(production) Start Time then /Z01 * PDN date is tomorrow. /Z01 C ElseIf W@CALvsPRD = 'A' and W@Strtime > *Zero and /Z01 C %TIME() >= %TIME (W@STrtime) /Z01 C Eval P@Pdate += %Day(1) /Z01 C EndIf /Z01 C Eval *InLr = *On

2005