?? jclcomt
字號:
//FNSAP03A JOB (DEV),'TEST',NOTIFY=FNSAP03, 00010003
// CLASS=A,MSGCLASS=X,MSGLEVEL=(1,1) 00020000
//SEARCH JCLLIB ORDER=(FNSAP03.REPORT.PGMLIB) 00030003
//COMTEST EXEC PROC=COMTEST, 00040000
// MEMBER='RPIND506', 00050004
// SRCLIB='FNSAP03.REPORT.PGMLIB' 00060003
//SYSPRINT DD SYSOUT=* 00070001
// IF ( COMTEST.COB.RC<5) THEN 00090002
// IF ( COMTEST.LKED.RC<5 ) THEN 00100002
//CPYBAT EXEC PGM=IEBCOPY,PARM='SIZE=1M' 00110001
//SYSPRINT DD SYSOUT=* 00120001
//IN1 DD DISP=SHR,DSN=FNSAP03.REPORT.PGMLIB 00130003
//OUT1 DD DISP=SHR,DSN=IFRFNS.FNETIBCH.COB 00140001
//SYSIN DD * 00150001
COPY I=IN1,O=OUT1 00160001
S MEMBER=((TEST,,R)) 00170001
//* 00180001
// ENDIF 00190001
// ENDIF 00200001
//* 00220001
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -