IBM SB84-0449-00 mSC'(e`MRPT->}

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(e|DYw,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`MRPT->}
BP=hT>gNmSC'(e`MRPT:
1. 9CADDADMTYPE |n4mSC'(e`M#
**RPT |,(e?~`M,8(TBZ]#
ADDADMTYPE TYPE(ZRPTINC) SYSTYPE(*MBR) DFTSRCF(QRPGSRC) ALWINC(*YES)
2. 9CADDADMLANG |n4*C'(e`M8(oT#
**RPT |,(eoT,8(TBZ]#
ADDADMLANG TYPE(ZRPTINC) LANG(RPG)
3. 9CADDADMTYPE |n4mSC'(e`M#
**RPT 4(e?~`M,8(TBZ]#
ADDADMTYPE TYPE(ZRPTSRC) SYSTYPE(*MBR) DFTSRCF(QRPGSRC)
INCLUDES(ZRPTINC)
4. 9CADDADMLANG |n4*C'(e`M8(oT,TcI4(M9(C?~#
ITZ|nV{.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