File Edit Confirm Menu Utilities Compilers Test Help EDIT IBMMFS.MACC.MACC(DB2CICS) - 01.05 Columns 00001 - 00072 ****** ***************************** Top of Data ************************************** 000100 //DB2CICS JOB IBMMFS,'MAC',CLASS=Q,MSGCLASS=X, 000200 // NOTIFY=&SYSUID,REGION=0M 000300 //* ASSUMED THAT IPPGM = DBRM = LOAD MODULE NAME ARE SAME 000400 //PROCLIB JCLLIB ORDER='IBMMFS.PROC.DB2' 000500 //STEP1 EXEC PROC=DB2CICSC, 000600 // INLIB=IBMMFS.MACC.MACC, <= INPUT PGM PATH 000700 // SRCLIB=IBMMFS.MACC.DB2, <= INCLUDE/DCL LIB 000800 // DBRMLIB=IBMMFS.MACC.DBRM, <= DBRM SOURCE PATH 000900 // RPLLIB=IBMMFS.IBMCICS.LOAD, <= CICS LOAD LIB 001000 // MEM=PGM158 <= NAME OF IP & DBRM 001100 //LKED.SYSIN DD * 001200 INCLUDE DB2LOAD(DSNCLI,DSNHADDR) 001300 NAME PGM158(R) <= NAME OF LOAD MODULE 001400 //* ****** **************************** Bottom of Data ************************************ Command ===> SUB Scroll ===> PAGE F1=Help F3=Exit F5=Rfind F6=Rchange F12=Cancel
|