anyone else, can you help me resolve this DB2 utility error?



IBM's flagship relational database management system

anyone else, can you help me resolve this DB2 utility error?

Postby NARASIMHA PRASAD RAO » Thu Apr 15, 2010 12:28 pm

the DB2 utility in PS530 of my job below KPKJS20T does not like the JCL parameter. It abends 'S04E' and issues the following error message. I was suspecting that maybe the utility does not like the underscore character in the new DB2 table name.I have tried specifying this parm other ways too, but with no success.

please any one can help on this



//*                                                                     
//CAVIEW   OUTPUT JESDS=ALL                                             
//NONPRINT OUTPUT DEST=NONPRINT,DEFAULT=Y                               
//STANDARD OUTPUT DEST=LOCAL,JESDS=ALL,DEFAULT=Y,CLASS=Y               
//*                                                                     
//*********************************************************************
//*  THIS JOB BACKS UP AND RESETS VARIOUS FILES FOR ITS REAL TIME       
//*  ADJUDICATION                                                       
//*                                                                     
//* SIMILAR TEST JOB - TDSCM.HRBSM.USRJCL(TEST02DD)   (B.LAPAGE)       
//*********************************************************************
//*                                                                     
//JS005   EXEC PGM=IKJEFT1B,DYNAMNBR=20               **SPUFI DUMP     
//STEPLIB  DD  DISP=SHR,DSN=D2T1.DSNEXIT                               
//         DD  DISP=SHR,DSN=D2T1.DSNLOAD                               
//SYSIN    DD  *                                                       
  SELECT *                                                             
    FROM DSC1TEST.ITS_CNTL                                             
//SYSTSPRT DD  SYSOUT=*                                                 
//*                                                                     
//*YSPRINT  DD SYSOUT=*                                                 
//SYSPRINT  DD DSN=TDSCM.KPK.TEMPFL2(+1),                               
//             DISP=(NEW,CATLG,CATLG),                                 
//             MGMTCLAS=MC001608,   PERMDA:PRIMRY=5 NONUSE EXP=15       
//             SPACE=(27998,(75,50),RLSE),                             
//             DCB=(SYS3.DSCB,                                         
//             LRECL=133,BLKSIZE=13300,RECFM=FBA)                       
//SYSUDUMP DD  SYSOUT=*                                                 
//SYSTSIN  DD  *                                                       
  DSN SYSTEM(D2T1)                                                     
    RUN PROGRAM(DSNTEP2) PLAN(DSNTEP2)                                 
  END                                                                   
//*                                                                     
//*********************************************************************
//*                                                                     
//PS510   EXEC PGM=IKJEFT01                           **UNLD ITS_CNTL* 
//STEPLIB   DD DSN=D2T1.DSNEXIT,                                       
//             DISP=(SHR,PASS,KEEP)                                     
//          DD DSN=D2T1.DSNLOAD,                                       
//             DISP=(SHR,PASS,KEEP)                                     
//SYSPUNCH  DD SYSOUT=*                                                 
//SYSREC00  DD DSN=TDSCM.KPK.TEMPFL3(+1),             ITS_CNTL UNLOAD   
//             DISP=(NEW,CATLG,DELETE),                                 
//             MGMTCLAS=MC002400,                                       
//             VOL=(,,,9),                                             
//             SPACE=(27998,(500,250),RLSE),                           
//*            DCB=BUFNO=30,                                           
//             DCB=(SYS3.DSCB)                                         
//*YSTSIN   DD DSN=PDSCM.HRBSM.VCYC.SYSIN(HRSI20P1),  SQL ENVIRONMENT   
//*            DISP=(SHR,KEEP,KEEP)                                     
//SYSTSIN   DD *                                                       
  DSN SYSTEM(D2T1)                                                     
  RUN PROGRAM(DSNTIAUL) PLAN(DSNTIAUL) PARMS('SQL') -                   
    LIB('D2T1.DSNLOAD')                                                 
