K?~, BLDPART nZ&m?~19CDyP`kwr$&mwn#K?~P 8(D?vn<TDyPI!N}9C1!5,+jP4(9(!n?~D>Z *7&hvD CRTCMOD M CRTBNDC nG}b#
XhN}'Vf;d?#bm>S}Z9(D?~IzJ1Db"4D~{MTs {#
1! BLDOPT ?~PD?v CL n<;"Mt#g{*9CX(D CL n,r9
CCHGPART
19(}L9C9(!n?~1,;liZC?~PR=DE"Do(#g{n Do(PPms,r;\9(C?~#9(!n?~D OS/400 I1`M* CLP;r K,z&19C04dk5CLr1(SEU) li?~Do(,T\b;}7X8( CL
n#PXK5CLrDji,N{ADTS for AS/400: Source Entry Utility;i#
g{k*9CzT:D$&mwrs&mw,I9C;vk?~`M`,DjE," Z9(!n?~P8(NNn#g{R=k}Z9(D?~D?~`M,{Dj E,rZCodOKP CL n,"R;xPNNo(li#ZKPbvxjED CL n.s,;"vNNd{`kwn#f;d?ZxjED CL nOG\'VD# g{"V`vT}Z9(D?~P'Dn,r9CZ;vxjEn#g{Z9( !nD~PDNNX=R=P'DxjEn,r+dCZ9(,490fPm; ^jE`kwn#
>}
g{k*9C{* PRCRPGSRC D$&mwT RPGSRC ?~ PART01 xP$&m, rIT4(9(!n?~ PART01 "mS CL n,gBy>:
RPGSRC: PRCRPGSRC OBJ(QTEMP/&ZE) SRCFILE(&L/&F) SRCMBR(&ZN)...
ZbVivB,+9C PRCRPGSRC &mw9( RPGSRC PART01,x;G9C CRTRPGPGM n,49I\QTK CL n!{"M#PRCRPGSRC G;v$&m w,&1wC CRTRPGPGM n4(}I\Q4(DPd44( RPG Lr#r
*IBM `kwa`40&CLr*"\mwAPI1Ud"a)9(E",$&mwrs &mw+:pwCJ1D`kwr9C API `49(E"#PXji,N{Z1523D :7#9(}LKb?~.dDX5;#
g{Z;P>mOR=jE,r BLDPART n+9CZB;POR=Dn#
"b,Z9(!n?~P,BLDPART n;6pxPk?~`M;`,DjEDn# (#,}KmSBN}.b,z;&Dd>}n#b\7#9(}LI&XKPC n#<52T>KyP`kwM$&mwn,b)n;4F=z4(D9(!n ?~P#
Z11B 9(&CLr 139