📄 loadset.jcl
字号:
//OLDRWEB JOB MSGLEVEL=1,CLASS=A,MSGCLASS=S//JOBCAT DD DSN=ICFCAT.ESAWK2,DISP=SHR/*ROUTE PRINT xxxxxx.xxxxxxx/*ROUTE PUNCH xxxxxx.xxxxxxx//TLDR EXEC PGM=TPFLDRCA,REGION=8M,// PARM='OLDR,SYS=ACP,CLMSIZE=8000000'//STEPLIB DD DSN=ACP.LINK.RLSE46.WEB,DISP=SHR// DD DSN=ACP.LINK.RLSE40.BSS,DISP=SHR// DD DSN=VIS0000.DEVP.TEST.LK,DISP=SHR// DD DSN=SYS1.CEE.SCEERUN,DISP=SHR//SALTB DD DSN=ACP.SALTBL.RLSE46.WEB,DISP=SHR// DD DSN=ACP.SALTBL.INTG46.WEB,DISP=SHR//OBJLIB DD DSN=FSE0000.DEVP.TEST.OB,DISP=SHR// DD DSN=APA0000.DEVP.TEST.OB,DISP=SHR// DD DSN=ACP.DRVE.TEST.OB,DISP=SHR// DD DSN=ACP.OBJ.RLSE46.WEB,DISP=SHR// DD DSN=ACP.OBJ.INTG36.DRV,DISP=SHR// DD DSN=ACP.OBJ.INTG46.WEB,DISP=SHR// DD DSN=ACP.OBJ.INTG40.BSS,DISP=SHR//LOADMOD DD DSN=FSE0000.DEVP.TEST.LK,DISP=SHR// DD DSN=APA0000.DEVP.TEST.LK,DISP=SHR// DD DSN=CWEISS.LINK,DISP=SHR// DD DSN=ACP.DRVE.TEST.LK,DISP=SHR// DD DSN=ACP.LINK.RLSE46.WEB,DISP=SHR// DD DSN=ACP.LINK.INTG98.NBS,DISP=SHR// DD DSN=ACP.LINK.INTG46.WEB,DISP=SHR// DD DSN=ACP.LINK.INTG36.DRV,DISP=SHR// DD DSN=ACP.LINK.INTG40.BSS,DISP=SHR//LOADSUM DD DSN=&&LOADSUM,DISP=(NEW,PASS),UNIT=SYSDA,// LRECL=133,SPACE=(TRK,(10,10)),RECFM=FBA//CPRTEMP DD UNIT=SYSDA,// DSN=&&CPRTEMP,SPACE=(TRK,(100,20)),// DCB=(RECFM=FB,BLKSIZE=4095,LRECL=4095),// DISP=(NEW,DELETE)//PROGTEMP DD UNIT=SYSDA,// DSN=&&PRTEMP,SPACE=(TRK,(100,20)),// DCB=(RECFM=FB,BLKSIZE=4095,LRECL=4095),// DISP=(NEW,DELETE)//OUTPUT DD DSN=&&VRDROUT,DISP=(NEW,PASS),UNIT=SYSDA,// DCB=(RECFM=F,BLKSIZE=4095,LRECL=4095)//SYSUDUMP DD DUMMY//SYSABEND DD DUMMY//SYSOUT DD SYSOUT=A//SYSPRINT DD SYSOUT=A//PRINTER DD SYSOUT=A//CEEDUMP DD SYSOUT=A//SYSIN DD *SYSID=BSSPATVERS=NONESALVERS=40LOADER LOADSET lllllllLOADER CALL PROG ppppvv/*//TRANSMIT EXEC PGM=IKJEFT01,// PARM='TRANSMIT xxxxxx.xxxxxx DDNAME(SYSTSIN) NOLOG NONOTIFY SEQ'//SYSTSIN DD UNIT=SYSDA,// DSN=&&VRDROUT,DISP=(OLD,DELETE)//SYSTSPRT DD DUMMY
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -