Job to take unload of table -
//YSWATEST JOB (GENERAL),'DB2 UNLOAD',
// CLASS=A,
// MSGCLASS=Q,
// NOTIFY=&SYSUID,
// MSGLEVEL=(1,1),
// TIME=(0,1),
// PRTY=8
//*
//STEP1 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SELECT *
FROM EMP_TABLE
WHERE EMP_NAME = 'SANDIP'
WITH UR;
//*
//SYSTSIN DD *
DSN SYSTEM(DBG2)
RUN PROGRAM(DSNTIAUL) PLAN(DSNTIAUL) PARMS('SQL')
//* DATA FILE
//SYSREC00 DD DSN=YSWA.DEV.DATA1X,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(1,1))
//* CTRL FILE
//SYSPUNCH DD DSN=YSWA.DEV.CTRL1X,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(1,1))
//*
//YSWATEST JOB (GENERAL),'DB2 UNLOAD',
// CLASS=A,
// MSGCLASS=Q,
// NOTIFY=&SYSUID,
// MSGLEVEL=(1,1),
// TIME=(0,1),
// PRTY=8
//*
//STEP1 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SELECT *
FROM EMP_TABLE
WHERE EMP_NAME = 'SANDIP'
WITH UR;
//*
//SYSTSIN DD *
DSN SYSTEM(DBG2)
RUN PROGRAM(DSNTIAUL) PLAN(DSNTIAUL) PARMS('SQL')
//* DATA FILE
//SYSREC00 DD DSN=YSWA.DEV.DATA1X,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(1,1))
//* CTRL FILE
//SYSPUNCH DD DSN=YSWA.DEV.CTRL1X,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(1,1))
//*
No comments:
Post a Comment