Page 1 of 1

DB2 via Clist

PostPosted: Fri Jan 22, 2010 6:19 pm
by jasper57
When using this Clist I get a condition code 0 but SYSREC00 does not appear in IOF.
Submitting the job directly works fine.
What am I doing wrong?

CONTROL NOMSG NOLIST NOCONLIST NOSYMLIST NOFLUSH

SUBMIT * END($$)

//uidSQL JOB (CPB00000),,CLASS=Y,MSGCLASS=G,
// MSGLEVEL=(1,1),REGION=2048K,NOTIFY=uid
//************************************************** ************
//STEP010 EXEC PGM=IKJEFT01,DYNAMNBR=20
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(DB2)
RUN PROGRAM(DSNTIAUL) PLAN(DSNTIAUL) PARMS('SQL') -
LIB(level1.DSN.RUNLIB.LOAD')
END
//SYSPUNCH DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSREC00 DD SYSOUT=*
//SYSIN DD *
&STR(SELECT) .....
FROM .....
WHERE ....;
$$

Re: DB2 via Clist

PostPosted: Fri Jan 22, 2010 6:24 pm
by Robert Sample
Have you tried putting a line with /*EOF after the $$ line? If you try this and it doesn't work, it almost certainly is a problem with the job card and you'll need to contact your site support group for assistance.

Re: DB2 via Clist

PostPosted: Fri Feb 05, 2010 4:39 pm
by jasper57
This did the trick:

CONTROL NOMSG NOLIST NOCONLIST NOSYMLIST NOFLUSH

SUBMIT * END($$)

//uidSQL JOB (00),'EXTRACTIE DATUM',CLASS=Y,MSGCLASS=G,
// MSGLEVEL=(1,1),REGION=2048K,NOTIFY=uid
//**************************************************************
//STEP010 EXEC PGM=IKJEFT01,DYNAMNBR=20
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DSN=uid.UTIL.CNTL(DSNTIAUL),DISP=SHR
//SYSPUNCH DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSREC00 DD SYSOUT=*
//SYSIN DD *
&STR(SELECT) ....
FROM ....
WHERE ....;
$$

It just irritates me that I don't understand why this works while the other one doesn't.

Re: DB2 via Clist

PostPosted: Sat Feb 06, 2010 12:29 am
by dick scherrer
Hello,

To repeat what Robert posted:
it almost certainly is a problem with the job card and you'll need to contact your site support group for assistance.

There can be jcl that is syntactically correct but is rejected by site standards/policies. . .