IBM Mainframe Forum

by **Vickz** » Mon Aug 27, 2018 12:35 am

Hi everyone,

I am trying to do a simple hello world and i am having some issues while running my jobs both to compile, as like to run it. I have created two PDS at the DSLIST how they follows:
- GP.GPAZ99.COPYLIB
- GP.GPAZ99.LOADLIB
One PDS that contains the source code called:
- GP.GPAZ99.COBLIB
and another one with two PS jobs being one to compile and another one to run, both are giving error, the another one is giving ABEND and this one JCL error
- GP.GPAZ99.TEST.JOBLIB

Project: GP
Group and User: GPAZ99

Here are the content of the compilation job:
GP.GPAZ99.TEST.JOBLIB(COMPJCL)

Select all

****** ***************************** Top of Data ******************************
000001 //GPAZ99TS  JOB MSGLEVEL=(1,1),NOTIFY=&SYSUID                           
000002 //* THIS IS A SAMPLE COMPILE JCL                                        
000003 //CL       EXEC COBOLCL,                                                
000004 //              COPYLIB=GP.GPAZ99.COPYLIB,                              
000005 //              LOADLIB=GP.GPAZ99.LOADLIB,                              
000006 //              SRCLIB=GP.GPAZ99.COBLIB,                                
000007 //              MEMBER=COB001                                           
****** **************************** Bottom of Data ****************************

After the submit:

Select all

IKJ56250I JOB GPAZ99TS(JOB01877) SUBMITTED                                     
15.58.42 JOB01877 $HASP165 GPAZ99TS ENDED AT N1 - JCL ERROR CN(INTERNAL)       
***                                                                            

And in the SPOOL:
JESYSMSG:

Select all

********************************* TOP OF DATA **********************************
 STMT NO. MESSAGE                                                               
        2 IEFC621I EXPECTED CONTINUATION NOT RECEIVED                           
        3 IEFC605I UNIDENTIFIED OPERATION FIELD                                 
        4 IEFC605I UNIDENTIFIED OPERATION FIELD                                 
        5 IEFC605I UNIDENTIFIED OPERATION FIELD                                 
        6 IEFC605I UNIDENTIFIED OPERATION FIELD                                 
******************************** BOTTOM OF DATA ********************************

JESJCL:

Select all

********************************* TOP OF DATA **********************************
        1 //GPAZ99TS  JOB MSGLEVEL=(1,1),NOTIFY=&SYSUID                         
          //* THIS IS A SAMPLE COMPILE JCL                                      
          IEFC653I SUBSTITUTION JCL - MSGLEVEL=(1,1),NOTIFY=GPAZ99              
        2 //CL       EXEC COBOLCL,                                              
        3 //              COPYLIB=GP.GPAZ99.COPYLIB,                            
        4 //              LOADLIB=GP.GPAZ99.LOADLIB,                            
        5 //              SRCLIB=GP.GPAZ99.COBLIB,                              
        6 //              MEMBER=COB001                                         
******************************** BOTTOM OF DATA ********************************

JESMSGLG:

Select all

********************************* TOP OF DATA **********************************
                         J E S 2  J O B  L O G  --  S Y S T E M  S Y S 1  --  N 
                                                                                
15.58.42 JOB01877 ---- SUNDAY,    26 AUG 2018 ----                              
15.58.42 JOB01877  IRR010I  USERID GPAZ99   IS ASSIGNED TO THIS JOB.            
15.58.42 JOB01877  IEFC452I GPAZ99TS - JOB NOT RUN - JCL ERROR                  
------ JES2 JOB STATISTICS ------                                               
            7 CARDS READ                                                        
           26 SYSOUT PRINT RECORDS                                              
            0 SYSOUT PUNCH RECORDS                                              
            1 SYSOUT SPOOL KBYTES                                               
         0.00 MINUTES EXECUTION TIME                                            
******************************** BOTTOM OF DATA ********************************

I would like to know which is the issue that is going on and what am i missing? I am stuck in this one of the two parts, Thanks!!!

by **enrico-sorichetti** » Mon Aug 27, 2018 1:00 am

read the jcl reference manual about the rule for continuation

anyway at first look Your continuations are one byte off to the right

Select all

//GPAZ99TS  JOB MSGLEVEL=(1,1),NOTIFY=&SYSUID                           
//* THIS IS A SAMPLE COMPILE JCL                                        
//CL       EXEC COBOLCL,                                                
//              COPYLIB=GP.GPAZ99.COPYLIB,                              
//              LOADLIB=GP.GPAZ99.LOADLIB,                              
//              SRCLIB=GP.GPAZ99.COBLIB,                                
//              MEMBER=COB001                                           
12345678901234567
 

should be

Select all

//GPAZ99TS  JOB MSGLEVEL=(1,1),NOTIFY=&SYSUID                           
//* THIS IS A SAMPLE COMPILE JCL                                        
//CL       EXEC COBOLCL,                                                
//             COPYLIB=GP.GPAZ99.COPYLIB,                              
//             LOADLIB=GP.GPAZ99.LOADLIB,                              
//             SRCLIB=GP.GPAZ99.COBLIB,                                
//             MEMBER=COB001                                           
12345678901234567                                  
 

by **Vickz** » Mon Aug 27, 2018 1:10 am

Hi Enrico!

I typed your example at the field but the issue still persists as much in the job submission as in the spool, the same JCL error keeps on. By the way, where is the JCL reference manual? I am new at this forum and i came because this doubt, i am new in COBOL and i am studying through video classes and e-books practicing examples. Thank you!!

