IBM interview question...plz give me answers ?

This is a Mainframe COBOL forum - you can post your queries on Mainframe COBOL, VS COBOL II, COBOL/370 , Enterprise COBOL

Moderators: dbzTHEdinosauer, Moderator Group

Post Reply
mr.ashutosh.kr
Member
Posts: 5
Joined: Tue Aug 10, 2010 7:38 pm
Location: chennai

IBM interview question...plz give me answers ?

Post by mr.ashutosh.kr » Tue Aug 10, 2010 7:55 pm

It was a very frustrating day for me.
Interviewer asked
1. write a jcl for creating a pds which can contain atleast 70 members ?
I ANSWERED THIS QUESTION VERY CONFIDENTLY. AFTER THAT...
2. How would you test your load module ?
you are not left with the source code. you have only load module how would test that ?
3. Suppose for a jcl job i am getting maxcc = 0. now what i want you to display is maxcc = 1024 for the same jcl job ?
4. What is the difference between IGYWCLG and IGYCRCTL ?
5. How many no. of maximum columns is possible for creating a primary key for a table ?
6. What is the basic difference between FIXED BLOCK and VARIABLE BLOCK
for a PS , PDS AND PDSE ?
[/b]
ashu

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Wed Aug 11, 2010 2:18 pm

So what were your answers? Pleaser tell us, we'll try to tell if they were correct or you could have a better answer.

And why you have used such a Bold-Text, are you annoyed to us?
Regards,
Anuj

mr.ashutosh.kr
Member
Posts: 5
Joined: Tue Aug 10, 2010 7:38 pm
Location: chennai

Hii Anuj

Post by mr.ashutosh.kr » Wed Aug 11, 2010 3:06 pm

Answers :

1. SPACE = (TRK,(5,3),12) WOULD BE ENOUGH TO CONTAIN 70 MEMBERS.
AS WE KNOW THE FORMULA IS
NO. OF MEMBER INSIDE A PDS=6N-1 WHERE N IS THE DIRECTORY BLOCK.

2. LOAD MODULE---I DID NOT GIVE THE ANSWER.

3. IGYWCLG IS FOR COMPILING,LINKING-EDITING AND GO.
IGYCRCTL IS FOR JUST COMPILING.

4. MAXCC--------DID NOT ANSWERED

5. COMBINATION OF ENTIRE COLUMN PRESENT IN A TABLE CAN BE USED TO DEFINE A PRIMARY KEY I.E. FOR A TABLE MAX NO. COLUMN POSSIBLE IS 750.


NO DEAR I HAVE NEVER USED THIS KIND OF FORUM FOR ANY PURPOSE SO I WAS DOING BLA BLA BLA
ashu

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Wed Aug 11, 2010 6:48 pm

Turn off your CAPS-LOCK and how about sixth question?
Regards,
Anuj

mr.ashutosh.kr
Member
Posts: 5
Joined: Tue Aug 10, 2010 7:38 pm
Location: chennai

6th question

Post by mr.ashutosh.kr » Wed Aug 11, 2010 7:47 pm

its a kind of record format used in jcl to provide the information how the data is going to be allocate.

in fixed block the fix space would be allocated for the data and in variable depends upon the size of data it would allocate the space.
ashu

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Re: IBM interview question...plz give me answers ?

Post by Anuj Dhawan » Thu Aug 12, 2010 2:34 pm

2. How would you test your load module ? you are not left with the source code. you have only load module how would test that ?
You execute your programs with only executable "load-modules" - source-code is not executaable. So, you'll provide the path (STEPLIB) for the load-module.

Were there some more inputs from the interviewer on this or did you try to know what exactly he is asking?
3. Suppose for a jcl job i am getting maxcc = 0. now what i want you to display is maxcc = 1024 for the same jcl job ?
Write a COBOL program which moves 1024 to the RETURN-CODE special register and execute it as one of the steps of that Job.
4. What is the difference between IGYWCLG and IGYCRCTL ?
IGYCRCTL is a COBOL compiler while IGYWCLG Compile, link-edit, and run procedure.
Regards,
Anuj

