ZS R C F I L E N}O8(*f"B?~D;C#1!ivG(}8( SRCFILE(*FROMFILE) T9C<k?~D4D~{#g{k*?~f"ZX(4omD ~P,rdk4D~{F#Xb5 SRCFILE(*TYPE) 2G\'VD#b8>9C53a )D1!4D~#}g,`M* RPGSRC D?~f"Z4omD~ QRPGSRC P#Z 433Dm3PvK0&CLr*"\mw1?~`M0d`&D OS/400 1!4D~#g {`M* VRPGTXT D0, SRCFILE N}a;vT#

ZDATA N}O8(Gq*4Fkom}]D~`X*D}]#1!ivG;4F} ]#

Z+10?~Df>f;*Z0&CLr*"\mw1&\?~b?*"vDf> 1,REPLACE N}GG#PCD#K&\+Jmz9C;,Da}kZ;,ibP< k?~D;,Df>#bZ0&CLr*"\mw1&\?~D0"PfPG;I\ D#

g{8(K REPLACE(*YES),r+9C}Zf;D?~D10a}kM4D~,R SRCFILE N}+;vT#g{}Z<kD?~;GomD~,RQ-fZ,r:

vC?~+;lvA*<kDi

vC?~+;f;*<kf>

v?~+;lk

g{?~;fZZ?jiP,xGfZZ_6pDiP,rZ<kYwZdaSO _6piPlvC?~,"Z<kax1lkC?~#

9C PARTL N}8(Gqk*+<k?~mSA?~Pm?~#8( PARTL(*PRV) Jmz9CCZKn?DO;v?~Pm?~D{F(g{zG53\m1D0)#+ G,g{zG*"_D0,KN}aj6CZ8(iDO;v?~Pm?~D{F# g{9C QSECOFR C'r*mKPKn,rK5^'#PARTL N}D1!5G *NONE,8>}Z<kD?~+;amSA?~Pm?~#

BPivBXk8(?~Pm?~:

vZnO8(DiG9C PARTLREQ(*YES) 4(D

v8(D`M;G PARTL

g{Z IMPPART nO8(K?~Pm?~,r:

v?~Pm?~XkfZZS<kC?~Dip<D1!Qw76P#

v<k?~{;mSA8(?~Pm?~,g{9;fZD0#(49n4\<k C?~,2I\a"zKiv)#

g{8(D`M* PARTL,r PARTL N}a;vT#TZd{ivxT,PARTL N }a<B8(?~Pm?~B#

9C ARCHIVE N}48(}Zf;D?~Gq&i5#v18( REPLACE(*YES) R C?~G4I1?~1,KN}EPbe#PXT?~xPi5Dji,N{Z823 D:i5?~;#

ZTEXT N}O,TC?~8(hvTD>#Idkn` 80 vV{DD>#g{8( TEXT(*TEXT) D0,Chv+1!*kCTsr4I1`X*DD>#Xb5 *BLANK 8>?~;P`X*DD>#

56&CLr*"\mwC'8O

Page 68
Image 68
IBM SB84-0449-00 manual 56 &CLr*\mwC8O