venuhunev
New User
Joined: 26 May 2007
Posts: 70
Location: chennai
|
|
|
|
Hi,
I want to unload the prod tables and load it into my test region. Since i dont have RACF for the image copies, I need to take it directly from the prod. I can use import/export. But the thing is i need to execute in a batch job. Any pointers ? |
|
stodolas
Active Member
Joined: 13 Jun 2007
Posts: 632
Location: Wisconsin
|
|
|
|
You will need to modify things slightly...
Unload from prod:
| Code: |
//S010 EXEC PGM=IKJEFT1B,DYNAMNBR=20
//STEPLIB DD DSN=DB2.TEST.SDSNLOAD,DISP=SHR
//SYSIN DD *
// SELECT * FROM OWNER.TABLE WITH CS;
//
//SYSREC00 DD DSN=OUTPUT.FILE,DISP=(NEW,CATLG,DELETE),
UNIT=DISK,SPACE=(TRK(1,1),RLSE)
//SYSPUNCH DD DSN=LOAD.CARD.OUTPUT,DISP=(,CATLG,DELETE),
UNIT=DISK,SPACE=(TRK,(1,1),RLSE)
//SYSTSIN DD DSN=DB2A.DBA.SYSIN(DSNTIAUL),DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
|
Then modify the SYSPUNCH to have the correct OWNER.TABLE. Make sure the destination table is empty (for the options I have on my step).
| Code: |
//S010 EXEC PGM=DSNUTILB,REGION=8M,PARM='DB2T,LOADIBM'
//STEPLIB DD DSN=DB2.TEST.SDSNLOAD,DISP=SHR
//SYSREC00 DD DISP=SHR,DSN=OUTPUT.FILE
//SYSIN DD DISP=SHR,DSN=LOAD.CARD.OUTPUT
//*
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(100,100),RLSE)
//SYSMAP DD SPACE=(CYL,(100,100),,,ROUND),UNIT=(SORT,6)
//$ORTPARM DD *
DYNALLOC
/*
//SORTOUT DD UNIT=SYSDA,SPACE=(CYL,(100,100),RLSE)
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
|
|
|
.jpg)