/*                                                                     
//*YSIN     DD DSN=PDSCM.HRBSM.VCYC.SYSIN(HRSI20P2),  UNLOAD SELECT     
//*            DISP=(SHR,KEEP,KEEP)                                     
//SYSIN     DD *                                                       
  SELECT *                                                             
    FROM  DSC1TEST.ITS_CNTL                                             
    ORDER BY CNTL_NUM,                                                 
             HOST_HOME_IND,                                             
             RECORD_TYPE                                               
  ;                                                                     
/*                                                                     
//SYSOUT    DD SYSOUT=*                                                 
//SYSPRINT  DD SYSOUT=*                                                 
//SYSTSPRT  DD SYSOUT=*                                                 
//SYSUDUMP  DD SYSOUT=6,OUTPUT=(*.NONPRINT)                             
//*                                                                     
//PS520   EXEC PGM=WAAPABND,                          **ABEND IF BAD **
//             COND=(4,GE,PS510),                                       
//             PARM='1000,ERROR EXTRACTING RECS FROM ITS_CNTL DB'       
//SYSPRINT  DD SYSOUT=*                                                 
//SYSUDUMP  DD SYSOUT=(,),OUTPUT=(*.NONPRINT)                           
//*                                                                     
//PS530   EXEC PGM=DSNUTILB,                          **EMPTY ITSCNTL**
//             PARM=(D2T1,'ITS_CNTL')               *CLEANUP DCDT TBL   
//***                                                                   
//****** PARM=(D2T1,'ITS_CNTL',RESTART(PHASE))         <- AFTER ABEND   
//***                                                                   
//STEPLIB   DD DSN=D2T1.DSNEXIT,                                       
//             DISP=(SHR,KEEP,KEEP)                                     
//          DD DSN=D2T1.DSNLOAD,                                       
//             DISP=(SHR,KEEP,KEEP)                                     
//SORTLIB   DD DSN=SYS1.SORTLIB,                                       
//             DISP=(SHR,KEEP,KEEP)                                     
//SORTWK01  DD DSN=TDSCM.KPKDB.SDCM20CT.SORTWK01,                       
//             DISP=(MOD,DELETE,CATLG),                                 
//             MGMTCLAS=MC0008,                                         
//             VOL=(,,,9),                                             
//             SPACE=(27998,(500,250))                                 
//SORTOUT   DD DSN=TDSCM.KPKDB.SDCM20CT.SORTOUT,                       
//             DISP=(MOD,DELETE,CATLG),                                 
//             MGMTCLAS=MC0008,                                         
//             VOL=(,,,9),                                             
//             SPACE=(27998,(500,250))                                 
//SYSUT1    DD DSN=TDSCM.KPKDB.WDCM20CT.SYSUT1,                         
//             DISP=(MOD,DELETE,CATLG),                                 
//             MGMTCLAS=MC0008,                                         
//             VOL=(,,,9),                                             
//             SPACE=(27998,(500,250))                                 
//SYSMAP    DD DSN=TDSCM.KPKDB.WDCM20CT.SYSMAP,                       
//             DISP=(MOD,DELETE,CATLG),                               
//             MGMTCLAS=MC0008,                                       
//             VOL=(,,,9),                                             
//             SPACE=(27998,(500,250))                                 
//SYSDISC   DD DSN=TDSCM.KPKDB.SDCM20CT.SYSDISC,                       
//             DISP=(MOD,DELETE,CATLG),                               
//             MGMTCLAS=MC0008,                                       
//             VOL=(,,,9),                                             
//             SPACE=(27998,(500,250))                                 
//SYSERR    DD DSN=TDSCM.KPKDB.SDCM20CT.SYSERR,                       
//             DISP=(MOD,DELETE,CATLG),                               
//             MGMTCLAS=MC0008,                                       
//             VOL=(,,,9),                                             
//             SPACE=(27998,(500,250))                                 
//SYSREC00  DD DUMMY                                                   
//*YSIN     DD DSN=PDSCM.HRBSM.VCYC.SYSIN(HRSI20P3),  REPL WITH DUMMY 
//*            DISP=(SHR,KEEP,KEEP)                                   
//SYSIN     DD *                                                       
  LOAD DATA INDDN SYSREC00 REPLACE LOG YES                             
    INTO TABLE DSC1TEST.ITS_CNTL                                       
/*                                                                     
//UTPRINT   DD SYSOUT=*                                               
//SYSPRINT  DD SYSOUT=*                                               
//SYSUDUMP  DD SYSOUT=6,OUTPUT=(*.NONPRINT)                           
//*                                                                   
//PS540   EXEC PGM=WAAPABND,                          **ABEND IF BAD **
//             COND=(4,GE,PS530),                                     
//             PARM='5000,ERROR WHILE EMPTYING ITS_CNTL DB'           
//SYSPRINT  DD SYSOUT=*                                               
//SYSUDUMP  DD SYSOUT=(,),OUTPUT=*.NONPRINT                           
//*                                                                   
//********************************************************************
//JS800   EXEC PGM=IKJEFT1B,DYNAMNBR=20               **SPUFI DUMP     
//STEPLIB  DD  DISP=SHR,DSN=D2T1.DSNEXIT                               
//         DD  DISP=SHR,DSN=D2T1.DSNLOAD                               
//SYSIN    DD  *                                                       
  SELECT *                                                             
    FROM DSC1TEST.ITS_CNTL                                             
//SYSTSPRT DD  SYSOUT=*                                                 
//*                                                                     
//*YSPRINT  DD SYSOUT=*                                                 
//SYSPRINT  DD DSN=TDSCM.KPK.TEMPFL4(+1),                               
//             DISP=(NEW,CATLG,CATLG),                                 
//             MGMTCLAS=MC001608,   PERMDA:PRIMRY=5 NONUSE EXP=15       
//             SPACE=(27998,(75,50),RLSE),                             
//             DCB=(SYS3.DSCB,                                         
//             LRECL=133,BLKSIZE=13300,RECFM=FBA)                       
//SYSUDUMP DD  SYSOUT=*                                                 
//SYSTSIN  DD  *                                                       
  DSN SYSTEM(D2T1)                                                     
    RUN PROGRAM(DSNTEP2) PLAN(DSNTEP2)                                 
  END                                                                   
//*                                                                     
//

INTO TABLE DSCMPROD.ITS_CNTL
NARASIMHA PRASAD RAO
 
Posts: 12
Joined: Mon Mar 08, 2010 8:03 pm
Has thanked: 0 time
Been thanked: 0 time

Re: anyone else, can you help me resolve this DB2 utility error?

 

Re: anyone else, can you help me resolve this DB2 utility error?

Postby NARASIMHA PRASAD RAO » Thu Apr 15, 2010 1:32 pm

my SPOOL INFORMATION IS
:

-----------------------------------------------------------------------------------------------------------------------------
DSF OUTPUT DISPLAY KPKJS20T JOB17113 DSID 118 LINE 0 COLUMNS 02- 81
COMMAND INPUT ===> SCROLL ===> CSR
********************************* TOP OF DATA **********************************
DSNU024I DSNUTILB - PARM FIELD ERROR - 'D2T1,ITS_CNTL'
DSNU016I DSNUTILB - UTILITY BATCH MEMORY EXECUTION ABENDED, REASON=X'00E40018'
******************************** BOTTOM OF DATA ********************************

TDSCM.HRBSM.USRJCL(KKN07T20)
//PS530 EXEC PGM=DSNUTILB, **EMPTY ITSCNTL**
// PARM=(D2T1,'ITS_CNTL') *CLEANUP DCDT TBL
----------------------------------------------------------------------------------------------------------------------------
NARASIMHA PRASAD RAO
 
Posts: 12
Joined: Mon Mar 08, 2010 8:03 pm
Has thanked: 0 time
Been thanked: 0 time

Re: anyone else, can you help me resolve this DB2 utility error?

Postby swd » Thu Apr 15, 2010 4:58 pm

It won't like the underscore, have you tried this PARM='D2T1,ITSCNTL' I think this should work OK.

Cheers
User avatar
swd
 
Posts: 109
Joined: Wed Feb 18, 2009 9:18 pm
Location: UK
Has thanked: 0 time
Been thanked: 0 time

Re: anyone else, can you help me resolve this DB2 utility error?

Postby NARASIMHA PRASAD RAO » Thu Apr 15, 2010 6:50 pm

i tried PARM='D2T1,ITSCNTL' with that but its not worked .....
NARASIMHA PRASAD RAO
 
Posts: 12
Joined: Mon Mar 08, 2010 8:03 pm
Has thanked: 0 time
Been thanked: 0 time

Re: anyone else, can you help me resolve this DB2 utility error?

Postby swd » Thu Apr 15, 2010 7:02 pm

... and you got the same error saying the PARM FIELD ERROR ? can you confirm this please. It looks like your DSNUTILB step is clearing down table DSC1TEST.ITS_CNTL by loading DUMMY into the table, and so clearing it down, so the PARM='D2T1,ITSCNTL' looks OK to me assuming that D2T1 is your DB2 susbsystem.

You could try removing the ITNCNTL as this is an optional parameter.
User avatar
swd
 
Posts: 109
Joined: Wed Feb 18, 2009 9:18 pm
Location: UK
Has thanked: 0 time
Been thanked: 0 time

Re: anyone else, can you help me resolve this DB2 utility error?

Postby NARASIMHA PRASAD RAO » Thu Apr 15, 2010 9:28 pm

i got ANW:

The parm for a DB2 utility job step directs the job to the correct DB2 region and defines a utility id. In my case example, the first part of the parm is pointing to the D2T1 DB2 region and the second parm is trying to tell DB2 to use ITS_CNTL as the utility id; that is not a valid utility id name. The general standard for a DSNUTILB parm statement is PARM=(D2T1,'jobname.stepname'), such as PARM=(D2T1,'KKNO7T20.PS530').

smd
THANKS FOR YOUR help......
NARASIMHA PRASAD RAO
 
Posts: 12
Joined: Mon Mar 08, 2010 8:03 pm
Has thanked: 0 time
Been thanked: 0 time


Return to DB2

 


  • Related topics
    Replies
    Views
    Last post