by **Vickz** » Mon Aug 27, 2018 1:26 am

SPOOL return at JESYSMSG:

Select all

********************************* TOP OF DATA **********************************
 STMT NO. MESSAGE                                                               
        2 IEFC612I PROCEDURE COBOLCL WAS NOT FOUND                              
        2 IEFC657I THE SYMBOL COPYLIB WAS NOT USED                              
        2 IEFC657I THE SYMBOL LOADLIB WAS NOT USED                              
        2 IEFC657I THE SYMBOL SRCLIB WAS NOT USED                               
        2 IEFC657I THE SYMBOL MEMBER WAS NOT USED                               
******************************** BOTTOM OF DATA ********************************

by **steve-myers** » Mon Aug 27, 2018 1:29 am

What Mr. Sorichetti is saying is the text of a continuation statement in JCL must start in columns 4 through 16. Your continuation statements start in column 17.

Select all

000003 //A       EXEC PGM=IEWL,PARM=MAP
000004 //SYSPRINT DD  SYSOUT=*
000005 //SYSLMOD  DD  DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(1,1,1)),DSN=&&G(G)
000006 //SYSLIN   DD  DISP=SHR,DSN=&SYSUID..CHKM.OBJ
000007 //B       EXEC PGM=IEBGENER
000008 //SYSPRINT DD  SYSOUT=*
000009 //SYSUT1   DD  *
000010 LINE 1 
000011 LINE 2 
=COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
000012 //SYSUT2   DD  DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(1,,1)),
000013 //             DCB=(RECFM=FB,LRECL=80,BLKSIZE=800),DSN=&&D(TESTM)

ISPF has this handy dandy cols command to insert a nice ruler you can use to check stuff like that. Use it.

Back when us grey beards learned JCL, continuation text had to start in column 16 and no where else. That's why we put it there, even when we don't have to, though you'd think we've learned better in 40 some years since that restriction was relaxed.

by **Vickz** » Mon Aug 27, 2018 1:45 am

Hi Steve!

Thanks for the tip! I typed this cols command at the top but it gave a problem saying that the command cols not found, i have tried another form to do it but i didn't found also. Related to this jcl code is it right? I am gonna do the adjustments here and submit again!! Thank you!

by **enrico-sorichetti** » Mon Aug 27, 2018 1:48 am

where is the JCL reference manual?

googling with ibm jcl reference manual
returned this link
https://www-01.ibm.com/servers/resource ... 0_v2r3.pdf

and googling with ibm jcl user guide
returned
https://www-01.ibm.com/servers/resource ... 0_v2r3.pdf

and here is the top link to the IBM manuals
https://www-01.ibm.com/servers/resource ... enDocument

by **steve-myers** » Mon Aug 27, 2018 1:56 am

You type cols over the sequence number where you want the ruler and then press your Enter key.

Select all

000003 //A       EXEC PGM=IEWL,PARM=MAP
000004 //SYSPRINT DD  SYSOUT=*
000005 //SYSLMOD  DD  DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(1,1,1)),DSN=&&G(G)
000006 //SYSLIN   DD  DISP=SHR,DSN=&SYSUID..CHKM.OBJ
000007 //B       EXEC PGM=IEBGENER
000008 //SYSPRINT DD  SYSOUT=*
000009 //SYSUT1   DD  *
000010 LINE 1
000011 LINE 2
cols12 //SYSUT2   DD  DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(1,,1)),
000013 //             DCB=(RECFM=FB,LRECL=80,BLKSIZE=800),DSN=&&D(TESTM)

by **enrico-sorichetti** » Mon Aug 27, 2018 2:31 am

he same JCL error keeps on

it is NOT the same error...
reread carefully what YOU have posted
the messages for the second error are quite different

by **Vickz** » Mon Aug 27, 2018 2:40 am

enrico-sorichetti wrote:
he same JCL error keeps on

it is NOT the same error...
reread carefully what YOU have posted
the messages for the second error are quite different

You are right (Sorry me)!! I confused because i was forgot to save before give the submit in the code that you have posted, now i did it and it returned:

Select all

********************************* TOP OF DATA **********************************
 STMT NO. MESSAGE                                                               
        2 IEFC612I PROCEDURE COBOLCL WAS NOT FOUND                              
        2 IEFC657I THE SYMBOL COPYLIB WAS NOT USED                              
        2 IEFC657I THE SYMBOL LOADLIB WAS NOT USED                              
        2 IEFC657I THE SYMBOL SRCLIB WAS NOT USED                               
        2 IEFC657I THE SYMBOL MEMBER WAS NOT USED                               
******************************** BOTTOM OF DATA ********************************

I realized that after that i moved the continuation statement to the line 16 according your correction so the statements passed to be recognized, only these symbols that it says that was not used that i thought weird because i have created these PDS but they have any PS inside them and this SRCLIB i referenced the PDS where the source code is located.

IBM Mainframe Forum

JCL Error - Expected Continuation Not Received and UOF

JCL Error - Expected Continuation Not Received and UOF

Re: JCL Error - Expected Continuation Not Received and UOF

Re: JCL Error - Expected Continuation Not Received and UOF

Re: JCL Error - Expected Continuation Not Received and UOF

Re: JCL Error - Expected Continuation Not Received and UOF

Re: JCL Error - Expected Continuation Not Received and UOF

Re: JCL Error - Expected Continuation Not Received and UOF

Re: JCL Error - Expected Continuation Not Received and UOF

Re: JCL Error - Expected Continuation Not Received and UOF

Re: JCL Error - Expected Continuation Not Received and UOF