MainFrame Interview Questions, Answers for Freshers and Experienced asked in various Company Job Interviews

IBM MainFrame (5234)
IBM AS400 (1355)
IBM PL/1 (31)

MainFrame Interview Questions

Questions Answers Views Company eMail

Deleting a record from a Sequential file.

2 9480

i want code and what are used key words are ...like wrkmbrpdm screen (q) i have a file with 3 fields empno,empname,empaddr... here you give the empno it displays from that number to remaining empno's how? sub file screen: employee details pos to:empno then enter empno empname empaddr so file have 100 records from 1 to 100 so the above pos you give the 55 empno...it displays the from 55 to remaining... ...... please share this answel

IBM,

2 5560

In your JCL, run the even numbered steps if date is even and run odd numbered steps if date is odd . Where do you generate the date ??in cobol or JCL ??

CSC,

2 12293

How to find the length of variable length copybook using fileaid ??

CSC,

1 13505

SI Stud name Subject Marks Pass/Fail 1 Sham Maths 40 P 1 Sham Physics 50 P 1 Sham Bio 20 F 2 Ram Maths 40 P 2 Ram Physics 50 P 2 Ram Bio 60 P For the above data , write the SQL query for the student who passed in all the subjects . For eg : I want the data of only Ram coz he passed all subjects .

Cognizant,

2 7921

How to declare the dynamic(run time) array in rpgle? can you please give example

Polaris,

2 13731

what is decimal data error? when it will come and how to achieve(rectify) this error please give me solution as well as code

IBM,

2 11239

Suppose i have a file with 10 recs and i want to skip only the 7 th record and copy the rest into another file. How do i do it using SORT?

VS, Wipro,

7 25155

I know chain keyword retreive records randomly but how chain keyword exactly works internally????

4 10246

Hi Team, Please tell me, If i don't declare the cursor in the program and i have given open and fetch and close, then what error will get.

IBM,

6 14159

I have a main program (A) where we delete some rows in table in a cursor, and we commit it in sub program(B). What will happen - will we get an error or not?

2 6352

Thru web page we have triggered the transaction, how can we come to know that whether it has hit the mianframes or not?

2 4647

If we use the file level keywords like LIFO, FIFO, FCFO in a file, can we see the impact of it by doing the run query of the file? if not how can we see the impact of these keywords.

2 10185

Hi can anybody tell me about Mainframe batch testing and how is it done. I am totally new to mainframe testing. Thanks in Advance.

IBM,

1 5083

How to read data from Nth member of a physical file containing some X number of members in it? "Provided member names are unknown"

4 15945

Un-Answered Questions { MainFrame }

What is the meaning of Copy IDMS Subschema-Binds?

1688

Explain about logical data model of idms?

879

What is table space in db2?

1019

Explain the function of data manager.

1044

Difference Between Ca & Cf?

1088

What are bind parameters in db2?

1047

I have created a command that display Source file and library. Now i want that when i enter library name and press f4 on Source file, pgm should display all the PF- SRC's in that Library. For F4 option i have used Choice program but since only limited paramters are passed in Choice pgm i am not able to paas library name and further can't call a pgm that will display list of Source files. Below is the Code snippet for CMD type object :- CMD PROMPT('Source Scan for HUB Standard') PARM KWD(SOURCE) TYPE(*CHAR) LEN(1) RSTD(*YES) + VALUES(N A) MIN(1) + CHOICE('N,A') PARM KWD(SRCFILE) TYPE(FILE) RSTD(*NO) + PROMPT('SOURCE FILE') FILE: QUAL TYPE(*NAME) LEN(10) RSTD(*NO) EXPR (*YES) + CHOICE(*PGM) + CHOICEPGM (XXXXXLIB/YYYPGM) QUAL TYPE(*NAME) LEN(10) DFT(*LIBL) + SPCVAL((*LIBL)) EXPR(*YES) PROMPT ('Library') Below is the Choice pgm:- PGM PARM(&PARM1 &PARM2) DCL VAR(&PARM1) TYPE(*CHAR) LEN (21) DCL VAR(&PARM2) TYPE(*CHAR) LEN (2000) IF COND(%SST(&PARM1 1 10) = 'CHOICE ' *AND + %SST(&PARM1 11 10) = 'SRCFILE ' *AND + (%SST(&PARM1 21 1) = 'C' *OR %SST (&PARM1 + 21 1) = 'P')) THEN (DO) /* (%SST(&PARM1 21 1) = 'C' *OR %SST (&PARM1 + */ CHGVAR VAR(&PARM2) VALUE('Name, F4 for List') ENDDO IF COND(%SST(&PARM1 1 10) = 'CHOICE ' *AND + %SST(&PARM1 11 10) = 'SRCFILE ' *AND + %SST(&PARM1 21 1) = 'P') THEN (DO) CHGVAR VAR(&PARM2) VALUE('Name, F4 for List') CALL PGM(GTSQL) PARM ('XXXXLIB') return ENDDO Thanks in Advance for looking into.

3498

What are the uses of commit and finish?

890

What is program status data structure(psds) in as400?

1085

what is rpg ?

1647

Give certain situations where NEWCOPY is obligatory?

1116

What is auto status in idms?

878

What are literals?

1136

Can you explain function of iebgener?

1029

If DB2 query returns in null value, how do you work with it in PL/1?

2364

For More Un-Answered { MainFrame } Questions Click Here