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

3. 9CCHGADMACN |n4(e0&CLr*"\mw1&\?~h*C49C_
PC'(e`MD?~DYw#ITZ|nV{.P9Cf;d?#Z2273D
:=<D. f;d?;hvKyPf;d?#
**CSI ?~`M(e4(Yw,8(TBZ]#
CHGADMACN TYPE(ZCSI) ACTION(*CRT) CMD('QSYS/CRTCSI CSI(&L/&ZN)')
**CSI ?~`M(e>}Yw,8(TBZ]#
CHGADMACN TYPE(ZCSI) ACTION(*DLT) CMD('QSYS/DLTCSI CSI(&L/&ZN)')
**CSI ?~`M(eF/Yw,8(TBZ]#
CHGADMACN TYPE(ZCSI) ACTION(*MOV) CMD('QSYS/MOVOBJ OBJ(&L/&ZN)
OBJTYPE(*CSI) TOLIB(&ZI)')
**CSI ?~`M(e4FYw,8(TBZ]#
CHGADMACN TYPE(ZCSI) ACTION(*CPY) CMD('QSYS/CRTDUPOBJ OBJ(&ZN)
FROMLIB(&L) OBJTYPE(*CSI) TOLIB(&ZI) NEWOBJ(&ZJ)')
**CSI ?~`M(e|DYw,8(TBZ]#
CHGADMACN TYPE(ZCSI) ACTION(*CHG) CMD('QSYS/CHGCSI CSI(&L/&ZN)')
**CSI ?~`M(eT>Yw,8(TBZ]#
CHGADMACN TYPE(ZCSI) ACTION(*DSP) CMD('QSYS/DSPCSI CSI(&L/&ZN)')
**CSI ?~`M(er!Yw,8(TBZ]#
CHGADMACN TYPE(ZCSI) ACTION(*PRT) CMD('QSYS/DSPCSI CSI(&L/&ZN)
OUTPUT(*PRINT)')
mSC'(e`MZPASSRC->}
BP=hT>gNmSC'(e`MZPASSRC#K>}Y(C'PQT0&CLr*
"\mw1&\?~tCDPASCAL `kw:
1. 9CADDADMTYPE |n4mSC'(e`M#
*(e*f"ZOS/400 4D~I1PD`MZPASSRC,8(TBZ]#
ADDADMTYPE TYPE(ZPASSRC) SYSTYPE(*MBR)
2. 9CADDADMLANG |n4*C'(e`M8(oT,TcI9(C?~#
*+oTmSAC'(e`M,8(TBZ]#
ADDADMLANG TYPE(ZPASSRC) LANG(PAS) BLDCMD('CRTPASPGM PGM(&L/&ZN)
SRCFILE(&L/&F) SRCMBR(&ZN)') BLDOUTTYPE(PGM)
BLDOUTLANG(*INPUT) SPLFNAME(*INPUT)
3. 9CCHGADMACN |n4(e0&CLr*"\mw1&\?~h*C49CC
'(e`MD?~DYw#ITZCMD N}O(eD|nV{.P9Cf;d?#
Z2273D:=<D. f;d?;hvKyPf;d?,"8>CMD N}OJm9
CD)f;d?#
K>}9CI1`MZPASSRC#CHGADMACN |nDCMD N}PQ$Hnk
KYw|n#BfD>}T>K53a)D$HnkDYw#zI\k|Db)$
HnkDYwT{OzT:Dh*#
**ZPASSRC ?~`M(e4(Yw,8(TBZ]#
Z10B&mC'(e`M117