Sample JCL: Sample program with JCLS

[andy_chung]

Hi forum,

I am working on the Sample JCL of this fantastic site. In Sample program with JCLS
My JCL
https://drive.google.com/file/d/0B5g92D ... dzWlE/view
JESJCL
https://drive.google.com/file/d/0B5g92D ... NSdDQ/view
JESYSMSG
https://drive.google.com/file/d/0B5g92D ... o3bDg/view

Assuming the sample JCL is correct, I do not quite figure out what is the solution. Appreciate your help.

Thank you.

[enrico-sorichetti]

Assuming the sample JCL is correct, I do not quite figure out what is the solution.

the solution for what ?

[andy_chung]

JCL ended in error. In JESYSMSG

22 IEF686I DDNAME REFERRED TO ON DDNAME KEYWORD IN PRIOR STEP WAS NOT RES
IEF212I COMPJCL COBOL STEP1 STEPLIB - DATA SET NOT FOUND

Appreciate help how to fix the above and get the JCL going? Thanks.

[Akatsukami]

Assuming the sample JCL is correct

And yet the messages tell you, quite clearly, that it is not correct, so why make this assumption?

As your homework assignments:

1. Look up message IEF686I. Explain to us (not doing a copy-and-paste of the documentation) why such a situation occurs and why your screenshot of the JESJCL sysout is useless in finding the cause in this case.
2. Do likewise for message IEF212I.

Having done these things, you will likely not even need to resort to this or any other help forum.

[steve-myers]

The IEF686I message appears to be a warning; at least at the moment I wouldn't worry about it.

The show stopper is the IEF212I COMPJCL COBOL STEP1 STEPLIB - DATA SET NOT FOUND message. If you look at the expansion of the IGYWCL JCL procedure, in step COBOL you should see XXSTEPLIB DD DISP=SHR,DSN=xxxx The message is saying the data set is not cataloged. Since you didn't show us that portion of the JESJCL data set, that's about all anyone can say at this point.

[NicC]

Why could you not simply cut and paste your screens directly into your post so that all your information was in one place?

You did notice, didn't you, that your STEPLIB was not found???

[andy_chung]

Thank you for all the input.
looking at the expansion of the IGYWCL JCL procedure, IGY.V4R1M0 not found.
Amended ADCD.Z110.PROCLIB(IGYWCL). Change IGY.V4R1M0 to IGY410.

Code: Select all

//***IGYWCL PROC  LNGPRFX='IGY.V4R1M0',SYSLBLK=3200,  
//IGYWCL PROC  LNGPRFX='IGY410',SYSLBLK=3200,          
//             LIBPRFX='CEE',                          
//             PGMLIB='&&GOSET',GOPGM=GO          
 

Seems like the compile JCL is going.
I am having problem in the sample cobol.
Early warning: Please be prepared to see similar message in COBOL session as I am pretty think skinned lol.

[enrico-sorichetti]

unless You belong to the support group it is inconsiderate to update the system provided datasets
( it is cause for lawful termination )

[Robert Sample]

I am having problem in the sample cobol.

If you are having a problem, you need to post SOMETHING for us to help you -- preferably an indication whether the problem is with compiling the code or executing the code, any error message(s) displayed, and anything else that would help. My experience with the IBM COBOL sample code is that the JCL needs to be changed for the site, and the code will compile and execute but may require additional steps to generate anything but trivial results.

[andy_chung]

Thanks.
1. I think I could keep ADCD the same and refer another example reusable JCL -> Compile JCL. that example offers "//PROCLIB JCLLIB ORDER=IBMMFS.PROC.IBMCOB <= CONTAINS IGYWCL" where I could put the tweaked IGYWCL.
2. I have already get thru the COBOL in "Sample Program with JCLS"
3. Working thru the Reusable JCL -> Utilities -> DFSORT. Wonder if there is any sample data sets illustrating the JCL codes?