can u please give me the jcl for running the unload utility, to unload data from a db2 table?

Answer 1

Never use acronyms when asking a question.

Answer 2

Replacing file names in lower case correspondingly with system or DB names, and moving the parameters after 4th colume because of supressed space in the display.

//STP01 EXEC PGM=IKJEFT01,DYNAMNBR=20
//STEPLIB DD DSN=Prod.LoadLib,DISP=SHR
//SYSREC00 DD DSN=Unloading.From.db2Table,
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(10,2),RLSE)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSIN DD *
DSN SYSTEM(db2s)
RUN PROGRAM(DSNTIAUL) PLAN(DSNTIAUL) PARMS('SQL')
END
/*
//SYSIN DD *
SELECT * FROM Table.TableName;
/*

or you can do
stop database w IKJEFT01
dsn1copy to copy DB2 VSAM to sequential filr
dsn1copy to copy sequential backup file to DB2 VSAM
start database IKJEFT01

//STEP1 EXEC PGM=IKJEFT01,DYNAMBR=20
….
//SYSIN DD *
DSN SYSTEM(DSN)
-STOP DATABASE(DBname) SPACENAM(DSNname)
END
/*
//STEP2 EXEC PGM=DSN1COPY,PARM=’CHECK’
…
//SYSUT1 DD DSN=DB2CAT.DSNDBC.DB05.ACCTBL,DISP=OLD,AMP=(‘BUFND=181’)
//SYSUT2 DD DSN= Output.seq.file,DISP=OLD
/*
//STEP3 EXEC PGM=DSN1COPY,PARM=’CHECK’
…
/*
//STEP4 EXEC PGM=IKJEFT01,DYNAMBR=20
…
//SYSIN DD *
DSN SYSTEM(DSN)
-START DATABASE (DBname) SPACENAM(DSNname)
END
/*