Help with a JCL error



JES, JES2, JCL utilities, IDCAMS, Compile & Run JCLs, PROCs etc...

Re: Help with a JCL error

Postby cwseay » Sun Apr 28, 2019 12:10 pm

I know how to use HILITE, but how do I put in in a post they way it was done?
cwseay
 
Posts: 16
Joined: Thu Oct 05, 2017 8:28 am
Has thanked: 4 times
Been thanked: 0 time

Re: Help with a JCL error

Postby cwseay » Sun Apr 28, 2019 12:38 pm

//CALC1000 JOB 1,'A. STUDENT',NOTIFY=&SYSUID                            00010102
//*SCHOLIB JCLLIB ORDER=(ZPROF.PROCLIB)                                 00010201
//**************************************************                    00010300
//* C ZUSER## TO YOURID                                                 00010400
//* C ZPROF PROFUID ALL                                                 00010500
//*   ==> IF YOU USE NOT ZPROF AS INSTRUCTORID                          00010600
//* DELETE ZSCHOLIB STATEMENT IF YOU WANT TO USE                        00010700
//*       THE DEFAULT PROC LIBRARY                                      00010800
//* ORIGINAL COPIED FROM  GMULLER.LANG.CNTL                             00011000
//**************************************************                    00011100
//* COMPILE COBOL PROGRAM                                               00012000
//**************************************************                    00021000
//STEP1 EXEC IGYWCLG,LNGPRFX=IGY420                                     00030001
//SYSIN        DD DSN=KC03MA9.LANG.SOURCE(CALC1000),DISP=SHR            00040002
//LKED.SYSLMOD DD DSN=KC03MA9.LANG.LOAD(CACL1000),DISP=SHR              00050002

cwseay
 
Posts: 16
Joined: Thu Oct 05, 2017 8:28 am
Has thanked: 4 times
Been thanked: 0 time

Re: Help with a JCL error

Postby cwseay » Sun Apr 28, 2019 12:48 pm

1
 _________________________________
 TO END PROGRAM ENTER 0.
 TO CALCULATE SALES TAX, ENTER THE SALES AMOUNT.
 IGZ0017S The open of DISPLAY or ACCEPT file with environment name SYSIN was unsuccessful.
 CEE3201S The system detected an operation exception (System Completion Code=0C1).
          From compile unit CALC1000 at entry point CALC1000 at compile unit offset +000002DC at entry offset +000002DC
           at address 1ED002DC.

cwseay
 
Posts: 16
Joined: Thu Oct 05, 2017 8:28 am
Has thanked: 4 times
Been thanked: 0 time

Re: Help with a JCL error

Postby NicC » Sun Apr 28, 2019 3:25 pm

I have edited your posts to remove unnecessary sections, e.g. the COBOL compile step as that executed successfully, and to use the code tags. Now we can see the wood from the trees as everything lines up. Please use the code tags - as I mentioned before you can easily work out how to use them if you use the "Full Editor" for creating your post and not the "Quick Reply" editor. Also, don't XDC the whole job - just the parts that are required - and even then edit out bits that are irrelevant.
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic
NicC
Global moderator
 
Posts: 3025
Joined: Sun Jul 04, 2010 12:13 am
Location: Pushing up the daisies (almost)
Has thanked: 4 times
Been thanked: 136 times

Re: Help with a JCL error

Postby NicC » Sun Apr 28, 2019 3:30 pm

To fix your problem you need to supply a dataset with your input. As you can see from the error message,
IGZ0017S The open of DISPLAY or ACCEPT file with environment name SYSIN was unsuccessful.
the program was trying to access SYSIN and if you look at your JCL you did not supply a SYSIN DD statement to that step (GO).
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic

These users thanked the author NicC for the post:
cwseay (Mon Apr 29, 2019 7:49 pm)
NicC
Global moderator
 
Posts: 3025
Joined: Sun Jul 04, 2010 12:13 am
Location: Pushing up the daisies (almost)
Has thanked: 4 times
Been thanked: 136 times

Re: Help with a JCL error

Postby cwseay » Mon Apr 29, 2019 1:36 am

Was this not correct?
//SYSIN DD DSN=KC03MA9.LANG.SOURCE(CALC1000),DISP=SHR
cwseay
 
Posts: 16
Joined: Thu Oct 05, 2017 8:28 am
Has thanked: 4 times
Been thanked: 0 time

Re: Help with a JCL error

Postby NicC » Mon Apr 29, 2019 1:53 am

That was the COBOL source code input to the compiler. Your program needs input via SYSIN in it execution step (GO) so something like
//GO.SYSIN DD DSN=your.input.dataset,DISP=SHR

or
//GO.SYSIN DD *
your first 80 byte input record
your second 80 byte input record
:
your last 80 byte input record
/*
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic

These users thanked the author NicC for the post:
cwseay (Mon Apr 29, 2019 7:48 pm)
NicC
Global moderator
 
Posts: 3025
Joined: Sun Jul 04, 2010 12:13 am
Location: Pushing up the daisies (almost)
Has thanked: 4 times
Been thanked: 136 times

Re: Help with a JCL error

Postby Robert Sample » Mon Apr 29, 2019 6:32 pm

And using ACCEPT is generally a poor way to provide input into a COBOL program. For proper processing, you'll need to provide left-zero-filled 7-digit numbers WITHOUT a decimal point (so 35.73 would be 0003573 and 1091 would be 0109100). If you don't provide numbers in the correct format, you may not get the results you expect.

These users thanked the author Robert Sample for the post:
cwseay (Mon Apr 29, 2019 7:48 pm)
Robert Sample
Global moderator
 
Posts: 3720
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: Help with a JCL error

Postby Robert Sample » Tue Apr 30, 2019 2:47 am

IGYWCLG is a system procedure that contains three separate steps. Each step may (or may not) have a SYSIN DD statement. You are confusing the COBOL source (COBOL.SYSIN) with the REQUIRED runtime SYSIN (GO.SYSIN). Furthermore, looking at your original JCL as posted 20 posts ago, you have a
//SYSIN     DD *               GENERATED STATEMENT
which indicates, at a minimum, that you do not have your JCL coded correctly and this may be causing your problem. Your JCL should look something like
// EXEC IGYWCLG
//COBOL.SYSIN DD .... (whatever your COBOL source is called)
//COBOL.SYSLIB DD .... (if required -- it may not be)
//GO.SYSIN DD *
<input data, one field per line in the first 7 bytes>
/*
//
If you had a subprogram being called by your COBOL program, you would need
//LKED.SYSLIB DD …. <subprogram library>
//LKED.SYSIN DD *
<linkage editor / binder commands to bring your subprogram into your main COBOL program>
/*
and these statements would belong between your //COBOL.SYSLIB and your //GO.SYSIN statements above. The SYSIN DD names have the procedure step name before the SYSIN to indicate which of the three steps that particular SYSIN is associated with. If you just placed the data in the JCL without any //SYSIN statement, you would get the GENERATED STATEMENT message shown above -- and this is definitely wrong.
Robert Sample
Global moderator
 
Posts: 3720
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Previous

Return to JCL

 


  • Related topics
    Replies
    Views
    Last post