K?~|,BLDPART |nZ&m?~19CDyP`kwr$&mw|n#K?~P
8(D?v|n<T|DyPI!N}9C1!5,+jP4(9(!n?~D>Z
*7&hvDCRTCMOD MCRTBNDC |nG}b#
XhN}'Vf;d?#bm>S}Z9(D?~IzJ1Db"4D~{MTs
{#
1!BLDOPT ?~PD?vCL |n<;"Mt#g{*9CX(DCL |n,r9
CCHGPART |n4`-z}Z4(D9(!n?~#S*9CD|nP}%"M(g
{(/* M*/),8(*9CD`k!n,"R;>}z;h*DyP|n#Z;v9(
!n?~P,ITPm``kwr$&mw|n#
19(}L9C9(!n?~1,|;liZC?~PR=DE"Do(#g{|n
Do(PPms,r;\9(C?~#9(!n?~DOS/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(NN|n#g{R=k}Z9(D?~D?~`M,{Dj
E,rZCodOKPCL |n,"R;xPNNo(li#ZKPbvxjEDCL
|n.s,;"vNNd{`kw|n#f;d?ZxjEDCL |nOG\'VD#
g{"V`vT}Z9(D?~P'D|n,r9CZ;vxjE|n#g{Z9(
!nD~PDNNX=R=P'DxjE|n,r+dCZ9(,49|0fPm;
^jE`kw|n#
>}
g{k*9C{*PRCRPGSRC D$&mwTRPGSRC ?~PART01 xP$&m,
rIT4(9(!n?~PART01 "mSCL |n,gBy>:
RPGSRC: PRCRPGSRC OBJ(QTEMP/&ZE) SRCFILE(&L/&F) SRCMBR(&ZN)...
ZbVivB,+9CPRCRPGSRC &mw9(RPGSRC PART01,x;G9C
CRTRPGPGM |n,49I\QTKCL |n!{"M#PRCRPGSRC G;v$&m
w,|&1wCCRTRPGPGM |n4(}|I\Q4(DPd44(RPG Lr#r
*IBM `kwa`40&CLr*"\mwAPI1Ud"a)9(E",$&mwrs
&mw+:pwCJ1D`kwr9CAPI `49(E"#PXji,N{Z1523D
:7#9(}LKb?~.dDX5;#
g{Z;P>mOR=jE,rBLDPART |n+9CZB;POR=D|n#
"b,Z9(!n?~P,BLDPART |n;6pxPk?~`M;`,DjED|n#
(#,}KmSBN}.b,z;&Dd>}|n#b\7#9(}LI&XKPC
|n#<52T>KyP`kwM$&mw|n,b)|n;4F=z4(D9(!n
?~P#
Z11B9(&CLr139