rubbos/app/httpd-2.0.64/os/tpf/samples/loadset.jcl

   1 //OLDRWEB JOB MSGLEVEL=1,CLASS=A,MSGCLASS=S
   2 //JOBCAT DD DSN=ICFCAT.ESAWK2,DISP=SHR
   3 /*ROUTE PRINT xxxxxx.xxxxxxx
   4 /*ROUTE PUNCH xxxxxx.xxxxxxx
   5 //TLDR   EXEC  PGM=TPFLDRCA,REGION=8M,
   6 //             PARM='OLDR,SYS=ACP,CLMSIZE=8000000'
   7 //STEPLIB  DD  DSN=ACP.LINK.RLSE46.WEB,DISP=SHR
   8 //         DD  DSN=ACP.LINK.RLSE40.BSS,DISP=SHR
   9 //         DD  DSN=VIS0000.DEVP.TEST.LK,DISP=SHR
  10 //         DD  DSN=SYS1.CEE.SCEERUN,DISP=SHR
  11 //SALTB    DD  DSN=ACP.SALTBL.RLSE46.WEB,DISP=SHR
  12 //         DD  DSN=ACP.SALTBL.INTG46.WEB,DISP=SHR
  13 //OBJLIB   DD  DSN=FSE0000.DEVP.TEST.OB,DISP=SHR
  14 //         DD  DSN=APA0000.DEVP.TEST.OB,DISP=SHR
  15 //         DD  DSN=ACP.DRVE.TEST.OB,DISP=SHR
  16 //         DD  DSN=ACP.OBJ.RLSE46.WEB,DISP=SHR
  17 //         DD  DSN=ACP.OBJ.INTG36.DRV,DISP=SHR
  18 //         DD  DSN=ACP.OBJ.INTG46.WEB,DISP=SHR
  19 //         DD  DSN=ACP.OBJ.INTG40.BSS,DISP=SHR
  20 //LOADMOD  DD  DSN=FSE0000.DEVP.TEST.LK,DISP=SHR
  21 //         DD  DSN=APA0000.DEVP.TEST.LK,DISP=SHR
  22 //         DD  DSN=CWEISS.LINK,DISP=SHR
  23 //         DD  DSN=ACP.DRVE.TEST.LK,DISP=SHR
  24 //         DD  DSN=ACP.LINK.RLSE46.WEB,DISP=SHR
  25 //         DD  DSN=ACP.LINK.INTG98.NBS,DISP=SHR
  26 //         DD  DSN=ACP.LINK.INTG46.WEB,DISP=SHR
  27 //         DD  DSN=ACP.LINK.INTG36.DRV,DISP=SHR
  28 //         DD  DSN=ACP.LINK.INTG40.BSS,DISP=SHR
  29 //LOADSUM  DD  DSN=&&LOADSUM,DISP=(NEW,PASS),UNIT=SYSDA,
  30 //             LRECL=133,SPACE=(TRK,(10,10)),RECFM=FBA
  31 //CPRTEMP  DD  UNIT=SYSDA,
  32 //             DSN=&&CPRTEMP,SPACE=(TRK,(100,20)),
  33 //             DCB=(RECFM=FB,BLKSIZE=4095,LRECL=4095),
  34 //             DISP=(NEW,DELETE)
  35 //PROGTEMP DD  UNIT=SYSDA,
  36 //             DSN=&&PRTEMP,SPACE=(TRK,(100,20)),
  37 //             DCB=(RECFM=FB,BLKSIZE=4095,LRECL=4095),
  38 //             DISP=(NEW,DELETE)
  39 //OUTPUT   DD  DSN=&&VRDROUT,DISP=(NEW,PASS),UNIT=SYSDA,
  40 //             DCB=(RECFM=F,BLKSIZE=4095,LRECL=4095)
  41 //SYSUDUMP DD  DUMMY
  42 //SYSABEND DD  DUMMY
  43 //SYSOUT   DD  SYSOUT=A
  44 //SYSPRINT DD  SYSOUT=A
  45 //PRINTER  DD  SYSOUT=A
  46 //CEEDUMP  DD  SYSOUT=A
  47 //SYSIN    DD  *
  48 SYSID=BSS
  49 PATVERS=NONE
  50 SALVERS=40
  51 LOADER   LOADSET  lllllll
  52 LOADER   CALL  PROG ppppvv
  53 /*
  54 //TRANSMIT EXEC PGM=IKJEFT01,
  55 //  PARM='TRANSMIT xxxxxx.xxxxxx DDNAME(SYSTSIN) NOLOG NONOTIFY SEQ'
  56 //SYSTSIN  DD  UNIT=SYSDA,
  57 //             DSN=&&VRDROUT,DISP=(OLD,DELETE)
  58 //SYSTSPRT DD  DUMMY