[Contents] [Previous] [Next]

Appendix B. Sample JCL for OD/390 Internet Access Feature Load

//CLEAN  EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
  DELETE IOD.V2R1MF.WEBBIND
  DELETE IOD.V2R1MF.WEBDBRM
  DELETE IOD.V2R1MF.WEBDB2
  DELETE IOD.V2R1MF.WEBHTML
  DELETE IOD.V2R1MF.WEBJCL
  DELETE IOD.V2R1MF.WEBLOD
  DELETE IOD.V2R1MF.WEBSAMP
  DELETE IOD.V2R1MF.WEBOBJ
  DELETE IOD.V2R1MF.WEBLOD.CICSTS13
  DELETE IOD.V2R1MF.WEBOBJ.CICSTS13
  DELETE IOD.V2R1MF.WEBDBRM.CICSTS13
  SET MAXCC=0
//ALLOC  EXEC PGM=IEFBR14
//WEBBIND DD DSN=IOD.V2R1MF.WEBBIND,
//            SPACE=(CYL,(01,01,10)),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBDBRM DD DSN=IOD.V2R1MF.WEBDBRM,
//            SPACE=(CYL,(01,01,10)),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBDB2   DD DSN=IOD.V2R1MF.WEBDB2,
//            SPACE=(CYL,(01,01,10)),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBHTML  DD DSN=IOD.V2R1MF.WEBHTML,
//            SPACE=(CYL,(01,01,10)),
//            DCB=(RECFM=VB,LRECL=32756,BLKSIZE=32760),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBJCL   DD DSN=IOD.V2R1MF.WEBJCL,
//            SPACE=(CYL,(01,01,10)),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBLOD   DD DSN=IOD.V2R1MF.WEBLOD,
//            SPACE=(CYL,(05,05,10)),
//            DCB=(RECFM=U,LRECL=256,BLKSIZE=19069),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBSAMP DD DSN=IOD.V2R1MF.WEBSAMP,
//            SPACE=(CYL,(01,01,25)),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBOBJ   DD DSN=IOD.V2R1MF.WEBOBJ,
//            SPACE=(CYL,(05,05,10)),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBLODTS DD DSN=IOD.V2R1MF.WEBLOD.CICSTS13,
//            SPACE=(CYL,(05,05,10)),
//            DCB=(RECFM=U,LRECL=256,BLKSIZE=19069),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBOBJTS DD DSN=IOD.V2R1MF.WEBOBJ.CICSTS13,
//            SPACE=(CYL,(05,05,10)),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//WEBDBRTS DD DSN=IOD.V2R1MF.WEBDBRM.CICSTS13,
//            SPACE=(CYL,(01,01,10)),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=4000),
//            UNIT=SYSDA,
//            DISP=(,CATLG,DELETE)
//LOADBIND EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBBIND,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBBIND.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(2,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADDBRM EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBDBRM,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBDBRM.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(3,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADDB2  EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBDB2,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBDB2.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(4,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADHTML EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBHTML,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBHTML.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(5,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADJCL  EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBJCL,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBJCL.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(6,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADLOD  EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBLOD,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBLOD.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(7,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADSAMP EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBSAMP,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBSAMP.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(8,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADOBJ  EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBOBJ,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBOBJ.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(9,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADLODT EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBLOD.CICSTS13,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBLOD.CICSTS13.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(10,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADOBJT  EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBOBJ.CICSTS13,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBOBJ.CICSTS13.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,RETAIN,SER=ODW21F),LABEL=(11,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN
//LOADDBRT EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT      DD DSN=IOD.V2R1MF.WEBDBRM.CICSTS13,DISP=OLD
//IN       DD DSN=IOD.V2R1MF.WEBDBRM.CICSTS13.UNLD,
//         DISP=OLD,UNIT=3480,
//         VOL=(PRIVATE,,SER=ODW21F),LABEL=(12,SL)
//SYSUT3   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSUT4   DD UNIT=SYSDA,SPACE=(CYL,(5,1))
//SYSIN    DD *
          COPY OUTDD=OUT,INDD=IN



[Contents] [Previous] [Next]

Copyright © IBM Corporation - 1998, 2000