1!5G BLDOUTLANG(*INPUT);9(}LzIDdv?~DoT+k4(|D?
~DoT`,#g{dv?~;PNNoT,r8( BLDOUTLANG(*NONE),r8
(;{F4j6*8(xdv?~DoT#
v 9(}L#fD`kwPmDYQzD~{F
g{`kwzIK`kwPm,RZ BLDPART |nO8(K SAVLST N}#
g{ TYPE N}ODC'(e`M4f"ZI1P,g{ LANG N}O8(DoT
G *NONE,r_,g{C'(e`MG;v|,,rKN};vT#
1!5G SPLFNAME(*INPUT);`kwPmDYQzD~k}Z9(D?~,{#
I8 (`k wPm DYQ zD~ +k9 (}L zIDd v?~ ,{, 48(
SPLFNAME(*OUTPUT);zIT8(Z BLDCMD N}O(eD`k|n;a4(P
m,48( SPLFNAME(*NONE);r_,IT8(`kwPmDYQzD~+_PD
{F#(9(}L;lir#f`kwPm#)
|DC'(eoT (CHGADMLANG)
9C0|D ADM oT1(CHGADMLANG) |n4|D BLDPART |n&m_Px(
C'(e`MkoTDiOD?~D==#;Pm>G|,DI1r;PTsrI1
DC'(e`M(4,Z ADDADMTYPE |nD SYSTYPE N}O8(K *NONE)
EITZ BLDCMD N}O(e|n#
19C CHGADMLANG |n4|DVfC'(eoT1,9CIoT(e9(DNN
?~<a''#9(}L6p=oTQ|D,"aZBNTC`MD?~"v BLDPART
|n1YN9(C?~#
zX k_ P *ALLOBJ ( ^E \9 CK |n #K 5G Z0 4( C' r* m1
(CRTUSRPRF) |nD SPCAUT N}O8(D#
XhN}
Z TYPE N}O8(C'(e`M#T LANG N}ODoT8(C'(eoTD{F
r *NONE#
I!N}
IT8(BPI!N}:
v 9(}L&9CT`k_Pz8(D`MkoTDiOD?~D|n
g{ TYPE N}O8(D`MD`MkoTDiOm>f"Z OS/400 TsPD`
M,rKN};vT#
ZBPivB,Xk8( *NONE:
– g{}ZmSDoTG *NONE
– g{ Z TYPE N }O 8( DC ' (e `M f"ZT s P( x; G9C
ADDADMTYPE |nOD SYSTYPE(*NONE) r SYSTYPE(*MBR) (eD)
– g{C'(e`MG;v|,(G9C ADDADMTYPE |nOD ALWINC(*YES)
(eD)
1!5G BLDCMD(*SAME)#9C10D9(|n#1a> CHGADMLANG |n
1,*SAME ;f;*9(|n#
g{8( BLDCMD(*NONE),r;\9(C`MkoTDiO#
I8(C49(C'(e`MMoTD?~D|nV{.#|nV{.n$Io 250
vV{#;&Z|nV{.Pdk"M#
112 &CLr*"\mwC'8O