DT20WORK is a work file used by SASSDT20. It must not have a DISP of MOD.
DATASETS contains one card-image record for each application data set name being moved with the name beginning in position 1 of the record. (This data set may be useful for producing sorted data set checklists to assist in the physical movement of data sets to the new site.)
The SASSDT20-01 control report (DT20CR01) can be used to verify accuracy before running Job 3.
After verifying that Job 2 ran correctly, Job 3 may be run.
The following is a SASSDT20 execution JCL sample:
//jobname JOB .......,REGION=4M //EXTRACT EXEC PGM=SASSBSTR,PARM=batch-terminal-id //JOBLIB DD DSN=cai.CAL2LOAD,DISP=SHR //UCC7CMDS DD DSN=ca7.communications.data.set,DISP=SHR //SYSOUT DD SYSOUT=x //SYSPRINT DD DSN=&&DT20IN,DISP=(,PASS),UNIT=SYSDA, // SPACE=(CYL,(5,1),RLSE),DCB=(RECFM=FBA,LRECL=133,BLKSIZE=3990) //SYSIN DD DSN=input.to.job2,DISP=(OLD,DELETE) //* //CREATE2 EXEC PGM=SASSDT20,COND=(0,NE,EXTRACT), // PARM='LOGON=operid[,password][,DDPROSE=N][,JCL=N]' //DT20IN DD DSN=&&DT20IN,DISP=(OLD,DELETE) //DT20OUT DD DSN=input.to.job3,DISP=(,CATLG), // UNIT=SYSDA,SPACE=(CYL,(2,1),RLSE), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000) //DT20CR01 DD SYSOUT=x,DCB=BLKSIZE=133 //DATASETS DD SYSOUT=x,DCB=BLKSIZE=80 //DT20WORK DD DISP=(,DELETE),UNIT=SYSDA, // SPACE=(CYL,(1,1)),DCB=(RECFM=FBA,LRECL=133,BLKSIZE=3990) //SYSUDUMP DD SYSOUT=x
|
Copyright © 2015 CA Technologies.
All rights reserved.
|
|