//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
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTSIN  DD *
  DSN SYSTEM(DD11)
  RUN PROGRAM(COBSHL) PLAN(RPDBPLAN) LIB('IFRFNS.FNETIBCH.LOAD')
  END
/*