I!N}
&Z LANG N}O8(CZ ?~DoT#8(oTr_9C1!5 LANG(*DFT)#
*DFT ;f;*Q-*y4(?~D`M(eD4V83rP>DZ;VoT#g{;
h*oTD0,r8( LANG(*NONE)#(PX?~`MM`X*oTDPm,N{Z3
93Dm2#)
g { z } Z 4 ( D ? ~ ; G 4 ? ~ , } g , } Z 4 ( D G ` M *
MSGF"DTAARA"JOBD r MSGQ D?~,rIT8(Gqk*a>J1D4(|
n#Z523Dm5 P>K\0&CLr*"\mw1&\?~'VDyP OS/400 Ts
`M#
}g,g{z}Z4(;v`M* DTAARA D?~,Rz!qK PRMPT(*NO),r+
9C04(}]x1(CRTDTAARA) |n1!5#}]xG *CHAR,R$H* 256 v
VZ#Z4(}]x.s,M;\|DC}]xDtT#+T/a)dk(gTs{
Mb{)#
ZKivB,g{z!q PRMPT(*YES),r+a> CRTDTAARA |n#;\|DT
/ndDE",gTs{Mb{#}]xIT*NN`MMs!#
g{z}Z4(D?~D`M* BLDOPT,r CRTPART |n+Q53a)D BLDOPT
4I14F=KB?~D4I1P#PXb )?~DE",N {Z1383D:9C9 (
!n;#
IT*#fD~4(`M* FILE xoT* SAVF D?~#
g{z}Z4(D?~D`M* SCHPTH,r CRTPART |n+Q1!Qw76S8
(DiE=KB?~D4I1P#PXb)?~DE",N{Z993D:4(Qw7
6?~;#
g{z}Z4(D?~D`M* SCHIDX,r CRTPART |n+Cz}Z4(D?~
D{F4nd TITLE N }#g{zTK;zb,r&CZ CRTPART |nO8(
PRMPT(*YES),Tca>04(Qww}1(CRTSCHIDX) |n#
&CZ PRMCODE N}O8(zGqk*a}D?~#("GyP?~<gK;}g,
zITv(;* bT?Dx4(?~,"R;<8+|w* &CLrD?~4#f)#
g{z;rca}C?~,r!q1!5 PRMCODE(*GRP)#b+<BQ* GRP N}
O 8 ( D i x(e D a } k V d x B ? ~ # g { z ; k a } ? ~ , r ! q
PRMCODE(*NONE),Sx;\a}C?~#g{zh*iR3viDa}k,I9C
0r!n?1(PRTPRJ) |n#
K&\?~+7#y4(D?~P;fZ,xR;1G(;D#"b,PRMPART |n
OD EXTEND N}Jm9(}LPDdv?~k`X*D4?~;pa}#dv?~
Da}k* *NONE#
SRCFILE N}G8(4D~DX=,Z4D~P,?~w*44I1f"(g{JCD
0)#!q SRCFILE(*TYPE) TcTC`MD?~9CI53a)D1!4D~,r_
dkX(4D~D{F#g{z9C CRTPART r IMPPART |n44(|,?~,
R SRCFILE N}k *TYPE ;,,rXk7#C4PDD~{4^(|,?~#m3 T
>K?~`MT0ZdPf"|GD`& OS/400 1!4D~#z9IT8(f"Z4
D~I1(Z ADDADMTYPE |nO8(D SYSTYPE(*MBR))PDC'(e`MD
42 &CLr*"\mwC'8O