jcl115

来自「很多人编写了cobol程序后 却不知道怎么编写编译程序,呵呵,我给大家提供几个例」· 代码 · 共 16 行

//STEP1    EXEC PGM=IKJEFT01,COND=(4,LT)
//STEPLIB  DD  DSN=DSN810.SDSNLOAD,DISP=SHR
//         DD  DSN=DSN810.SDSNEXIT,DISP=SHR
//         DD  DSN=IFRFNS.FNETIBCH.LOAD,DISP=SHR
//         DD  DSN=IFRFNS.FNETIBCH.LOAD.DBIO,DISP=SHR
//RPMDP115 DD  DSN=FNSAP06.QFILE115,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSIN  DD *
  DSN SYSTEM(DD11)
  RUN PROGRAM(RPBDP115) PLAN(IFNSAP06) LIB('IFRFNS.FNETIBCH.LOAD')
  END
/*