mouse13
Member
Posts: 8
Joined: Mon Jul 19, 2010 6:02 pm

Post by mouse13 » Thu Aug 12, 2010 11:47 pm

For you question 3,here is another way,

// IF (STEP00S1.RC EQ 0)
//STEP00S2 EXEC PGM=IDCAMS
//SYSUDUMP DD SYSOUT=*
//INFILE DD DUMMY
//OUTFILE DD DUMMY
//SYSIN DD *
REPRO INFILE(INFILE),OUTFILE(OUTFILE) REPLACE COUNT (1)
IF MAXCC EQ 0 -
THEN SET MAXCC=1024
ELSE SET MAXCC=1024
/*
//SYSPRINT DD SYSOUT=*
// ENDIF

STEP00S1 is cobol program step

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Fri Aug 13, 2010 3:49 pm

I don't think that IDCAMS will work for this case, have you checked it? For this,

Code: Select all

//STEP00S2 EXEC PGM=IDCAMS                                 
//SYSUDUMP DD SYSOUT=*                                     
//INFILE DD DUMMY                                          
//OUTFILE DD DUMMY                                         
//SYSIN DD *                                               
  REPRO INFILE(INFILE),OUTFILE(OUTFILE) REPLACE COUNT (1)  
  IF MAXCC EQ 0 -                                          
  THEN SET MAXCC=1024                                      
  ELSE SET MAXCC=1024                                      
/*                                                         
//SYSPRINT DD SYSOUT=*                                     
my results shows:
IDCAMS SYSTEM SERVICES TIME: 06:45:39

REPRO INFILE(INFILE),OUTFILE(OUTFILE) REPLACE COUNT (1)
IDC3300I ERROR OPENING NULLFILE
IDC3321I ** OPEN/CLOSE/EOV ABEND EXIT TAKEN
IDC0005I NUMBER OF RECORDS PROCESSED WAS 0
IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12

IF MAXCC EQ 0 -
THEN SET MAXCC=1024

ELSE SET MAXCC=1024
IDC3207I REMAINDER OF COMMAND INPUT STREAM IGNORED
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 16
I've not verified some other possibiolity in VSAM Demystified, though.
Regards,
Anuj

mr.ashutosh.kr
Member
Posts: 5
Joined: Tue Aug 10, 2010 7:38 pm
Location: chennai

Info

Post by mr.ashutosh.kr » Fri Aug 13, 2010 6:10 pm

2.As u r suggesting for the load module to use steplib.
In that case we need to execute that load module.
But the interviewer said i want to test without executing the load module..

as if i don't under how would one can test without executing it.
ashu

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Fri Aug 13, 2010 8:27 pm

Then I'm not sure what was aksed - it's not at all clear with the description you have posted, so far.
Regards,
Anuj

mouse13
Member
Posts: 8
Joined: Mon Jul 19, 2010 6:02 pm

Post by mouse13 » Mon Aug 16, 2010 11:57 pm

Anuj,

We can not use idcams under this situation,IDCAMS can have only MAXCC=16

//CHKDUPS0 EXEC PGM=IDCAMS,COND=(0,NE)
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//INFILE DD DSN=DATA1,DISP=SHR
//OUTFILE DD DSN=DATA2,DISP=SHR
//SYSIN DD *
REPRO INFILE(INFILE),OUTFILE(OUTFILE) REPLACE COUNT (1)
IF MAXCC EQ 0 -
THEN SET MAXCC=16
ELSE SET MAXCC=0
/*
//*
//

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Tue Aug 17, 2010 2:41 pm

Yes, that's correct mouse13. I had not had time on my hnads, that day, to verify the facts. Actually, you can set the RC to any value 0-4095, but you'll find that the maximum RC that can be set by user request is 16 within IBM utility programs such as IDCAMS and DFdss. But if someone wants to have some higher RC it takes an Assembler program to get the desired value into GPR 15 or a COBOL program as I mentioned earlier.
Regards,
Anuj

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others