z/OS Job Control Language › Loading the Database with ETOTLOAD

Loading the Database with ETOTLOAD

Use the following JCL to execute ETOTLOAD. Output from this step is processed by the FASTLOAD utility.

Note: For more information about the FASTLOAD utility statement, see the CA IDMS Utilities Guide.

ETOTLOAD z/OS

//*************************************************************
//*  Use ETOTLOAD to create the load file for FASTLOAD
//*  (unloaded Total database is converted to CA IDMS/DB format)
//*************************************************************
//DBL1     EXEC PGM=ETOTLOAD,REGION=512K
//STEPLIB  DD DSN=idms.dba.loadlib,DISP=SHR
//         DD DSN=idms.loadlib,DISP=SHR
//unload   DD DSN=total.data,DISP=SHR
//SYSIDMS  DD *
  DMCL=etotdmcl DBNAME=etotal
/*
//dcmsg    DD DSN=idms.sysmsg.ddldcmsg,DISP=SHR
//SYSUDUMP DD SYSOUT=*
//SYSOUD   DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSLST   DD SYSOUT=*
//SYSJRNL  DD DUMMY
//RELDCTL  DD DSN=reldctl,DISP=(NEW,CATLG),UNIT=disk,
//            VOL=SER=nnnnnn,
//            DCB=(RECFM=FB,LRECL=60,BLKSIZE=1200),
//            SPACE=(TRK,(10,10),RLSE)
//SYS002   DD DSN=sortdbl1,DISP=(NEW,CATLG),UNIT=disk,
//            VOL=SER=nnnnnn,
//            DCB=(RECFM=VB,LRECL=150,BLKSIZE=1500),
//            SPACE=(TRK,(10,10),RLSE)
//SYSPCH   DD DSN=sort1,DISP=(NEW,CATLG),UNIT=disk,
//            SPACE=(TRK,1),DCB=BLKSIZE=80,VOL=SER=TECH01