MainFrame Interview Questions
Questions Answers Views Company eMail

WORKING-STORAGE SECTION. 1 GROUP-ITEM. 05 AMOUNT-1 PIC 99V9 USAGE COMP VALUE 50. 05 AMOUNT-2 PIC 9(4)V99 USAGE COMP. PROCEDURE DIVISION. MOVE ZERO TO GROUP-ITEM. ADD 50 TO AMOUNT-1. DISPLAY AMOUNT-1. STOP RUN.

1 1442

consider the following progrm statements MOVE 0 TO SW.NO.OF.REC PERFORM PRI-OUT UNTIL SW=1 DISPALY NO.OF.REC STOP RUN PRE-OUT READ IN-FILE AT END MOVE 1 TO SW WRITE OUO-REC FROM IN-REC ADD 1 TO NO.OF REC if the IN-FILE contains 1000 records what value will be displayed after the PERFORM is over? assume that N0.OF.REC has PIC 9(4) a.1000 b.1001 c.1 d.none of the above

1 1568

//S10 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //CON DD DSN=VAR.INPUT1,DISP=SHR // DD DSN=VAR.INPUT2,DISP=SHR //OUT DD DSN=VAR.OUTPUT,DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(5,5)),UNIT=SYSDA //TOOLIN DD * * Splice the needed data from the two VB files together SPLICE FROM(CON) TO(OUT) ON(5,5,CH) WITHALL - WITH(12,5) WITH(22,20) VLENMAX /*

894

Explain about REXX

1 1283

Explain about ISPF/TSO Commands

1296

Explain about LMINIT - generate a data ID for a data set

1 1844

Explain about LMOPEN -

1 1901

Explain about LMCOPY -

1 1711

Explain about LMMFIND - find a library member

1 1901

Explain about LMMLIST�list a library's members

1 2048

Explain about LMGET�read a logical record from a data set

1 1449

Explain about LMPUT-

1 1850

Explain about LMQUERY�give a dialog information about a data set

887

Explain about LMCLOSE�close a data set

1 1632

Explain about LMFREE�free data set from its association with data ID

984


Un-Answered Questions { MainFrame }

why is there no os/2 (ecs) port of oorexx?

574


what are the three line types in rlu ?

1461


How to find schema of a table in db2?

558


What is the format of comment statement?

647


List some fields from sqlca?

600






What are declaratives and what are their uses in cobol?

692


What are s0c1, s0c4, s0c5, s0c7 and socb?

684


If we wish to create bms executable, what are the basic steps that the user has to go through?

620


When the job statement is used?

556


What is database manager in db2?

537


Service Program : S1 Modules in S1 : M1 M1 having two procedures : ADD, SUB Current Binder Language STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP Doubt: I need to add one new Module to the Service Program M2 having one procedure ‘MULT’ How to add this new module to the service program S1 ? If I need to recreate the service program again, Do I need to mention the Module M1 again while recreating along with new Module M2? There is no Binding Directory. Binder language structure will be like this STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") EXPORT SYMBOL("MULT") ENDPGMEXP STRPGMEXP PGMLVL(*PREVIOUS) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP

1919


Explain about rct in db2?

623


Explain storage architecture of idms.

490


Add a field to screen when what's the flow of impact?

2398


Explain how do you access the records randomly in tsq?

573