CHGADMACN TYPE(ZPASSRC) ACTION(*CRT) CMD('QSYS/ADDPFM FILE(&L/&F)

MBR(&ZN)')

** ZPASSRC ?~`M(e>}Yw,8(TBZ]#

CHGADMACN TYPE(ZPASSRC) ACTION(*DLT) CMD('QSYS/RMVM FILE(&L/&F)

MBR(&ZN)')

** ZPASSRC ?~`M(eF/Yw,8(TBZ]#

CHGADMACN TYPE(ZPASSRC) ACTION(*MOV) CMD(*NONE)

** ZPASSRC ?~`M(e4FYw,8(TBZ]#

CHGADMACN TYPE(ZPASSRC) ACTION(*CPY) CMD('QSYS/CPYF FROMFILE(&L/&F)

TOFILE(&ZI/&ZF) FROMMBR(&ZN) TOMBR(&ZJ) CRTFILE(*YES)

MBROPT(*REPLACE) FMTOPT(*MAP)')

** ZPASSRC ?~`M(eDYw,8(TBZ]#

CHGADMACN TYPE(ZPASSRC) ACTION(*CHG) CMD('QSYS/STRSEU SRCFILE(&L/&F)

SRCMBR(&ZN) OPTION(2)')

** ZPASSRC ?~`M(eT>Yw,8(TBZ]#

CHGADMACN TYPE(ZPASSRC) ACTION(*DSP) CMD('QSYS/STRSEU SRCFILE(&L/&F)

SRCMBR(&ZN) OPTION(5)')

** ZPASSRC ?~`M(er!Yw,8(TBZ]#

CHGADMACN TYPE(ZPASSRC) ACTION(*PRT) CMD('QSYS/STRSEU SRCFILE(&L/&F)

SRCMBR(&ZN) OPTION(6)')

mSC'(e`M RPT->}

BP=hT>gNmSC'(e`M RPT:

1.9C ADDADMTYPE n4mSC'(e`M# ** RPT ,(e?~`M,8(TBZ]#

ADDADMTYPE TYPE(ZRPTINC) SYSTYPE(*MBR) DFTSRCF(QRPGSRC) ALWINC(*YES)

2.9C ADDADMLANG n4*C'(e`M8(oT# ** RPT ,(eoT,8(TBZ]#

ADDADMLANG TYPE(ZRPTINC) LANG(RPG)

3.9C ADDADMTYPE n4mSC'(e`M# ** RPT 4(e?~`M,8(TBZ]#

ADDADMTYPE TYPE(ZRPTSRC) SYSTYPE(*MBR) DFTSRCF(QRPGSRC) INCLUDES(ZRPTINC)

4.9C ADDADMLANG n4*C'(e`M8(oT,TcI4(M9(C?~# ITZnV{.P9Cf;d?#=<D. f;d?hvKyPf;d?#

ADDADMLANG TYPE(ZRPTSRC) LANG(RPG) BLDCMD('CRTRPTPGM PGM(&L/&ZE) SRCFILE(&L/&F) SRCMBR(&ZN)') BLDOUTTYPE(PGM) BLDOUTLANG(RPG)

118&CLr*"\mwC'8O

Page 130
Image 130
IBM SB84-0449-00 manual MSCe`M RPT