UTILITIES

[CPANTX]

I am using IEBCOPY to unload a PDS. My job is being deleted before execution.

Code: Select all

$HASP106 JOB DELETED BY JES2 OR CANCELLED BY OPERATOR BEFORE EXECUTION.


From what I know of this error msg, the job was cancelled by the system
or by an operator. This can be done to a job:
1). If it has been in the system for ten days or longer, or
2). If the job requests non-existent services or services not allowed for that job's
class, priority, or access number.

First point is not applicable in my case.

Does this mean my job is requesting something not allowed or is there problem with job statement?

I am using following JCL:

Code: Select all

****** ***************************** Top of Data ********
000001 //CPANTXJ  JOB (12345678),CPANTX,MSGCLASS=H,     
000002           MSGLEVEL=(1,1),CLASS=A,NOTIFY=&SYSUID   
000003 //STEP01   EXEC PGM=IEBCOPY                       
000004 //SYSPRINT DD SYSOUT=*                           
000005 //SYSUT1   DD DSN=CPANTX.COBOL.OBJ,DISP=SHR       
000006 //SYSUT2   DD DSN=CPANTX.COBOL.OBJC,             
000007 //            DISP=(NEW,KEEP),                   
000008 //            UNIT=DISK,                         
000009 //            SPACE=(TRK,(20,10,10),RLSE),       
000010 //            DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
000011 //SYSIN    DD *                                   
000012   COPY INDD=SYSUT1,                               
000013        OUTDD=SYSUT2                               
000014 /*                                               
000015 //                                               
****** **************************** Bottom of Data ******


Thank and regards,
CPANTX

Posts: 7
Joined: Sat Mar 21, 2009 11:23 pm

[prino]

There's a // missing on line two, column one...

[sysprog]

In most cases are there is a JCL error. It also occurs when you specify different SYSNAME in /*JOBPARM.

Your example is one of them: you missed // at the beginning of the second JCL record.

You may try following corrected JCL:

Code: Select all

****** ***************************** Top of Data ********
000001 //CPANTXJ  JOB (12345678),CPANTX,MSGCLASS=H,     
000002 //        MSGLEVEL=(1,1),CLASS=A,NOTIFY=&SYSUID   
000003 //STEP01   EXEC PGM=IEBCOPY                       
000004 //SYSPRINT DD SYSOUT=*                           
000005 //SYSUT1   DD DSN=CPANTX.COBOL.OBJ,DISP=SHR       
000006 //SYSUT2   DD DSN=CPANTX.COBOL.OBJC,             
000007 //            DISP=(NEW,KEEP),                   
000008 //            UNIT=DISK,                         
000009 //            SPACE=(TRK,(20,10,10),RLSE),       
000010 //            DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
000011 //SYSIN    DD *                                   
000012   COPY INDD=SYSUT1,                               
000013        OUTDD=SYSUT2                               
000014 /*                                               
000015 //                                               
****** **************************** Bottom of Data ******