IBM Home Theater Server SB84 0449 00 User Manual

ꢀꢁꢂ  
iSeries  
WebSphere® *"$wR:&CLr*"\mwC'8O  
f> 5  
SB84-0449-00  
Download from Www.Somanuals.com. All Manuals Search And Download.  
ꢀꢁꢂ  
iSeries  
WebSphere® *"$wR:&CLr*"\mwC'8O  
f> 5  
SB84-0449-00  
Download from Www.Somanuals.com. All Manuals Search And Download.  
"b!  
9C>JOM|'VDz7.0,kqXDAZ2513D:"bBn;BD;cE"#  
Z 3 f(2001 j 5 B)  
Kf>JCZ IBM® WebSphere® Development Studio iSeries f(Lr 5722–WDS)Df> 5 "Pf 1 ^)f 0"0&  
CLr*"\mw1i~,T0yPsx"PfM^)f,}GBf>mP8>#>f>vJCZ0+r8n/Fc  
z1(RISC) 53#  
Kf>f; SC09-2133-01#  
(}1XD IBM® zmr IBM V?4):vfo#vfo4fEZBfx(DX7&#  
IBM 6-zavb{#IT+zDb{Dy:  
IBM Canada Ltd. Laboratory  
Information Development  
2G/KB7/1150/TOR  
1150 Eglinton Avenue East  
North York, Ontario, Canada M3C 1H7  
2IT(}+f("b:RCF Coordinator)r_TgSN=r IBM +>avb{#PX"mb{=(Dhv,N{:g  
N"mb{;#  
1zr IBM "ME"1,MZhK IBM +>G(P(,IBM IT|O*J1DNN==49CrV"b)E",x;  
Xrz:NNpN#  
© Copyright International Business Machines Corporation 1992, 2001. All rights reserved.  
Download from Www.Somanuals.com. All Manuals Search And Download.  
?<  
|
|
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
iii  
iv &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
|
?<  
v
Download from Www.Somanuals.com. All Manuals Search And Download.  
XZ>i  
&CLr*"\mw,|G0&CLr*"$_d1(ADTS) i~D;v&\?~,|  
+=czZ iSeries 400® 73P*"&CLr#dn/V*=`:\mNqM*"N  
q#>iP|,PXBP=fDE":  
v 0&CLr*"\mw1&\?~D&\  
v 0&CLr*"\mw1?~*"|n  
v 0&CLr*"\mw1\m|n  
v gN9CQw76MC'(e`M  
v gN9("bT"KP"<vMV<&CLr  
v T6L53D&CLrV"  
v 2+T"bBn  
v gN9C0`L*"\mw1(PDM) 5CLr  
v gN\m System/36&CLr  
v System/38"bBn  
v gN9C VARPG ?~  
-&9C>i  
>iG*F.4(M\m*0&CLr*"\mw1&\?~(eDn?Dn?\m  
1T0+9CK&\?~4*"&CLrD&CLr*"_`4D#  
Z9C>i.0,&l$BPwnZ]:  
v XZK&\?~D;cEn#z&1Q-DAK ADTS/400: Application Development  
Manager Introduction and Planning Guide#  
v $w>(2F*T>>)0dX~#  
v KPZ Operating System/400 (OS/400) 53OD IBM iSeries 400 53Mm~#  
v 0`L*"\mw1(PDM) 5CLr#PXK5CLrDE",N{ ADTS/400:  
Programming Development Manager#  
| Hvu~M`XE"  
|
|
9C0iSeries E"PD14w*zKb iSeries M AS/400e<uE"Dpc#zIT  
(}=V=(4CJ0E"PD1:  
|
|
|
v STB Web >cCJ:  
http://www.ibm.com/eserver/iseries/infocenter  
v Sf Operating System/400 )%;p;6D CD-ROM CJ:  
|
|
iSeries E"PD, SB84-0455-00. Km~|9|( PDF f>D iSeries Va iSeries  
E"PD:Va9E, SB84-0456-00,|C4f;0m=4b1CD-ROM#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
vii  
 
|
|
|
|
0iSeries E"PD1|,KJLrMX*wb,g CL |n"53&CLr`LSZ  
(API)"_-Vx":/"Java"TCP/IP"Web ~qM2+xg#|9|(8r`X  
IBM® l$iD4ST08rd{ IBM Web >c(}g Technical Studio M IBM w  
3)DrXx4S#  
|
|
Z2493D:DW?<;PP>Kk0&CLr*"\mw1&\?~t\`XDV  
a#  
| gN"MzDb{  
|
|
zD4!\X*,|IozRGa)n<7D"_J?DE"#IBM 6-zT>irN  
Nd{ iSeries D5"mNNb{#  
|
v g{z26(}J~"Mb{,I9CTBX7:  
|
|
|
|
|
IBM Canada Ltd. Laboratory  
Information Development  
2G/KB7/1150/TOR  
1150 Eglinton Avenue East  
North York, Ontario, Canada M3C 1H7  
|
|
g{S@zTbXxJDA_b{m,IT+Km;x1XD IBM V?r IBM z  
m,TxPJJQ6DJD#  
|
|
|
|
|
|
|
|
v g{z26(}+f"Mb{,I9CTBEk:  
1-416-448-6161  
v g{z26CgS=="Mb{,I9CTBgSJ~X7.;:  
Tb)iDb{:  
IBMLink: toribm(torrcf)  
T0iSeries E"PD1Db{:  
|
|
|
|
7#|(BPwn:  
v i{#  
v iE#  
v zDb{f0D3Erwb#  
|
y>n?  
>i9C;vyZ Payroll &CLrDy>n?45wh*4PDF.T04(IC&  
CLr*"73D=(#+G,gN5V0&CLr*"\mw1&\?~D&\!  
vZs5DXbh*Mb8"d}L,T0|F.*"D&CLrDTJ#y>n?  
(g|Z0&CLr*"\mw1bPy9CDGy);5wK;V*"!iI\I  
CD=(#  
viii &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
(e  
>i;|,Jcm#BuoGZZ;NvVDX=(eD,"RTVeVN=;vT  
>v4#*KcZN<,9Zuo>mMb*(eDw}u?B*?v(e4(Kw  
}#  
q!*zE"  
a)KBP*zE":  
v PXXFoT (CL) |nDoz  
P=V`MDozIC:OBDozM)doz#OBDozCZ5wVN#)d  
ozCZ5wT>r|nD?D#  
*i4XZ CL |nDa>A;,dkC|n,;s4 F4=a>#*i4OBDo  
z,dkC|n"+bj(;ZVNO,;s4 F1=oz#*i4)doz,1zi  
4C|nDOBDoz14 F2=)doz#  
*i4yP0&CLr*"\mw1|nDPm,dk:  
GO CMDADM  
*i4kn?`XD0&CLr*"\mw1|nDPm,dk:  
GO CMDPRJ  
*i4ki`XD0&CLr*"\mw1|nDPm,dk:  
GO CMDGRP  
*i4k?~`XD0&CLr*"\mw1|nDPm,dk:  
GO CMDPART  
v 0`L*"\mw1A;Doz  
*i4OBDoz,+bj(;ZVNO,;s4 F1=oz#*i4)doz,IT  
+bj(;ZOBDozICDxr.b,;s4 F1=oz;2ITZi4OBDo  
z14 F2=)doz#  
XZ>i ix  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
x
&CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Z1B &CLr*"\mw&\?~i\  
|
|
|
|
|
0&CLr*"\mw1G0&CLr*"$_d1i~D;v&\?~,*Z iSeries  
400 73P$wD&CLr*"_a)K;VzF,9{GITZ{v&CLrP'Z  
ZP'XM_'X\m&CLrTs#K&\?~P=V`MDC':n?\m1M  
&CLr*"_#n?\m1G:p(en?cNa9MGGC'DK1#&CLr  
*"_G9C0&CLr*"\mw1&\?~4*"&CLri~D&CLr1#  
>Ba)KXZBPwbDE":  
v n?\mDEv  
v ?~*"DEv  
v &CLr*"73  
v CZ&CLr*"D$_  
n?\mDEv  
*K9i/rs59CK&\?~,3vK1(ZKivP*n?\m1)XkZ  
0&CLr*"\mw173P4(n?0dr\#4(n?DK14T/I*Cn  
?D\m1,R_PZCn?P4(iMGGC'DX*(^#iG*"}LP&Z  
,;WND?~D/O#|m>*b,d(^I0&CLr*"\mw1&\?~X  
F#n?cNa9Gi/I;)c(?;cm>*"}LPD;vWN)DiD/  
O#  
\m1("K&CLrr\,T9d{K1Z(en?cNa91xP$w#*4(  
_'DcNa9,n?\m1XkG#Kb0&CLr*"\mw1&\?~#m  
b,{9Xk_PXZ+&ZK&\?~XF.BDE"Ds?*6#n?\m19  
XkKbi/Z*"M,$&CLr1yq-D}L#mb,_PYw53M535  
CLr-iG\X*D#  
n?\m1DG+  
n?\m1DG+Mn/D6'GIZn?cNa9P\mD&CLr7(D#WN  
9CK&\?~Dn?\m1(#+4PZ23D<1P5wDev=hTcC&CL  
r*"_Z0&CLr*"\mw173P*<{GD$w#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
1
 
< 1. *<9CK&\?~yhDevy>=h  
mb,n?\m1DG+I\9h*:  
v Zn?cNa9Pa}n?D*X,}g,SbTca}=wc  
v bT&CLr  
v +&CLrS0&CLr*"\mw173cNa9<v=zzrbT73  
v Z53JO.sXUn?cNa9E"  
v *"&CLrD?~ri~  
NNC'<IT4(n?#d1n?\m1DK1DC'r*m;h*Xb(^#4  
(n?DK1+T/I*Cn?Dn?\m1#;vn?DZ(n?\m1;a9T  
/_Pd1d{NNn?Dn?\m1D(^#xGI?vn?Dn?\m1+NN  
,BGG*n?\m1#ZyPn?P,C'r*m QSECOFR 5JOGG*n?\m  
1#4,QSECOFR ;1wyPn?PDn?\m1,x;\ QSECOFR Gqrwn?  
xPKGG#  
n?\m1DG+k&CLr*"_DG+2G;,D#n?\m1Tn?PDNN  
Z]<_P|BCJ(,x&CLr*"_;TX(D$wxri_P|BCJ(,  
g\m1yZ(DGy#;GZ&CLr*"n/D*<MjI1ExPy>D\m  
Nq,xZ{v*"\ZP<*xP*"Nq#"R,y]n?6'M*"!if#  
D;,,n?\m19I\ad1&CLr*"_#9*"b,n?\m1;h*G  
53\m1#Z iSeries 400 OBDP,53\m1:pk\m{v53PXDwn$  
w#  
2
&CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
?~*"DEv  
&CLr*"MGT&CLrxP`k"`k"KP"wTMbT#&CLr*"_  
IT9C0&CLr*"\mw1&\?~44Pb)Nq#K&\?~a)K;v  
r\,ITZdP\miI&CLrD?~D*"#?~G;vTs(gD~rL  
r),r_G|, RPG LrD RPG/400® zkD4I1#?~_P53a)D`M(g  
RPGSRC"RPGINC"PGM r FILE),r_zIT9C0mS ADM `M1  
(ADDADMTYPE) |n4(ezT:D`M#?~9IT_PI53a)DoT(g  
RPG r SQLRPG),"RzIT9C ADDADMLANG |n4*C'(e?~`M(  
ezT:DoT#  
XkHfZn?cNa9,;s*"_E\9C0&CLr*"\mw1&\?~4  
4P?~*"Nq#*"_9XkZn?PxPGG"Ti_P|B(^#yPb)  
<GIn?\m14i/D#  
1?~h*|B1,*"_Xk+?~lv={GTd_P|BCJ(DiP#*l  
v?~,C?~DJ1f>;4F=*"_DiP,g{h*D0,9*xPx(,  
T@9d{*"_|D|#1jIT?~D|B1,*"_a+C?~S{/}D*  
"iPa}=d8iP#  
ZNN1r,Z;vn?P<ITfZ;v?~D`vf>#}g,1&CLrZ;  
vf>D$wjI.s,n?\m1MITrn?cNa9PmSi,Tc*"_I  
T*<*"&CLrDZ~vf>#  
k4("|Dr>}0&CLr*"\mw1n?"iM?~`X*DyPNq<&  
C9C0&CLr*"\mw1SZ4jI#b)SZ|( CL |n"0`L*"\m  
w1A;,T0 WRKPRJPDM"WRKGRPPDM M WRKPARTPDM |n#g{\m  
1r*"_9Cd{SZ4|Dr4(0&CLr*"\mw1E",ra{+;I  
$O#9(}LI\;\6pv?~Q|D,SxI\;\XB`kr&m|#b+  
<Bw?~kd`&TsMI1.dD;;BT#  
;\ZzTd_P|BCJ(DirbP|D?~#g{zv(Z0&CLr*"\  
mw173.b|D?~,r CHGPARTINF |n+|BC?~DZ?E"#  
&CLr*"_DG+  
K&\?~9z\;Z\X73P*";,?~Df>#mb,`v*"_2IT,  
1|B&CLrD?~#K&\?~I7#I;v*"_ywD|D;akm;v*  
"_ywD|D"ze;#?~D9((`k)GT/xPD#  
&CLr*"_4PDy>NqG:  
v 4(B?~;SK&\?~DX~Z4F?~,r_(}SdX~b?<k?~4  
4F|G;T0|D?~  
v 9CX(D9(6'49(?~,9(Qw76,T09(!n  
v Zn?cNa9P+?~a}  
v Z0&CLr*"\mw173ZbT&CLrD?~,r_(}+?~<vAb  
Tb4Z73b?bT?~  
Z1B &CLr*"\mw&\?~i\  
Download from Www.Somanuals.com. All Manuals Search And Download.  
3
 
&CLr*"73  
<2 +Z0&CLr*"\mw1&\?~XF.BD&CLr*"kZK&\?~D  
XF.bD&CLr*"xPHO#<PwrDwL5wK(#zIgN4(4z  
k"`-|,;s`k|#<ms_T>Kz9CD0&CLr*"\mw1?~*  
"|n#g{z;ZK&\?~DXF.B*"?~,r<mR_T>Kz9CD  
OS/400 |n#  
< 2. &CLr*"73  
&CLr*"D$_  
I9CBPNN;vSZ4CJ0&CLr*"\mw1&\?~PD&\:  
|
|
|
|
|
|
v OS/400 |nPPDXFoT (CL) |n  
v 0&CLr*"$_d1i~D0`L*"\mw1(PDM) 5CLr  
v 0&CLr*"$_d1i~D0&CLrVd~q1&\?~  
v iSeries z7D0WebSphere *"$_1  
v IBM CoOperative Development Environment/400 ( CODE/400) i~  
v VisualAge® RPG $w>$_  
9C&CLr*"$_d5CLr  
IT(}9C0`L*"\mw1(PDM) 5CLrr_9C|nPPD0&CLr*"  
\mw1XFoT (CL) |n44P\mNqM*"Nq#Z>iP,?v|nDZ;  
v>}<T>K CL |n0dZ9C0`L*"\mw15CLr1*q-DH[=  
h#=<A. &CLr*"\mwXFoT|n a)Kb) CL |nDj{Pm#  
IT9CBP PDM A;44Pb)\mNqM*"Nq:  
C PDM 49Cn?  
C PDM 49Ci  
C PDM 49C?~  
4
&CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
PX PDM 5CLrDEv,N{Z16B 9C`L*"\mw5CLr#  
P8vdO0&CLr*"\mw1&\?~9CDd{ Application Development  
ToolSet/400 5CLr#b)5CLr|(04u?5CLr1(SEU)"0A;hF(z1  
(SDA)"0(f<V5CLr1 (RLU)"0}]D~5CLr1(DFU)"0D~HOkO  
" 5 C L r 1 F C M U ) # S 0 C P D M 4 9 C ? ~ 1 A ; O D ! n M I C J  
SEU"SDA"RLU M DFU#  
PXb)5CLrD Application Development ToolSet/400 vfoDPm,N{DW?  
<#  
9C&CLrVd~q&\?~  
0&CLrVd~q1G0&CLr*"$_d1i~D;v&\?~#0&CLr  
Vd~q1&\?~G;v'{Vv$_,ITC4@@T&CLrD1Z|DD'  
{#  
g{z}Z9C0&CLrVd~q1&\?~,r9ITCJ0&CLr*"\m  
w1&\?~*zD&CLr*"73a)D&\#  
IT(}BP=V=(.;4CJ0&CLr*"\mw1?~:  
1. 8(zkZ Start AppDict Services/400 (STRADS) A;O9C0&CLr*"\m  
w1  
2. 8(zkZ09CVd1A;O9C0&CLr*"\mw1#  
PX Application Dictionary Services/400 vfoDPm,N{DW?<#  
9C0WebSphere *"$_1z7  
0WebSphere *"$_1z7|(BP$w>$_:  
v CODE/400  
v VisualAge RPG  
|
|
|
v WebSphere Studio iSeries f  
v VisualAge for Java iSeries f  
v IBM Distributed Debugger  
PX`XvfoDPm,N{DW?<#  
9C CODE/400 $_  
IT9C CODE/400 `-w"0LrzIw1r0n?i/w1.;4(}9C<NC  
'gfCJb"D~MI1r_0&CLr*"\mw1n?"i0?~#  
CODE/400 D0zkhFw1i~Jmzr*M9( DDSSRC ?~#xR,IT9C  
0wT$_1i~4wTLr?~#  
PX CODE/400 vfoDPm,N{DW?<#  
CODE/400 `-w  
CODE/400 `-wJmz9C<NC'gf4!q0&CLr*"\mw1?~#  
*CJ0&CLr*"\mw1?~:  
Z1B &CLr*"\mw&\?~i\  
Download from Www.Somanuals.com. All Manuals Search And Download.  
5
 
1. +w CODE/400 `-w<j#  
2. SD~K%P!qr*#  
3. 0r*10ZvV,ITZK0ZP!q0&CLr*"\mw1?~#  
LrzIw  
CODE/4000LrzIw19z\;9(0&CLr*"\mw1?~#  
*9(0&CLr*"\mw1?~:  
1. +w CODE/4000LrzIw1<j#  
2. 0LrzIw10ZvV,ITZK0ZP!q*9(D0&CLr*"\mw1  
?~#  
": N<kh*T BLDOPT D~wDX*|DPXD CODE/400 *zE",TctC  
CODE/400 ms4!M0wT$_1#  
|
|
|
|
n?i/w  
CODE0n?i/w1G;v&\?sD$_,|9z\;9C$w>4`-"i$"  
`kMwT&CLr#|9z\;9C@fOD OS/400 Ts#zIT9CfrTsD  
C'gf4&mb"D~"I1r0&CLr*"\mw1n?"iM?~#  
9C VisualAge RPG $w>$_  
VisualAge RPG (VARPG) $w>$_* VARPG &CLr1a)K;V*"73,9  
{GITZ_PwzSZD$w>O*"",$Mi5{GDIS&CLr#  
0&CLr*"\mw1&\?~9z\;Zwz53Of"M\m0&CLr*"  
\mw1n?PD VisualAge RPG &CLr#PXji,N{Z2093D:Z17B 9  
PX VisualAge RPG vfoDPm,N{DW?<#  
6
&CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z2B 9Cn?  
Z0&CLr*"\mw173P,&CLr;F*n?#n?GI&CLrDyP  
`Xi~iID#x;[|G&ZD;*"WN#rK,n?;G OS/400 Ts#|G  
f"Zb(i)PD;i OS/400 Ts(?~)#  
n?0dPDi*&CLr*"(en?cNa9#0&CLr*"\mw1&\?  
~9Cn?cNa947(d|nyhDNNbPmDNr#PXn?cNa9T0  
0&CLr*"\mw1|ngNR=CcNa9PD?~Dji,N{Z3B 9Cn  
>Ba)KXZBPwbDE":  
v 4(n?  
v T>n?DPm  
v |Dn?  
v r!XZn?DE"  
v >}n?  
v C0`L*"\mw15CLr49Cn?  
z&C()1d4DA ADTS/400: Application Development Manager Introduction and  
Planning Guide ;Z,|V[KzZ*<4(n?.0&C<GD;)Bn#  
4(n? (CRTPRJ)  
*9C0&CLr*"\mw1&\?~,Xk4(n?#9C04(n?1  
(CRTPRJ) |n44PCNq#  
NNC'<IT4(n?#;)z4(Kn?,zMI*Cn?Dn?\m1,IT  
CyP\m|n49C|#zITmSd{n?\m1#C'r*m QSECOFR GyP  
n?D\m1#  
"
(i*zD?v&CLr<4(%@D0&CLr*"\mw1n?,x*TZ  
8v&CLr*+2DNN?~4(m;vn?#9C%@Dn?+a_0C  
PDM 49C?~1A;DT\,"R+9z\|CXXF&CLr#  
4(n?1,zIT!qGqk*ZXB9(omD~1T/#fMV4omD~P  
DbT}]#KN}D1!5G SAVDTA(*YES)#9(}L+Z9(.0#fbT}  
],xZXB9(omD~.sV4b)}]#g{z8( SAVDTA(*NO),rZXB  
9(omD~1zD}]a;>}#  
4(n?1,zITZ TEXT N}Oa)n?hv#}g,zI\k*Zkn?`X*  
DD>Pj6&CLrD{FM?D#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
7
 
>}  
K>}5wgN4(;vF* PAYROLL Dn?,dn?rF* PAY#n?rFn$  
IT* 4 vV{,C4*n?PDi4((;Db{#komD~`X*DNN}]G  
ZxP9(}L1#fMV4D#g TEXT N}yv,PAYROLL n?G;v?\  
Payroll &m&CLr#  
9C CRTPRJ |n  
CRTPRJ PRJ(PAYROLL)SHORTPRJ(PAY)SAVDTA(*YES)  
TEXT('WEEKLY PAYROLL PROCESSING APPLICATION')  
9C0`L*"\mw15CLr  
40C PDM 49Cn?1A;OD0F6=4(1#  
9Cn?  
IT(}1SZNN|nPOdk CL |n49Cn?#9ITZ CL Lr"REXX }  
L P 9 C | n , r _ ( }  
Q C M D E X C  
4 9 C | n # n ? | n *  
CRTPRJ"QRYPRJ"CHGPRJ"PRTPRJ M DLTPRJ#  
9IT(}9C0C PDM 49Cn?1A;4(}0`L*"\mw15CLr9C  
n?#  
}Kb)n?|n.b,K&\?~9'V0XUn?1(RCLPRJ) |n#K|nbvK  
Z"z53JOr_n?\m|nl#ax.sn?PyfZDNN;;BT#PX  
T>yPn? (QRYPRJ)  
9C0i/n?1(QRYPRJ) |n4q!zZ53OGGDyPn?DPm#KPmO  
+;vVzP(A!r|BDn?#  
9IT9CK|n4i$GqI&4(Kn?,r_C47(GqNNn?r53J  
Oxp5rdC;;B#PXV4n?DE",N{Z1753D:Z15B #$&CLr  
9C OUTPUT N}4T>&C+dv<rN&#1!5*+(fYQzT)r!,  
OUTPUT(*PRINT)#  
>}  
<3 5wK1zdkTB|n1YQzD~Db[:  
QRYPRJ OUTPUT(*PRINT)  
5722WDS V5R1M0  
&CLr*"\mw - i/n?  
05/08/01  
11:59:48  
3f . . : 0001  
DBCS #f  
rF }] }] D>  
n?  
QF5  
PAYROLL  
PAY  
q
G
?\ Payroll &m&CLr  
q
* * * * * P m a x * * * * *  
< 3. I QRYPRJ |nzIDYQzD~Dy>  
8
&CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
mb,IT(}8( OUTPUT(*OUTFILE) 4+dv<r3vdvD~#dvD~DG  
<q=kZb QADM PI53a)D}]bD~ QALYQPRJ Py9CDG<q=`  
,#  
>}  
bPmC47(ZN&f"F* OUTFILE DdvD~,D~PDZ;vI1+SUd  
v#  
QRYPRJ OUTPUT(*OUTFILE)OUTFILE(*LIBL/OUTFILE)OUTMBR(*FIRST)  
|Dn? (CHGPRJ)  
9C0|Dn?1(CHGPRJ) |n4|Dkn?`X*DD>,r_|D1Zn?PX  
B9(omD~1Gqk*T/#fMV4zDbT}]#;Pn?\m1E\9C  
K|n#  
g{z8( SAVDTA(*YES),r9(}L+Z9(.0#fbT}],xZXB9(o  
mD~.sV4b)}]#  
>}  
*|Dk PAYROLL n?`X*DhvTD>,dkTB|n:  
9C CHGPRJ |n  
CHGPRJ PRJ(PAYROLL)SAVDTA(*SAME)TEXT('BIWEEKLY PAYROLL  
PROCESSING APPLICATION')  
9C0`L*"\mw15CLr  
Z0C PDM 49Cn?1A;O!q!n 2(|D)#  
K|n+;a|DNNGGE"r_|D-TKn?_P(^#*|DGGE",9  
C CHGPRJUSR |n,gZ293D:|DC'GGE" (CHGPRJUSR);;ZPyv#  
r!XZn?DE" (PRTPRJ)  
9C0r!n?1(PRTPRJ) |n4i4n?DXwMn?cNa9ZDwvi#ITZ  
4(n?cNa9.s9CK|n4i$a}76#n?\m1M&CLr*"_<  
IT9CK|n#  
XkZ PRTPRJ |nD PRJ N}O8(zQGGDn?D{F#  
OUTPUT N}D1!5 OUTPUT(*PRINT) +9(fYQzT)r!#  
(fT>K PARTL Xh5,C58>iGq*sZ|D"4(ra}?~1<&xv  
-r#5 Y 8>Xkxv-r#  
>}  
K>}5wgN4(Z103D<4PyT>Dy>(f#  
9C PRTPRJ |n  
PRTPRJ PRJ(PAYROLL)OUTPUT(*PRINT)  
9C0`L*"\mw15CLr  
Z2B 9Cn?  
9
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
S0C PDM 49Cn?1A;O!q!n 6(r!)#  
5722WDS V5R1M0  
&CLr*"\mw  
- r!n? 05/08/01  
13:37:40  
3f . . : 0001  
n? . . . . . . . . . . . . . . . : PAYROLL  
n?rF. . . . . . . . . . . . . . . : PAY  
DBCS }] . . . . . . . . . . . . . . :  
#fomD~}]. . . . . . . . . . . :  
q
G
D> . . . . . . . . . . . . . . . . : ?\ Payroll &m&CLr  
PARTL  
ks D>  
6p  
01  
i
MASTER  
TEST  
DEVELOPER1  
DEVELOPER2  
rF a}k  
MAST MASTER  
(*  
*NONE  
*NONE  
*NONE  
*NONE  
N
N
N
N
PAYROLL n?D MASTER i(y)#  
02  
TST  
MASTER  
PAYROLL n?D TEST i#  
03  
03  
DEV1 MASTER  
DEV1 MASTER  
* * * * * P m a x * * * * *  
PAYROLL n?D DEVELOPER1 i#  
PAYROLL n?D DEVELOPER2 i#  
< 4. I PRTPRJ |nzIDYQzD~Dy>  
?viDcN8>{ozz7(n?cNa9#KcN8>{D?DGC4{wn?  
ZwviDcNa9TJ#<5 Pm>KK(fPhvDn?cNa9#  
MASTER  
MASTER  
MASTER  
TEST  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
< 5. PRTPRJ (fPhvDn?cNa9  
<5 My>(f<5wK;v_PDvixdcNa9P}cDn?#P>Z(fPD  
0vVZ?vrbfO=DJ MASTER m>*b)i(eDa}k#  
mb,IT(}8( OUTPUT(*OUTFILE) 4+dv<r3vdvD~#dvD~DG  
<q=kZb QADM PI53a)D}]bD~ QALYPPRJ Py9CDG<q=`  
,#  
>}  
bPmC47(ZN&f"F* OUTFILE DdvD~,D~PDZ;vI1+SUd  
v#  
PRTPRJ PRJ(PAYROLL)OUTPUT(*OUTFILE)OUTFILE(*LIBL/OUTFILE)  
OUTMBR(*FIRST)  
10 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
>}n? (DLTPRJ)  
9C0>}n?1(DLTPRJ) |n4S0&CLr*"\mw1&\?~P>}{vn  
?#>}n?1,n?ZDyPiT0wiPDyP?~<a;>},49*"_}  
ZG)iP$w#;Pn?\m1E\>}n?#  
XkZ PRJ N}O8(n?{#  
"
1>}n?1,i5bT0ib<a;>}#Z0&CLr*"\mw1&\?  
~b?4(Db2a;>}(g{|D{FGn?PdP;viDP'i5b{  
D0)#v1yP_G QPRJOWN 1Ea>}i5bMib,qr,+"v/f#  
PXP'i5b{Dhv,N{Z823D:i5?~;#  
>}  
K>}5wgNS53P}%n? PAYROLL#  
9C DLTPRJ |n  
DLTPRJ PRJ(PAYROLL)  
9C0`L*"\mw15CLr  
Z0C PDM 49Cn?1A;O!q!n 4(>})#  
1z9C!n 4 1,0`L*"\mw15CLraa);v7OA;#g{1SS|  
nP9CK|n,M;arz"v/f#  
Z2B 9Cn? 11  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
12 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Z3B 9Cn?cNa9PDi  
(#,;vn?I`viiI#n?ZD?vi<m>&CLrPzkD;vf>r  
cN#  
}g,F* MASTER DiIm>{v&CLrDnBf>#m;vi TEST Im>T  
;ZbTDlOZ;pDQ|D04|Dzk#KiGZn?cNa9PDi MASTER  
Bf4(D,g<6Py>#  
MASTER  
TEST  
< 6. _P=viDn?cNa9  
n?cNa9j6KQw76#Qw76GwiDEP,|7(1Zn?cNa9P  
iR?~1,0&CLr*"\mw1&\?~QwwviyICDNr#1Zi TEST  
P$w1,+WH9CZCiPR=D?~,r*|Gm>&CLrP?~DnB|  
Df>#4Zi TEST PR=DNN&CLr?~<Zi MASTER PiR#PXQw  
76Dji,N{Z9B 9CQw76#  
>Ba)KXZBPwbDE":  
v 4(i  
v 4(n?cNa9  
v |Di  
v >}i  
v C0`L*"\mw15CLr49Ci  
v 2m*"i  
v Tn?MiGG*"_M\m1  
v 9Cn?C'|n  
v 4(y>n?cNa9  
z&C()1d4DA ADTS/400: Application Development Manager Introduction and  
Planning Guide ;Z,|P>KzZ*<(en?PDi.0&C<GD;)Bn#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
13  
 
4(i (CRTGRP)  
9C04(i1(CRTGRP) |n4*n?4(i#;\ZQ4(n?.sE\4PKY  
w,"RzXkGCn?Dn?\m1E\9CK|n#PXji,N{Z73D:4  
1z4(i1,Xk*|a)=v{F:;vCZZyPki`XD CL |nP9CD  
i,m;vGIevV{iIDrF#KrFkn?rFiOp4,*n?PD?v  
i4(;v(;{F#PXgN|{iDE",N{=<C. |{fr#  
XkZ PARENT N}O8(;v5,E\("n?cNa9Pwi.dDX5#1z  
}Z4(n?cNa9PDZ;vi1,zXk8(Xb5 *NONE,r*Ci;P8  
i#8iMGn?cNa9V'P1S;Zm;viOfDi#1WN4(n?cN  
a91,z;&|Da}k5#1!5* *PARENT#g{z}Z4(n?cNa9P  
DZ~vrsxDi,rXk8(Ci&ZdBD8iD{F#  
`kV{/j6{ (CCSID) ITk CCSID N}ODi`X*#Kj6{*iPf"D  
?~7(V{/j6{#1! CCSID 5 *PARENT 9Ck8i`X*D CCSID#g  
{z}Z4(n?cNa9PDZ;vi,rkw5`X*D CCSID +d11!5#  
IT(}8( *JOB 48>*9CkKP CRTGRP |nDxLrw5`,D CCSID,  
r_(}8( *HEX 48>z;k*;4?~PD}];r_zITdk;v 1 =  
65535 .dD{}54j6X(D CCSID#PXZ'V`VzRoTD&CLrPgN  
9C CCSID DE",N{Z2423D:Kb CCSID;#  
9C NOTIFY N}4(*KG:Zn?cNa9D;vV'PfZD3v?~}Z;  
CHKOUTPART |nlv=,;n?cNa9Dm;V'PD3viP#PXKN}D  
IT|DiD PARTLREQ N}#PARTLREQ N}8(1ZKiP|D?~1Gqh  
* PARTL {F#t*X(i8(K *YES,r19C?~*"|nR+Kiw*?j  
i1,Xkxv-r#  
4(i1,ITZ TEXT N}OhvCim>n?PDDvWN#  
n?iMbPm  
OS/400 Yw53+bPmDC'?V^F* 25 vb#Zn?cNa9PD?v0n?  
-i1T,w*Qw76D;?V,<m>;vb#n?cNa9P?vQw76P  
Di}\bPm^F,;(;\,} 25 v#+G,z;+I\Z;vQw76Ph*  
`Z 10 vi#PXgNiOn?{Mi{4NI(;b{DE",N{=<C. |{f  
r#  
4(n?cNa9  
y]wviZn?cNa9PD;C4x;=+iV`#yiZNNcNa9P<G  
Z;vir_n%?Di#?vn?cNa9<;\P;vyi#(#,yiMG|  
,nHjI"|BMbTD&CLrf>Di#yi(#9Gz+VfD&CLr<  
kADi#  
14 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
>}  
K>}5wgNZn? PAYROLL P4(i MASTER#<7 m>*4(DcNa9#  
Z PARENT N}O8( *NONE,Tcr0&CLr*"\mw1&\?~8>  
MASTER Gyi#  
9C CRTGRP |n  
CRTGRP PRJ(PAYROLL)GRP(MASTER)SHORTGRP(MST)PARENT(*NONE)  
TEXT('MASTER GROUP IN PROJECT PAYROLL')  
9C0`L*"\mw15CLr  
Z0C PDM 49Ci1A;O40F6=4(1#  
MASTER  
< 7. _Pi MASTER Dn? PAYROLL  
*Zn?cNa9P4(Z~vc,IZB;viD PARENT N}O8( MASTER#  
>}  
TB|n+Zn? PAYROLL P4(i TEST,g<8Pyv#  
CRTGRP PRJ(PAYROLL)GRP(TEST)SHORTGRP(TST)PARENT(MASTER)  
TEXT('TEST GROUP IN PROJECT PAYROLL')  
MASTER  
TEST  
< 8. _P=viDn? PAYROLL  
r*n?cNa9_Pi MASTER M TEST,yTzh*(e;)i,9C*"_I  
TZdP4P?~*"Nq#*"iMGn?cNa9PjI?~*"Di#  
*"n/(g4(?~"lkrlv?~,T0|Dra}?~H)nC&CZn?  
cNa9DW?r_cNnMDiPxP#;&**"_a)Tng TEST M MASTER  
.`DiD|BCJ(#;PZ|DMbT?~.s,E&ZcNa9Pa}|G,  
TckSd{iPa}D?~;pYNxPbT,T7#yPi~Z;p}7X$  
w#rK,n?cNa9PO_cND?~*Hn?cNa9POMcNDiPG)  
Z3B 9Cn?cNa9PDi 15  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
?~H(#d{"bBnG,g{*"_Tn?cNa9DPdiP?~D1>xP  
K|D,rtm;*"_S|McNDia},;?~,G4ITf;byD|D#  
v1xTX*1E&xPbV|D,"R,g{*#f|D,r9&`&X|DcN  
a9POMcND`,?~D1>#  
zI\kTbye~Xj6|GD*"i8({F#b){FITGZCiP$wD  
K1DC'r*m{,r_G|U(D{F,g DEVELOPER1 r DEVELOPER2#  
>}  
BP|n+Zn? PAYROLL P4(=v*"i,*"_ITZdPxP?~*"n  
/#  
CRTGRP PRJ(PAYROLL)GRP(DEVELOPER1)SHORTGRP(DEV1)PARENT(TEST)  
TEXT('DEVELOPER1 GROUP IN PROJECT PAYROLL')  
CRTGRP PRJ(PAYROLL)GRP(DEVELOPER2)SHORTGRP(DEV2)PARENT(TEST)  
TEXT('DEVELOPER2 GROUP IN PROJECT PAYROLL')  
<9m>n? PAYROLL _PDvi,gyvVDGy#  
MASTER  
TEST  
DEVELOPER1  
DEVELOPER2  
< 9. _PDviD Payroll n?  
g{zk7#&CLr;9(r_<8C<vA TEST i,rzITZ TEST ik*  
"i.d4(;vi,}g,CiC4|,*"$wQjIDG)?~#IT+Ki  
F* INTEGRATION#4(KiD?DGZ#t&CLrbTf>D,1,Jm*"_  
SKiPlv?~,r_+?~a}=KiP#  
*n?cNa9(e;va}k  
IZ?~GZn?cNa9P*"D,rK,Xa}76;N;\+;v?~iSc  
NOMDia}AcNO_Di#a}76GZ|,Xka}D?~DikT?~D  
$wjI1nU+|,?~Di.dDwviDEP#  
16 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
n?cNa9Da}76GIzZ4(i1Z PRMCODE N}O8(Da}k7(D#  
a}kj6IT+?~a}ADi#KiF*?ji#a}76XF?~Zn?cN  
a9PI;a}DLH#  
1z4(yi+4Z PRMCODE N}O8(51,CiDa}k+1!hC*i{#  
0&CLr*"\mw1&\?~(} PARENT N}OD57(z}Z4(DiGq  
Gyi#  
1z4(;GyiDi1,PRMCODE N}D1!5+<BBikZ PARENT N}O  
8(Di_P`,Da}k#  
n? PAYROLL D;va}76G(}S\ CRTGRP |nD PRMCODE N}D1!  
544(D#ZK>}P,Z*"iP*"D?~nUI;a}Ai MASTER,;Na  
};c#zTz}ZSda}DiXk_P|BCJ(#  
IT8(*dk CRTGRP |nODi`X*Da}kD{F#PXgN|{a}kD  
E",N{=<C. |{fr#ZB;v>}P,BPN;|n+4(a}k* MASTER  
Di TEST#  
>}  
ZZ;v>}P,9CDG1!a}k,xZZ~v>}P,8(Ka}k#r*8  
iDa}kG MASTER,yT TEST iDa}k2G MASTER#  
CRTGRP PRJ(PAYROLL)GRP(TEST)SHORTGRP(TST)PARENT(MASTER)  
TEXT('TEST GROUP IN PROJECT PAYROLL')  
CRTGRP PRJ(PAYROLL)GRP(TEST)SHORTGRP(TST)PARENT(MASTER)  
PRMCODE(MASTER)TEXT('TEST GROUP IN PROJECT PAYROLL')  
MASTER  
MASTER  
MASTER  
TEST  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
< 10. _Pa}k MASTER D Payroll n?  
Z3B 9Cn?cNa9PDi 17  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
g{Zn?cNa9P;P;v&CLrf>,r_g{z}Z*<BD&CLr*  
"n/,rn?;P;va}kGP'D#g{zDi/Xk,$;vVf&CLr  
f>,,1|B,;&CLrDm;f>,rZn?cNa9ZI\h*8va}  
k#  
9ln?cNa9  
n?cNa9Z;N1d.sI|DTcJ&}v&CLrf>D*"$w#}g,  
1Z;v&CLrf>D$wjI1,MIT*<*"&CLrDZ~vf>#x  
R,I\h*Z;vf>D*"$w4,$&CLr#<11 T>KbyD;vn?cN  
a9#  
1Z;vf>D$wjI1,n?cNa9D V1 V'PD?~;a}Ai  
V1MASTER#V1FIX iG*I\XhTi V1MASTER PD?~wD^}x4(D#  
VZIT*<*"&CLrDZ~vf>K#n?\m1rn?cNa9mSBDV  
',CcNa9Ii V2MASTER"V2TEST"DEVELOPER3 M DEVELOPER4 iI,  
yPiDa}k<* V2#  
< 11. _P}va}kD Payroll n?  
a}k  
(e;vn?cNa9ZD8va}kk(e;va}kD=(G`,D#ITZ  
CRTGRP |nO9C PRMCODE N}4*i(ea}k#n?cNa9PwviDa  
}kDiOM9IKa}76#  
18 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
>}: BP CL |nP1C44(;v_PyviM}va}kDn?cNa9,g  
Z183D<11Py>#ZK>}P,Y(Q-9C CRTPRJ |n4(Kn?#Kn?c  
Na9Y(Z;v&CLrf>D$wQjI,RQ+yP?~a}Ai V1MASTER#  
KcNa9#tZ;v&CLrf>,x,1Jm(}lvh*|DA V1FIX iPD  
?~4TKf>xP^}#|9Jm|D&CLrDZ~vf>#  
CRTGRP PRJ(PAYROLL)GRP(V1MASTER)SHORTGRP(V1MST)PARENT(*NONE)  
TEXT('VERSION 1 GROUP IN PROJECT PAYROLL')  
CRTGRP PRJ(PAYROLL)GRP(V1FIX)SHORTGRP(V1F)PARENT(V1MASTER)PRMCODE(V1FIX)  
TEXT('VERSION 1 FIX GROUP IN PROJECT PAYROLL')  
CRTGRP PRJ(PAYROLL)GRP(V2MASTER)SHORTGRP(V2MST)PARENT(V1MASTER)PRMCODE(V2)  
TEXT('VERSION 2 GROUP IN PROJECT PAYROLL')  
CRTGRP PRJ(PAYROLL)GRP(V2TEST)SHORTGRP(V2T)PARENT(V2MASTER)  
TEXT('VERSION 2 TEST GROUP IN PROJECT PAYROLL')  
CRTGRP PRJ(PAYROLL)GRP(DEVELOPER3)SHORTGRP(DEV3)PARENT(V2TEST)  
TEXT('DEVELOPMENT 4 GROUP FOR VERSION 2')  
CRTGRP PRJ(PAYROLL)GRP(DEVELOPER4)SHORTGRP(DEV4)PARENT(V2TEST)  
TEXT('DEVELOPMENT 5 GROUP FOR VERSION 2')  
P}ua}76:;u769C V1 a}k,Z~u769C V1FIX a}k,Z}u  
769C V2 a}k#  
n?cNa9PD?vi<;\P;va}kk|`X*#n?IT_Pm`va}  
k#+G,1z4(i1,*Ci8(Da}k;(;\F5n?cNa9POMc  
NDNN?~(d?jiZz}Z4(DBiOf)DVfa}76#}g,ZZ18  
3D<11P,;\Z V2TEST ikOMcNDi.d4(;va}k* V1 Di(g  
{ZG)iPP?~Da}k* V2 D0)#byvaF5b)?~D V2 a}76#  
gZZ173D<10PGy,ZZ183D<11PC4(;?~DQw76GI*"_}  
ZdP$wDi47(D#}g,g{*"_}Zi DEVELOPER3 P$w,r+WH  
ZCiPQw?~#g{ZCiPR;=y*D?~,raQwi V2TEST#g{ZC  
iPTR;=C?~,raQwi V2MASTER#g{ZCiP9R;=?~,raQ  
wi V1MASTER#PKKQw76,Zi DEVELOPER3 P$wD*"_M4;=Z  
i DEVELOPER4 M V1FIX PD?~#  
;v?~D=vf>  
ZZ183D<11P,PAYROLL n?P}v?~#dP;v?~ BIWKLY _P=vf  
>,r*|}Z;mSB&\#b}v?~G BIWKLY"MNTHLY M WKLY#Y(  
QjI Payroll &CLrDZ;vf>;+G,Zb}v?~P"VKms,h*xP  
;)=SD*"n/#?~ BIWKLY"MNTHLY M WKLY ;lv=i V1FIX(d  
a}k* V1FIX)P#  
,1,*"&CLrB;vf>D*"_7(Z?~ BIWKLY Ph*3)B&\#K  
*"_+ BIWKLY lv=a}k* V2 Di DEVELOPER3 P#"b,;\+  
BIWKLY Si V2MASTER a}=i V1,r*a}k;`,#  
1Zi DEVELOPER3 P$wD*"_jI BIWKLY D$w1,?~;a}Ai  
V2TEST#Z7#?~g$ZcDKws,\m1Ma+C?~a}Ai V2MASTER#  
Z3B 9Cn?cNa9PDi 19  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
VZ,19(K Payroll &CLrDZ~vf>1,+9Ci V2MASTER PD  
BIWKLY f>,x;G9Ci V1MASTER PDf>#ZZ~vf>P,?~  
MNTHLY M WKLY 4|D,rK,+9CZi V1MASTER PR=Db)?~D1  
>#  
4(;v;Pa}kDi  
2IT4(;va}k* *NONE Di#bb6ECi;Pk|`X*Da}k#;\  
a}Ta}k* *NONE Di4(D?~r4FACiD?~#  
IT*8(*bT&CLrDK14(;v_P PRMCODE(*NONE) Di#;s,K  
bTK1T;ITlv?~r_4F?~"|D?~"bT|,T0lkX?~,+  
G;\+Q|DD?~a}XdZn?cNa9PD-4;C#  
*ihC(*  
1*ng V1MASTER .`DihC NOTIFY N}1,Ma"v(*{"(}g,g  
{10}ZcNa9D V2 V'O*";vQ;lvA V1FIX D?~D0)#g{?~  
Q|D,rI\h*TC?~D`vf>xP|D#}g,14(i1,IT9C  
NOTIFY N}4RfC':fZZn?cNa9D;vV'PD?~}Z;  
CHKOUTPART |nlv=,;n?cNa9m;V'PDiP#g{?~Q|D,r  
I\h*TC?~Dd{f>xP,yD|D#  
18(K5 *DEVELOPER r_Xb{F1,SZ CHKOUTPART |nD GRP N}  
O8(DiPlvDNN?~<+<B"vgOyvD(*#+Tda}kkylv  
?~;,D"RfZZn?cNa9d{V'DiPDX(?~M`MDyPf>"  
v(*{"#g{Vf?~_Pa}k *NONE,ra"v(*,x;[C4lv?~  
Da}kG24#  
;aTfZZ(SdPlv?~r_+?~lv=dPD)iPD,;?~D1>"  
v(*{",r_g{?~G9(}LDdv(}g,`M* PGMD?~),2;a"  
v(*{"#(#,n?\m19C1!5 NOTIFY(*NONE),|b6E;&"vNN  
(*#  
1jIZ;v&CLrf>DyP*"$w,RyP?~<Zi V1MASTER P1,n  
?\m1I*i V1MASTER |D CHGGRP |nOD NOTIFY N},Tc8(1l  
vCiPD?~1&C(*-#N{Z213D<12#bIToz`X*&CLrDB  
;f>lvD?~T0*T&CLr10f>D^}ylvD?~#  
1Si V1MASTER Plv?~1,+"vBP`M.;D(*:  
v g{8(K5 *DEVELOPER,rZn?cNa9m;V'PlvK?~D*"_+  
SU=(*E"#lvC?~D*"_+SU=`,D{"#  
v g{8(KC'r*m{,r+(*C'r*m#lvC?~D*"_+SU=`  
,D{"#Zn?cNa9m;V'PlvK?~DNNK2aSU={"#  
<GB<,|5wK&CLrD}vf>#&CLrZ;vf>D*"QjI,Ry  
P?~<Zi V1MASTER P#  
20 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
< 12. (*>}  
1. n?\m19C CHGGRP |n,"*i V1MASTER + NOTIFY N}hC*  
*DEVELOPER#SKiPlvDNN?~VZ<a<B"v(*{"#}Zlv  
C?~D*"_+SU=`,D{"#  
2. i V1FIX PD*"_+?~ RPGSRC BIWKLY Sa}k* *NONE Di  
V1MASTER Plv#  
;a"v(*,r*fZD?~ RPGSRC BIWKLY D(;1>;ZSdPlv?  
~Di (V1MASTER) T0+?~lvADi (V1FIX) P#  
3. i DEVELOPER3 PD*"_+?~ RPGSRC BIWKLY Si V1MASTER Plv#  
VZ,?~fZZ}viP:V1MASTER"V1FIX M DEVELOPER3#  
4. Zi V1FIX Plv?~D*"_SU=(*{",8>?~}Z;lv=i  
DEVELOPER3 P#}Zlv?~D*"_SU=(*{",8>?~Q-;lv=  
i V1FIX P#  
5. xP^}$wD*"_ZjI^}1MIT(*Zi DEVELOPER3 Plv?~D  
*"_K#C*"_I9C CMPPART |n4HO DEVELOPER3 iM V1FIX i  
PD?~D=vf>#;s,g{h*D0,*"_IT9C MRGPART |n4O  
"^}#  
g{?~vfZZSPlvC?~Dir_fZZ+|lvADiP,r;a"v(  
*{"#  
Z3B 9Cn?cNa9PDi 21  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
9Ci  
IT(}1SZNN|nPOdk CL |n49Ci#9ITZ CL Lr"REXX }  
LP9C|n,r_(} QCMDEXC 49C|n#i|n* CRTGRP"CHGGRP M  
DLTGRP#  
}Kb)i|n.b,9IT9C PRTPRJ |n4T>XZn?PDiDE"#PX  
9ITC0C PDM 49Ci1A;(}0`L*"\mw15CLr9Ci#  
|Di (CHGGRP)  
9C0|Di1(CHGGRP) |n 4|DiDtT#;Pn?\m1E\4PKYw#  
IT9CK|n4|Dki`X*DD>#9IT9C|4|DiD8i#|D8i  
+JmzXB2En?cNa9,r_Zn?cNa9PekBi#  
IT|DkX(i`X*Da}k#z8(xCiDBa}k;(;\F5CiTB  
iP?~DVfa}76#  
9IT|D1SiPlv?~1+"vD(*#zITZ NOTIFY N}O!qBP5.  
;: *SAME"*NONE"*DEVELOPER r_C'r*mD{F#*SAME G1!5,  
m>Q#f10D(*hC#PXji,N{Z203D:*ihC(*;#  
PARTLREQ N}8(1ZKiP|D?~1Gq PARTL {GXhD#t*X(i8  
(K *YES,r19C?~*"|nR+Kiw*?ji1,Xkxv-r#  
|Dn?cNa9PDi  
Z233D<135w1mSBi1,n?cNa9+gN|D#  
22 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
BEFORE  
MASTER  
INTERIM  
MASTER  
AFTER  
MASTER  
TEST  
TEST  
SYSTEST  
SYSTEST  
DEVELOPER1  
DEVELOPER1  
TEST  
DEVELOPER1  
< 13. |Dn?cNa9  
BEFORE Dn?cNa9P}vi#Y(zk|Dn?cNa9,TcZi MASTER  
kVfi TEST .dP;vBD053bT1i#Z;=MG4(CBi#  
>}: TB CL |n+mSBi"4( INTERIM cNa9#  
CRTGRP PRJ(PAYROLL)GRP(SYSTEST)SHORTGRP(SYST)PARENT(MASTER)  
TEXT('SYSTEM TEST GROUP IN PROJECT PAYROLL')  
B;=MG+i TEST D8iSi MASTER |D*i SYSTEST#  
>}: TB CL |n+|Di TEST D8i,T9n?cNa94p4s<13PD0.  
s1n?cNa9#  
9C CHGGRP |n  
CHGGRP PRJ(PAYROLL)GRP(TEST)PARENT(SYSTEST)  
9C0`L*"\mw15CLr  
Z0C PDM 49Ci1A;O!q!n 2(|D)#  
g{zk(}4(BDyi4|Dn?cNa9,;hg4(Kn?PDNNd{i  
Gy44(Ci,"Z CRTGRP |nO8( PARENT(*NONE) 4I#BDyiMI  
*H0yiD8i#  
Z3B 9Cn?cNa9PDi 23  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
1;vi;mSAn?cNa91,0&CLr*"\mw1&\?~+7#a}7  
6OcNOMDiPyP?~Da}76;a\=F5#g{zT<+imSAn?  
cNa9,r+<BXE0lv?~1(CHKOUTPART) |nOy8>Dm;a}76  
4a}?~,"R CHGGRP |n+'\#  
*K\bI\aF5a}76,zZ+iekn?cNa9P.0,&C*syP*  
"_#9lkMlv?~#+yP?~<a}A|GD?ji2G;vCk(#  
"b,;vi;\G|T:D8i#H;\+cNa9POMcNDij6*8i,  
2;\+cNa9PO_cNDij6*8i#  
|Dn?cNa9PDa}76  
a}kXkm>Vfn?cNa9PDP'a}76#1*n?cNa9|DKa}  
761,K&\?~+liGq;ah9?~;a}Ad?ji#  
>}: TB CL |n+|Dn? PAYROLL PDi DEVELOPER1 Da}k,<B  
n?g<14Py>#  
CHGGRP PRJ(PAYROLL)GRP(DEVELOPER1)PRMCODE(*NONE)  
MASTER  
MASTER  
MASTER  
SYSTEST  
MASTER  
TEST  
*NONE  
DEVELOPER1  
MASTER  
DEVELOPER2  
< 14. _PQ|Da}kDn? PAYROLL  
24 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
ZK>}P,|DKki DEVELOPER1 `X*Da}k,9CZCiP$wDK1I  
T;Ya}?~#g{dk CHGGRP |n1KiPD?~_Pa}k MASTER,rC  
|n+'\,r*?~;\Y;a}X=?jiP#  
g{|DKVfn?cNa9PiDa}k,rK&\?~9a7#CiPD?~;  
q!da}76ODm;?ji#}g,g{9C CHGGRP |n|DK<15Py5w  
Dn?cNa9,Tc*i MASTER 8( V1 a}k,r?~ BIWKLY Da}76  
;)9,r*C?~+_PBD?ji#ZKivB,CHGGRP |n+'\#  
< 15. T>*N;\)9a}76D;v>}  
>}i (DLTGRP)  
9C0>}i1(DLTGRP) |n4Sn?cNa9P>}i,">}kCi`X*D(  
^E"#;Pn?\m1E\4PKYw#  
Z3Kk*n?.s,zIT9CK|n4}%X(*"_Di,r_}%kCn?  
DIf>`X*D3)i#}g,g{z}ZxPZ}vf>D$w,zI\;Yh  
*n?Z;vf>PD*"i#  
"
1>}i1,i5b2a;>}#Z0&CLr*"\mw1&\?~b?4(  
Db2a;>}(g{|D{FGP'i5b{D0)#v1i5bMibDy  
P_G QPRJOWN 1,i5bMibEa;>}, qr,aT;>}Di"v/  
f#PXP'i5b{Dhv,N{Z823D:i5?~;#  
Z3B 9Cn?cNa9PDi 25  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
>}  
K>}5wgNSn? PAYROLL P>}i DEVELOPER1#  
9C DLTGRP |n  
DLTGRP PRJ(PAYROLL)GRP(DEVELOPER1)  
9C0`L*"\mw15CLr  
Z0C PDM 49Ci1A;O!q!n 4(>})#  
1z9C!n 4 1,0`L*"\mw15CLraa);v7OA;#g{1SS|  
nP9CK|n,M;arz"v/f#  
1>}i1,DLTGRP |n+liBPiv:  
1. Zn?cNa9W?>}DiP;(;\Pa}k;G *NONE DNN?~#g{  
3vi|,DyP?~<_Pa}k *NONE,R;PNN;v?~;lv,rIT  
>}byDi#  
2. Zn?cNa9PDd{X=,BPdSXk*f#  
v ZCiPy>;P?~#  
v Zn?cNa9P;PNN?~9CKi4CJd?ji#  
v g{iGyi,r|XkGUD#|XkGcNa9P(;Di,r_|BfX  
k;P;viI*BDyi#  
g{zT<S*"iP>}?~,r_>};v|,P4a}Ad?jD?~Di,  
r|n+'\#  
g{9C!n 4 4dk DLTGRP |n,r0`L*"\mw15CLraa);v7  
OA;#g{1SS|nP9CK|n,r;aSU=/f#  
Zn?cNa9PGGC'  
;)4(Kn?cNa9,Mh*xh*"_r\m1T|DCJ(#n?\m1G  
Gn?kiPD*"_Md{n?\m1#  
z&C()1d4DA ADTS/400: Application Development Manager Introduction and  
Planning Guide ;Z,|P>KzZ*<GGC'.0&C<GD;)Bn#  
GG*"_Mn?\m1 (ADDPRJUSR)  
9C0mSn?C'1(ADDPRJUSR) |n 4Zn?PGGd{C'#;Pn?\m1  
E\4PKYw#  
C'r*mC4j6zkGGDK1#&Z ADDPRJUSR |nD USRPRF N}O8(  
C'r*m{#C'r*m QSECOFR GyPn?D\m1#  
IT(}GBZ USRTYPE N}Oa)D547(yGGC'D`M#}g,C'`M  
*DEVELOPER 8>z}ZGGDK1G;v&CLr*"_,RTn?cNa9PD  
yPi<_PACJ(#  
(}Z ACCESS N}O8( *UPDATE,"Z DEVELOPGRP N}Odki{,4T  
X(*"iZh|BCJ(#|BCJ(m>*"_ITS{GD*"ia}?~#  
26 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
b)N};p9C48>yGG*"_h*T8(Di_P|BCJ(#18(K  
ACCESS(*READ) 1,DEVELOPGRP N}M;vT#  
>}  
K>}5wgNxh*"_Tn?cNa9PyP?~DACJ(T0T;v*"i  
PyP?~D|BCJ(#  
9C ADDPRJUSR |n  
ADDPRJUSR PRJ(PAYROLL)USRPF(SMITH)USRTYPE(*DEVELOPER)ACCESS(*UPDATE)  
DEVELOPGRP(DEVELOPER1)  
9C0`L*"\mw15CLr  
Z0C PDM 49Cn?1A;O!q!n 41(mSC')#  
g{4Z DEVELOPGRP N}Oj6NNi,r*"_;\lkrlv?~r_a}n  
?cNa9PD?~#  
>}  
TB|nvxh*"_Tn?cNa9PyP?~DACJ(#  
ADDPRJUSR PRJ(PAYROLL)USRPRF(SMITH)USRTYPE(*DEVELOPER)ACCESS(*READ)  
C'`M *ADMIN 8>z}ZGGDK1G;vn?\m1,{Tn?cNa9PD  
yPi<_P|BCJ(,"RIT9CyP0&CLr*"\mw1|n#C'r  
*m QSECOFR GyPn?D\m1#  
>}  
TB|n5wgNGGn?\m1#  
ADDPRJUSR PRJ(PAYROLL)USRPRF(TREMBLAY)USRTYPE(*ADMIN)  
g{z8( USRTYPE(*ADMIN),r ACCESS M DEVELOPGRP N}a;vT,r  
*~,KTn?cNa9PyPiD|BCJ(#  
PXgNZn?PGGK*"_r\m1.s|DC'r*mDGGE"DE",N  
9Cn?C'|n  
IT(}1SZNN|nPOdk CL |n49Cn?C'DC'r*m#9ITZ CL  
Lr"REXX }LP9C|n,r_(} QCMDEXC 49C|n#n?C'|nG  
ADDPRJUSR"PRTPRJUSR"CHGPRJUSR M RMVPRJUSR#XkGn?\m1E\9  
C ADDPRJUSR"GHGPRJUSR M RMVPRJUSR |n#  
yPn?C'|n<9CC'r*m#Xk*?v|na)C'r*m#  
(}9C0C PDM 49Cn?1A;,9ITC0`L*"\mw15CLr49C  
n?C'#  
r!C'GGE" (PRTPRJUSR)  
9C0r!n?C'1(PRTPRJUSR) |n4i4n?DX(C'r*mDGGE"#n  
?\m1M*"_<IT4PK|n#  
Z3B 9Cn?cNa9PDi 27  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
XkZ PRJ N}O8(zkT>XZDvn?DC'GGE"#zITZ USRPRF N  
}OdkX(DC'r*m{r_9C *ALL 48>zki4Zn?PGGDyPK1  
DyPGGE"#  
Zns;v ADDPRJUSR r CHGPRJUSR |nOZhDCJ6pkC'`M5;pC  
44((f#g{zZK|nO8(DC'r*mGCZT3)i_P|BCJ(D  
*"_D,raP>{/}Td_P|BCJ(Di#g{*"_Tn?;PACJ  
(,r_g{z8(DC'r*mCZ\m1D,raZ(fOr! ALL 4zfiP  
m#  
>}: OUTPUT N}D1!5 *PRINT +9(fYQzT)r!#g{zdkTB|  
n,r<16PT>D(f;YQz#  
9C PRTPRJUSR |n  
PRTPRJUSR PRJ(PAYROLL)USRPRF(*ALL)OUTPUT(*PRINT)  
9C0`L*"\mw15CLr  
Z0C PDM 49Cn?1A;O!q!n 46(r!C')#  
5722WDS V5R1M0  
&CLr*"\mw  
- r!n?C' 05/08/01  
17:30:15  
3f . . : 0001  
--------------------------------------------------------------------------------  
n? . . . . . . . . . . . . . . . : PAYROLL  
C' . . . . . . . . . . . . . . . . : TREMBLAY  
C'`M . . . . . . . . . . . . . . : *ADMIN  
n?CJ6p. . . . . . . . . . . . . : *ALL  
QZ(Di  
*** ALL ***  
--------------------------------------------------------------------------------  
n?  
. . . . . . . . . . . . . . . : PAYROLL  
C' . . . . . . . . . . . . . . . . : SMITH  
C'`M . . . . . . . . . . . . . . : *ADMIN  
n?CJ6p. . . . . . . . . . . . . : *ALL  
QZ(Di  
*** ALL ***  
--------------------------------------------------------------------------------  
n?  
. . . . . . . . . . . . . . . : PAYROLL  
C' . . . . . . . . . . . . . . . . : ROBERTS  
C'`M . . . . . . . . . . . . . . : *DEVELOPER  
n?CJ6p. . . . . . . . . . . . . : *UPDATE  
QZ(Di  
DEVELOPER1  
--------------------------------------------------------------------------------  
n?  
. . . . . . . . . . . . . . . : PAYROLL  
C' . . . . . . . . . . . . . . . . : LALONDE  
C'`M . . . . . . . . . . . . . . : *DEVELOPER  
n?CJ6p. . . . . . . . . . . . . : *READ  
QZ(Di  
*** ALL ***  
* * * * * P m a x * * * * *  
< 16. I PRTPRJUSR |nzIDYQzD~Dy>  
>}: r_,IT(}8(TB|n4+dv<rdvD~#bPmC47(ZN&f  
"F* FILE1 DdvD~,xD~PDZ;vI1+SUdv#  
PRTPRJUSR PRJ(PAYROLL)USRPRF(*ALL)OUTPUT(*OUTFILE)  
OUTFILE(*LIBL/FILE1)OUTMBR(*FIRST)  
28 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
dvD~DG<q=kZb QADM PI53a)D}]bD~ QALYPUSR Py9C  
DG<q=`,#  
g{zZK|nO8(DC'r*mGCZ*"_D,r**"_Td_P|BCJ  
(D?vi4(;vdvD~G<#g{zG*\m1x8(DC'r*m,rv4  
(;vdvD~G<#  
|DC'GGE" (CHGPRJUSR)  
9C0|Dn?C'1(CHGPRJUSR) |n4|Dn?DX(C'r*mGGE"#h  
zK|n,IT|DC'`M (USRTYPE)"CJ(^ (ACCESS) r_*"_Td_P  
|BCJ(Di (DEVELOPGRP)#Xk7#z|DdGGE"DC';P+NN?~l  
v={GD*"iP#;Pn?\m1E\4PKYw#  
zIT|D10GG**"_D3vKDC'r*m(g{CK1I*n?\m1D  
0),4.`;#IT(}+*"_DCJ(|D* *READ,IT}%*"_TyP*  
"iD|BCJ(#*Sn?P{vX}%*"_r\m1D(^, I9C  
RMVPRJUSR |n#zZ DEVELOPGRP N}OdkDi{d1*"_H0_P(^  
DiDf;Pm#  
>}: Y(H0dkKTB|n#  
ADDPRJUSR PRJ(PAYROLL)USRPRF(ROBERTS)USRTYPE(*DEVELOPER)  
ACCESS(*UPDATE)DEVELOPGRP(DEVELOPER1)  
B;v>}5wgNSi DEVELOPER1 =i DEVELOPER2 4|D*"_ ROBERTS  
D|BCJ(#  
9C CHGPRJUSR |n  
CHGPRJUSR PRJ(PAYROLL)USRPRF(ROBERTS)USRTYPE(*SAME)  
ACCESS(*SAME)DEVELOPGRP(DEVELOPER2)  
9C0`L*"\mw15CLr  
Z0C PDM 49Cn?1A;O!q!n 42(|DC')#  
*Jm*"_|Bm;v*"iPD?~,zXkZ CHGPRJUSR |nO8(yPi#  
}g,** ROBERTS ZhT DEVELOPER1 M DEVELOPER2 iD|BCJ(,&  
dkTB|n#  
CHGPRJUSR PRJ(PAYROLL)USRPRF(ROBERTS)USRTYPE(*SAME)  
ACCESS(*SAME)DEVELOPGRP(DEVELOPER1 DEVELOPER2)  
g{VfDiPm+$,rWH40F4=a>1Ta>|n,"RZ|D10iPm.  
0lw|#  
}%C'GGE" (RMVPRJUSR)  
9C0}%n?C'1(RMVPRJUSR) |n4}%n?MCn?PwiDC'r*mG  
G#C'r*m QSECOFR GyPn?D\m1,ITSn?P}%yPn?\m1#  
;Pn?\m1E\4PKYw#  
1\m1r*"_k*n?r1zkSn?cNa9P{vX}%C'1,I9CK  
|n#  
>}: TB|n+Sn? PAYROLL P}% ROBERTS#  
Z3B 9Cn?cNa9PDi 29  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
9C RMVPRJUSR |n  
RMVPRJUSR PRJ(PAYROLL)USRPRF(ROBERTS)  
9C0`L*"\mw15CLr  
Z0C PDM 49Cn?1A;O!q!n 44(}%C')#  
RMVPRJUSR |nlkX?~,"Rg{PNN?~;lv=Z|nO8(DC'r*  
mP,ra"vE"T{"#\m1IT9Cb){"4bvKC'(^[G*"_  
9G\m1)Z9C RMVPRJUSR |n.0}ZTdxP$wDNN4bv$wn#  
PXZ3vKk*n?1gNem*"iDE",N{Z1843D:ZC'k*n?1  
4(y>n?cNa9  
>ZhvK;5P|n,zITC4:  
v 4(`FZK&yhvDn? TRAVEL Dn?  
v Zn?cNa9P4(i  
v T>XZn?DE"  
v ZdPGGC'  
v |D{GD;)GGE"  
9IT9C0`L*"\mw15CLra)DA;44(Kn?cNa9#ZK7  
0D)2,z+Q-4(KZ313D<17Py5wDn?cNa9#  
30 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
MASTER  
MASTER  
MASTER  
SYSTEST  
MASTER  
TEST  
MASTER  
DEV_DAVE  
MASTER  
DEV_NICOLE  
MASTER  
DEV_KEN  
< 17. Travel &CLrDn?cNa9  
9CBP=h44(KBDn?cNa9:  
1. 9C CRTPRJ |n44(n?#TB|n+4(n? TRAVEL#g{z8bD0,  
ICm;v{F44(Cn?,TczIT+|#fZ53O)+4709C#  
CRTPRJ PRJ(TRAVEL)SHORTPRJ(TRL)TEXT('TRAVEL DESTINATIONS APPLICATION')  
2. (}9CTB|n4Zn? TRAVEL P4(;vF* MASTER Dyi#  
CRTGRP PRJ(TRAVEL)GRP(MASTER)SHORTGRP(MST)PARENT(*NONE)  
TEXT('MASTER GROUP IN PROJECT TRAVEL')  
ns,*Ki|,&CLrDyPzz6pD?~#PX4(iDji,N{Z14  
3. 4(;vF* SYSTEST D53bTi#CJ1DrLi{Ma}k MASTER 4  
4(Ki#Z TEXT N}OhvKi#G!,+KiD8i8(* MASTER#  
X4K=h44(i TEST#Ki2_Pa}k MASTER,+Gd8iGi  
SYSTEST#  
4. VZ#zITYN9C CRTGRP 4mSzh*D*"i#ZK>}P,RGh*}  
v*"i,Vp* Dave"Nicole M Ken#yPb}vi<+ TEST iw*|GD  
8i,"R<_Pa}k MASTER#+ Dave DiF* DEV_DAVE, Nicole D  
iF* DEV_NICOLE,Ken DiF* DEV_KEN#  
Z3B 9Cn?cNa9PDi 31  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
5. 9C PRTPRJ |n4i$n?cNa9GqG*D#PXr!n?E"Dji,N  
<3PyT>D(f#g{zTa{P=zb,r*AB;=#g{zk|Dn?  
cNa9DE","T9C CHGGRP |n4|DXZdP;viDD>hv#  
6. VZ,h*+*"_GG=n? TRAVEL P,Tc{GIT*<$w#?0,zk  
GGyPb}v*"_,9{G;TT:Di_P|BCJ(#C ADDPRJUSR |  
n4jIKNq#r*h*P5JDC'r*m49CK|n,yT!qzD}v  
,B4Vpd1 Dave"Nicole M Ken D?~#PXGGn?C'Dji,N{Z  
7. ZTn? TRAVEL GGK Dave"Nicole M Ken .s,IT9C PRTPRJUSR |  
n4i${GDGGE"#PXr!bVE"Dji,N{Z273D:r!C'G  
GE" (PRTPRJUSR);#zD(f4p4&C`FZZ283D<16PyT>D(f#  
"b,zDC'r*m2P>Z(fO,-rGzQ-4(Kn?,rxz2Gn  
?\m1#  
8. zITv(zh*8(;vr9n?\m1#9C CHGPRJUSR |n4jIKYw#  
g{zh*PXgN4PKYwDji,N{Z293D:|DC'GGE"  
(CHGPRJUSR);#YN(}9C PRTPRJUSR |n4i$zQjIDYw#  
1zjIYw1,n?cNa94p4&`FZZ313D<17PDcNa9#zI\  
kx;=X5yTqC9Cb)|nD|`5y-i#1jI1,G!*9C DLTPRJ  
|n4>}Cn?,Tcd{KI9C,;>}#*>}n?,dkTB|n:  
DLTPRJ PRJ(TRAVEL)  
32 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Z4B ?~*"i\  
>Bhv:  
v gNP>?~T0gNT>rr!|GDZ]#  
v ITC4qCzTdGGDn?{FD|n,T0C4qCZG)n?ZzTd_  
P(^Di{FD|n#b)|nozzKbzIT9CD)?~#  
*Kb?~{GgN9lDT0k|{?~`X*Dfr,N{=<C. |{fr#  
P>n?Mi{T0zDCJ(  
*7(zZD)n?PxPKGGT0zITCJD)i,9C CL |nr0`L*"  
\mw15CLr#9C0i/n?1(QRYPRJ) |n4q!zQTdGGDn?DP  
m#2IT9C WRKPRJPDM 4i4zTd_PCJ(Dn?DPm#;)z*@K  
n?{,M9C0r!n?C'1(PRTPRJUSR) |n4r!PXTn?DC'r*mC  
J(DE"#0r!n?1(PRTPRJ) |nJmzr!;]T>n?PyPiD(f#9  
IT9C WRKGRPPDM 4i4n?PyPiDPm#  
ZZ2B 9Cn?MZ3B 9Cn?cNa9PDiP<Tb)|nxPKhv#PX  
9C0`L*"\mw15CLr4P>zZdPxPKGGDn?Dji,N<Z  
i4?~Pm (QRYPART)  
g{z*@zQTdGGDn?D{F,rzITqCX(iP?~DPmr_n?  
PDQw76#  
9C QRYPART |n  
QRYPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
9C0`L*"\mw15CLr  
!q PDM wK%OD!n 6(9C?~)#Zn?Mia>&8(n?MiD{F,  
;s4 Enter |#+P>S8(Di;1=yiPDyP?~#9IT9C  
WRKPARTPDM 4qCzTd_PCJ(DiDPm#  
XhN}  
8(*i/Dn?"i"`MM?~#  
TZ TYPE M PART N},zIT8(`t`MM{F"yP`MM{F,r_X(  
`MM{F#  
TZ GRP N},zIT8(X({Fr_ *ALL#18( GRP(*ALL) 1:  
v QRYPART |nOD SCAN M SCHPTH N};vT,x+Qwn?PDyPi  
v 0i/?~1(fPavVX4D?~,r*P>K?~DyPf>  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
33  
 
g{z9C`t`Mr?~{ (*generic*),r+i/k|%dDyP?~M`M#(}  
9CGE (*) rJE (?) ^(?~{r`M48(yP?~r`MDS/,dP,* m  
> 0 vr`vV{,x ? ;m> 1 vV{#}g,g{zZ TYPE N}O8( *C*,  
ra&mZ?~`MPNNX=_PV{ C D`MDyP?~,}g CBLINC r  
CINC#g{zZ PART N}O8( ?ABC,r+&m_PT ABC a2D 4 V{{  
FDyP?~,}g DABC#PX QRYPART |nJmD?~`MDPm,N{=<  
B. ?~`MT0|Gk|nDX5#QRYPART |n2JmC'(e?~`M#  
r* *ALL TZ PART N}45_PXb,e,yT,9C **ALL 48(T ALL a  
2DyP?~#  
`t`MM{FZ0`L*"\mw15CLrPGT;,==&mD#PXji,  
I!N}  
ITZ QRYPART |nO8(;)I!E"#zIT8>&+|nDdv"MAN&"  
Gq&C(hcNa9,T0&C9CDuQw76#  
ACCKEY N}Jmzi/lv=X(C'DyP?~#1!5* ACCKEY(*ALL),|  
+i/yP?~x;\G-+|GlvD#  
9C OUTPUT N}48>&C+dv"MAN&#1!5* OUTPUT(*PRINT)#TZ  
Kw5,(f;YQzAr!h8#OUTPUT(*OUTFILE) +dv<rdvD~#dv  
D~MG;v|,K3)&ma{DD~#dvD~DG<q=kZb QADM PI5  
3a)D}]bD~ QALYQPART Py9CDG<q=`,#  
>}  
IT(}8(`FZTBD|n4+dv<rdvD~#  
QRYPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
OUTPUT(*OUTFILE)OUTFILE(*LIBL/FILE1)OUTMBR(*FIRST *REPLACE)  
>}  
g<18yv,TB|n+Zn? PAYROLL PiR?~ RPGSRC BIWKLY,WHQw  
i DEVELOPER1#ZCiP4R=C?~,rK QRYPART |n+XE1!Qw76  
(ZK>}P* DEVELOPER1"TEST"MASTER)4iRC?~,"Zi MASTER  
PR=K|#<19PD(f;YQzAr!h8#  
QRYPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
OUTPUT(*PRINT)SCAN(*YES)SCHPTH(*DFT)  
34 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
< 18. i/?~  
5722WDS  
V5R1M0  
&CLr*"\mw  
- i/?~  
05/08/01  
12:00:00  
3f . . : 0001  
n?  
i
. . . . . . . . . . . . . . . : PAYROLL  
. . . . . . . . . . . . . . . . : DEVELOPER1  
`M . . . . . . . . . . . . . . . . : RPGSRC  
?~ . . . . . . . . . . . . . . . . : BIWKLY  
CJ\?(VP_). . . . . . . . . . : *ALL  
(hcNa9 . . . . . . . . . . . . : *YES  
Qw76. . . . . . . . . . . . . . . : *DFT  
ꢀ1ꢁ  
ꢀ2ꢁ  
zcQwj<D?~  
ON|D  
DUZ  
?~  
`M  
oT  
i
VP_  
D>  
BIWKLY  
1
RPGSRC  
RPG  
MASTER  
05/08/01  
ꢀ5ꢁ  
SMITH  
ꢀ6ꢁ  
|B$J%  
ꢀ7ꢁ  
ꢀ3ꢁ  
ꢀ4ꢁ  
* * * * * P m a x * * * * *  
< 19. i/?~(fDy>  
ꢀ1ꢁ  
8(Gq*Zn?cNa9PQw8(D?~#  
Z SCHPTH N}O8(DQw76#  
?~DoT#  
ꢀ2ꢁ  
ꢀ3ꢁ  
ꢀ4ꢁ  
ꢀ5ꢁ  
ꢀ6ꢁ  
ZdPR=?~Di#  
ON|D?~Z]DUZ#  
T>lvK?~DK1DC'r*m(g{PD0)#t*UW,rm>4l  
v?~#  
ꢀ7ꢁ  
T>?~DNNhvTD>#  
Z4B ?~*"i\ 35  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
T>Mr!?~ (DSPPART)  
9C0T>?~1 (DSPPART) |n4T>rr!?~DZ]rXw#m1P>K  
DSPPART |nwCD|nT0wV?~`M#  
>}  
8(n?"i"`MM?~D{F#9IT!qk*+dv<rN&,T0g{Z8  
(DiP4R=3v?~,Gq9C1!Qw764iRC?~#  
DSPPART PRJ(PAYROLL)  
TYPE N}7(;wC4T>rr!?~D|n#  
m 1. ;wC4T>x(`M?~D|n  
?~`M  
BNDDIR  
CLD  
I DSPPART wC4T>?~D|n  
DSPBNDDIR  
n/a  
CMD  
DSPCMD  
DSPDTAARA  
DTAARA  
xPoTtT DSPF D FILE STRSDA(STRSDA ;wC,R DSPFD |n;wC4r!|  
G#)  
_PoTtT ICFF"LF"PF DSPFD  
r PRTF D FILE  
JOBD  
DSPJOBD  
WRKJOBQ  
DSPMNUA  
DSPMOD  
DSPMSGD  
WRKMSGQ  
WRKOUTQ  
DSPPFM  
DSPPGM  
n/a  
JOBQ  
MENU (UIM)  
MODULE  
MSGF  
MSGQ  
OUTQ  
PARTL¹  
PGM  
PNLGRP  
SCHIDX  
n/a  
4,|,,Qw76,9(! STRSEU  
n?~,PRDDFN"PRDLOD  
M SYSTEML ?~  
SRVPGM  
DSPSRVPGM  
DSPFD  
VRPGBIN M VRPGTXT  
":  
1. PXT>`M* PARTL D?~Dji,N{Z943D:T>?~Pm?~;#  
OUTPUT N}7(&C+dv"MAN&#9C1!5 OUTPUT(*) 49dvvVZA  
;O#OUTPUT(*PRINT) +9dvYQzAr!h8DdvSPO#  
36 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
SCAN N}7(Gq9C1!Qw764iR?~(g{4Z8(DiPR=C?~D  
0)#g{zk;QwZ GRP N}O8(Di,r9C SCAN(*NO)#g{zkQw1  
!Qw76PDi,r9C SCAN(*YES)#  
Z4B ?~*"i\ 37  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
38 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Z5B 4(?~  
>BhvgN4(?~#IT4(B?~,2IT+Vf?~4FAB?~#  
9IT(}+ OS/400 Tsr4I1<k=0&CLr*"\mw1X~P44(?~#  
ZZ6B <k&CLrPTKxPKhv#  
?~`M  
P8V`pD?~:  
v zIT`kD4  
v dvTs  
v |(4I1  
v Ts(g,;G4R;GI`k4zID}]xr{"D~)  
v |,8(KQw76DiPmDQw76?~  
v |,`k|n0dN}DPmD9(!n?~  
v |,d{?~DPmD?~Pm?~  
v C4b0&CLrDz7(eMz70k?~  
m2 P>KzIT4(D?~D`M#R_D;PT>K?~D`X*oT#Km;|  
((}"v BLDPART"IMPPART r CPYPART |nx4(DI53a)D?~`  
M: PGM"FILE"CLD" CMD"PNLGRP"MENU"MODULE M SRVPGM# Z5  
23Dm5 P>K\0&CLr*"\mw1&\?~'VD OS/400 Ts`M#  
;\C CRTPART |n4(II BLDPART |n4(DG)`MD?~,}G  
BLDPART |n4(D?~Gf"Z4I1PD?~#  
m 2. ?~`MMoT  
?~`M  
BLDOPT  
BNDDIR  
BNDSRC  
CBL36INC  
CBL36SRC  
CBLINC  
oT  
*NONE  
*NONE  
BND  
CBL36  
CBL36  
CBL, SQLCBL  
CBLLE, SQLCBLLE  
CBLLE, SQLCBLLE  
CBL, SQLCBL  
C, CLE, SQLC, SQLCLE  
CLD  
CBLLEINC  
CBLLESRC  
CBLSRC  
CINC  
CLDSRC  
CLLESRC  
CLPSRC  
CLLE  
CLP  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
39  
 
m 2. ?~`MMoT (x)  
?~`M  
CLSRC  
oT  
CL  
CMDSRC  
CSRC  
CMD  
C, CLE, SQLC, SQLCLE  
DSPF, ICFF, LF, PF, PRTF  
DSPF36  
DDSSRC  
DSPF36SRC  
DTAARA  
FILE  
*NONE  
SAVF  
JOBD  
*NONE  
JOBQ  
*NONE  
MNU36SRC  
MSGF  
MNU36  
*NONE  
MSGF36SRC  
MSGQ  
MSGF36  
*NONE  
OCL36SRC  
OUTQ  
OCL36  
*NONE  
PARTL  
*NONE  
PNLINC  
PNLGRP  
MENU, PNLGRP  
*NONE  
PNLSRC  
PRDDFN  
PRDLOD  
REXXSRC  
RPG36INC  
RPG36SRC  
RPGINC  
*NONE  
REXX  
RPG36  
RPG36  
RPG, SQLRPG  
RPGLE, SQLRPGLE  
RPGLE, SQLRPGLE  
RPG, SQLRPG  
RPT36  
RPGLEINC  
RPGLESRC  
RPGSRC  
RPT36SRC  
SCHIDX  
*NONE  
SCHPTH  
SRT36SRC  
SYSTEML  
TXT36SRC  
TXTSRC  
VRPGBIN  
VRPGTXT  
*NONE  
SRT36  
*NONE  
TXT36  
*NONE  
VRPG  
VRPG  
40 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
4(B?~ (CRTPART)  
9C04(?~1(CRTPART) |n4Zn?cNa9DiP4(B?~#v1iPP4  
fZ,{M,`MD?~,R;P_P,{FM,`MD?~ITa}ACiD1!  
Qw761,E\4(x({FM`MD?~#g{1!Qw76PQ-fZ{FM  
`M`,D?~,r1z4(C?~1Xk8(a}k *NONE#<G<20:  
< 20. 4(?~  
}g,g{QZDEVELOPER1 iP4(K;vF* RPGSRC BIWKLY D?~,xa  
}k* MASTER,rxC?~D?jiG MASTER,G4,zITZi DEVELOPER2  
P4({FM`M`,D?~D(;=(MG8(a}k *NONE#byM\bKP=  
v_P`,{FM`MD?~<I\a;a}A,;iDJb#  
XhN}  
8(y4(?~Dn?"i"`MM?~{#zXkT}ZdP4(B?~Di_P  
|BCJ(#PX CRTPART |nJmD?~`MDPm,N{=<B. ?~`MT0  
IT4(`M* PARTL D?~4zYzywD|D,9|G_P;BD|{<(#v  
Z8(K TYPE(PARTL) 1,EI8( PART(*GENERATE)#zIDZ;v?~Pm  
{+* nnnn000001,dP,nnnn Gn?rF#sxzID?~Pm{+*  
nnnn000002"nnnn000003 HH#g{zID{FQfZ,r CRTPART |n+Lx7  
SA{FD}V]v(n`=;vL(N}),1=R=;fZD?~Pm{*9#  
14(?~1,|;alv=C'r*mP#  
Z5B 4(?~ 41  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
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(  
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  
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  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
{F#  
m 3. ?~`M0d`&D1!4D~  
`M  
1!4D~  
QBLDOPTSRC  
QSRVSRC  
QS36SRC  
QS36SRC  
QLBLSRC  
QCBLLESRC  
QCBLLESRC  
QLBLSRC  
H
BLDOPT  
BNDSRC  
CBL36INC  
CBL36SRC  
CBLINC  
CBLLEINC  
CBLLESRC  
CBLSRC  
CINC(oT* C"CLE"SQLC"SQLCLE)  
CLDSRC  
CLLESRC  
CLPSRC  
CLSRC  
QCLDSRC  
QCLLESRC  
QCLSRC  
QCLSRC  
CMDSRC  
QCMDSRC  
CSRC(oT* C"CLE"SQLC"SQLCLE) QCSRC  
DDSSRC  
QDDSSRC  
DSPF36SRC  
MNU36SRC  
MSGF36SRC  
PNLINC  
QS36SRC  
QS36SRC  
QS36SRC  
QPNLSRC  
QMNUSRC  
QPNLSRC  
QDFNSRC  
QLODSRC  
QS36SRC  
PNLSRC(oT* MENU)  
PNLSRC(oT* PNLGRP)  
PRDDFN  
PRDLOD  
OCL36SRC  
REXXSRC  
QREXSRC  
QS36SRC  
RPG36INC  
RPG36SRC  
RPGINC  
QS36SRC  
QRPGSRC  
QRPGLESRC  
QRPGLESRC  
QRPGSRC  
QS36SRC  
RPGLEINC  
RPGLESRC  
RPGSRC  
RPT36SRC  
SCHPTH  
QSCHPTHSRC  
QS36SRC  
SRT36SRC  
SYSTEML  
QSYSTEMSRC  
QS36SRC  
TXT36SRC  
TXTSRC  
QTXTSRC  
Z5B 4(?~ 43  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z PARTL N}P8( PARTL {+<B CRTPART |nT/+y4(D?~mSA  
z8(D?~Pm?~P#g{zG53\m1,r8( PARTL(*PRV) 1+Jmz9  
CCZKn?Dns;v?~Pm?~D{F#+G,g{zG*"_,rKN}j  
6CZ8(iDns;v?~Pm?~D{F#g{z}Z9C QSECOFR C'r*m  
KPK|n,rK5^'#PARTL N}D1!5* *NONE,|8>y4(D?~+;  
a;mS=?~Pm?~P#  
g{fZBPiv,rXk8(?~Pm?~:  
v Z|nO8(DiGC PARTLREQ(*YES) 4(D  
v 8(D`M;G PARTL  
g{Z CRTPART |nO8(K?~Pm?~,r:  
v ?~Pm?~XkfZZSZdP4(?~Di*<D1!Qw76P#  
v y4(D?~{;mSA8(D?~Pm?~P(g{C?~{P;fZD0)#  
(49|n4\4(?~,2I\a"zKiv)#  
g{8(D`MG PARTL,r+vT PARTL N}#Zd{ivB,PARTL N}+<  
B8(D?~Pm?~;|B#  
9C TEXT N}4*B?~dk;)hvTD>#g{;dkNND>,r+9C1!  
5 *BLANK,xhv#t*UW#  
>}  
BP>}5wgN4(F* PAYROLL DEVELOPER1 RPGSRC BIWKLY D?~#  
9C CRTPART |n  
CRTPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY) LANG(RPG)  
PRMPT(*NO)PRMCODE(*GRP)SRCFILE(QRPGSRC)TEXT(*BLANK)  
9C0`L*"\mw15CLr  
40C PDM 49C?~1A;OD0F6=4(1#  
?~;a}"w*4I1f"Z QRPGSRC P,|G`M* RPGSRC D?~D1!4  
D~#bk8( SRCFILE(*TYPE) `,#  
TB|n+Zn? PAYROLL Di DEVELOPER2 P4(?~ MNTHLY#  
CRTPART PRJ(PAYROLL)GRP(DEVELOPER2)TYPE(CSRC)PART(MNTHLY)  
PRMPT(*NO)PRMCODE(*NONE)SRCFILE(QCSRC)TEXT(*BLANK)  
LANG(C)  
a}k *NONE 8>?~;\;a}#?~w*4I1f"Z QCSRC P,|G`M*  
CSRC D?~D1!4D~#bk8( SRCFILE(*TYPE) `,#  
4F?~ (CPYPART)  
4(B?~Dm;V=(MG+Vf?~4F=8(DiMn?P#9C04F?  
~1(CPYPART) |n44PKYw#  
44 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
x({FM`MD?~vI4F=P;|,P`,{FM`MD?~DiP#g{Z  
*|,;4F?~DiD1!Qw76PQ-fZ`,{FM`MD?~,r1z4  
FC?~1Xk8(a}k *NONE#  
zXkT|,y4F?~Di_PAr|BCJ(,RTSU1>Di_P|BCJ  
(#  
Z4F?~.s,|;alv=C'r*mP#  
1z4F_-D~?~1,XkWH4F|yyZDomD~,r_ComD~Xk  
ZSUiPQfZ#g{z}Z4FomD~,rZ DATA N}O8(zGq9k4  
FomD~PD}]#  
g{zk|Dy4F?~DtT(gC?~DoTrD>),rZjI4F.s9C  
0|D?~E"1(CHGPARTINF) |n#  
zk4FD?~  
Z CPYPART |nO,8(4j<M?jj<#4 E"|(n?"i"`MM?~#  
9C FROMPRJ"FROMGRP"FROMTYPE M FROMPART N}#PX CPYPART |  
nJmD?~`MDPm,N{=<B. ?~`MT0|Gk|nDX5#  
g{zk4FyP`MD?~,r9C FROMTYPE(*ALL),g{zk4FZ  
FROMTYPE N}O8(D`MDyP?~,r9C FROMPART(*ALL)#  
g{Zz8(DiPR;=zk4FD?~,r9C SCAN N}#SCAN N}8(g  
{Z8(DiPR;=y4FD?~,GqQw1!Qw76TR=y4FD?~#  
1!5* *YES;b+QwS8(i1=yiD76PDyPi#  
zk4(D?~  
TOPRJ"TOGRP"TOTYPE M TOPART N}Jmz8(y4(D?~Dn?"i"`  
MM?~#g{z;ndb)N},r+9CZ from N}O8(DG){F#g{z  
Z FROMTYPE M FROMPART N}O8(K *ALL,rXk9C1!5  
TOTYPE(*FROMTYPE) M TOPART(*FROMPART)#  
g{-<?~G4I1,r TOTYPE N}XkG4`M#}g,g{-<?~D`M  
* RPGSRC(4I1`M* RPG),rIT+|4F=`M* RPGSRC"CSRC r  
RPGINC D?~P#  
1+4?~4F=m;V4`M1,}g,+ RPGSRC 4F= CSRC,r_+ TXTSRC  
4F= CBLSRC 1,&8(J1DoT#}g,g{zZ TOTYPE N}O8(  
CBLSRC,roT CBL ;8(xC?~;g{zZ TOTYPE N}O8( DDSSRC,  
r&8(oT DSPF#TZC'(e`M,8(D1!oTGQ-*y4(?~D`M  
(eD"4V83rP>DZ;VoT#  
g{-<?~;G OS/400 4I1,rBD?~`MXkf"ZkZ FROMTYPE N}  
O8(D?~`M`,DTs`MP#(PX OS/400 4I1`MM`&D0&CLr*  
"\mw1?~`MDPm,N{Z503Dm4#)PX CPYPART |nJmD?~`M  
DPm,N{:=<B. ?~`MT0|Gk|nDX5;#CPYPART |n9JmC'  
(e`M#  
Z5B 4(?~ 45  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
;*?~{#V;d,MI9CK|n+`M* VRPGTXT r VRPGBIN D?~S;  
vi4F=m;viP,r_S;vn?4F=m;vn?P#  
9C PRMCODE zkN}48(Gq*a}B?~#KN}JCZ8v|n,RZF  
*Z763D:a}k;D;ZPxPKhv#  
9C SRCFILE N}48(ZdP?~;f"*4I1D4D~#KN};JCZTZ  
2153D:=<B. ?~`MT0|Gk|nDX5;PyP>D CPYPART P'D?~  
`M#1!5* *SAME#4D~{k-<?~y9CDD~{`,#9C{F4j6  
X(D4D~,r_9C1!5 *TYPE 48(+9CI53a)D1!4D~#(PX  
1!4D~DPm,N{Z433Dm3#)  
9C DATA N}48(14FomD~1Gq4F}]#1!5* *NO#  
Z PARTL N}P8( PARTL {+<B CPYPART |nT/+y4(?~mSA8  
(D?~Pm?~P#g{zG53\m1,r8( PARTL(*PRV) 1+Jmz9CC  
ZKn?Dns;v?~Pm?~D{F#+G,g{zG*"_,rKN}j6C  
Z8(iDns;v?~Pm?~D{F#g{z}Z9C QSECOFR C'r*mKP  
K|n,rK5^'#PARTL N}D1!5* *NONE,|8>y4(D?~+;a;  
mS=?~Pm?~P#  
g{fZBPiv,rXk8(?~Pm?~:  
v Z|nO8(DiGC PARTLREQ(*YES) 4(D  
v 8(D`M;G PARTL  
g{Z CPYPART |nO8(K?~Pm?~,r:  
v ?~Pm?~XkfZZS4F?ji*<D1!Qw76P#  
v y4(D?~{;mSA8(D?~Pm?~P(g{C?~{P;fZD0)#  
(49|n4\4(?~,2I\a"zKiv)#  
g{8(D`MG PARTL,r+vT PARTL N}#Zd{ivB,PARTL N}+<  
B8(D?~Pm?~;|B#  
ZZ473D<21P5wDn?cNa9P,?~ BIWKLY Si TEST ;4F=i  
DEVELOPER3 P#  
46 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
< 21. 1?~fZZ8viP14F?~  
>}  
TB|n+4F?~ BIWKLY#  
9C CPYPART |n  
CPYPART FROMPRJ(PAYROLL)FROMGRP(TEST)FROMTYPE(RPGSRC)  
FROMPART(BIWKLY)  
TOPRJ(*FROMPRJ)TOGRP(DEVELOPER3)  
SCAN(*YES)PRMCODSER(C*FGIRLEP)(*TYPE)  
TOTYPE(*FROMTYPE)TOPART(NEWPART)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 3(4F)#  
g|nPy8(DGy,?~ RPGSRC BIWKLY Si TEST ;4F= i  
DEVELOPER3 D?~ RPGSRC NEWPART P#4FI&,r*Z DEVELOPER3 i  
Pr_Z DEVELOPER3 iDa}76P<;fZbV`MM{FD?~#g{K?~  
Za}76P4fZ,r|vI;lvx;a;4F#}g,g{F* RPGSRC  
NEWPART D?~fZZi MASTER P,ra"zbViv#  
>}  
TB|n+ RPGSRC BIWKLY Si DEVELOPER1 P4F=i DEVELOPER3 P#  
CPYPART FROMPRJ(PAYROLL)FROMGRP(DEVELOPER1)FROMTYPE(RPGSRC)FROMPART(BIWKLY)  
TOPRJ(*FROMPRJ)TOGRP(DEVELOPER3)  
SCAN(*NO)PRMCOSDREC(F*IGLREP()*TYPE)  
TOTYPE(*FROMTYPE)TOPART(*FROMPART)  
B?~D`MM{Fky4F?~D`MM{F`,#Z PRMCODE N}O8(K1  
!5 *GRP#SRCFILE(*TYPE) 8(?~;f"Z1!4D~ QRPGSRC P#K>}  
Y(zT DEVELOPER3 i_P|BCJ(#  
Z5B 4(?~ 47  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
g{Zi DEVELOPER1 PR;=C?~,r|n+'\,r*8(K SCAN(*NO)#  
g{?~fZZi DEVELOPER3 (DEVELOPER3"TEST2 r MASTER)D1!Q  
w76P,r9C CHKOUTPART |n,x;\y8(Da}kG24#PX  
CHKOUTPART |nDji,N<Z613D:lv?~ (CHKOUTPART);#  
48 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Z6B <k&CLr  
VfD&CLr"&CLrDw?V,T0vpI1rTs<ITCZ0&CLr*  
"\mw1&\?~DXF.B#K&\?~Jm*"_r\m1+Tsr4I1<  
k=n?cNa9P#<km>+&CLrD;vr`vi~S OS/400 b4F=0&  
CLr*"\mw1n?cNa9P#9C0<k?~1(IMPPART) |n44PKY  
w#  
>BhvgN+vpTsr{v&CLr<k=n?cNa9P,"a)KXZgN  
4PK}LD;)p=8<E"#Z<k&CLr.0,z&C()1d4DA  
ADTS/400: Application Development Manager Introduction and Planning Guide PPX  
<k&CLrDG;Z,|P>Kz&C<GD;)Bn#  
<k=n?cNa9P  
(#,\m19C IMPPART |n44F{v&CLrr_&CLrD;s?V,x*  
"_\I\;4F\YD4I1rTs#\m1IT+Tsr4I1<kn?cNa  
9PDNNiP;*"_IT+|G<k={GTd_P|BCJ(DiP#  
XkTzk<kDTsMD~_Pc;D(^#h*T4D~_P *USE (^E\<k  
dI1,xXkTzk<kDNNTs_P *USE M0Ts\m1(^#g{zTT<  
<kDTs;P}7D(^,r IMPPART |n+'\#  
g{zD&CLrV"Z8vbP,rITWH<k;vbPDyPTsMI1,;  
sYLxB;vb,1=I&X<k&CLrDyPi~*9#  
g{8(K REPLACE(*NO),r IMPPART |ngT0GyKw#g{Z+|,;<  
k?~DiD1!Qw76PQ-fZ`,{FM`MD?~,r1z<kC?~1  
Xk8(a}k *NONE#?~DD>hv;|B,T43y<kTsr4I1DD>  
hv#1<k?~1,|"4;lv=zDC'r*mP#  
g{8(K REPLACE(*YES),RfZ`,{FM`MD?~"RQ-;,;C'Z?  
jiPlv,rC?~+;<kD?~f;#g{C?~4;lv},R|fZZ1  
!cNa9P,rC?~;lvxs;f;#rK,1<kjI1,lvD?~Va  
;lkX%#  
g{f REPLACE(*YES) ;p98(K ARCHIVE(*YES),r?~D-<f>;i5#  
*,$0&CLr*"\mw1Dj{T,;)<kDTsI*n?PD?~,rT  
y<kTsDyP(^Ma;|D#Ty<kTsD+C(^;hC* *EXCLUDE#T  
y<kTsD(C(^G9C(^Pm4hCD#PXji,N{ iSeries Security  
Reference#  
g{z9C0`L*"\mw15CLr,rIT9C09Ci1A;OD!n 38(<  
k)4<kI1MTs#9IT9CF* IM M IO DC'(e!n4ozzxP<  
k#IM +<kI1,IO +<kTs#PXgN4PKYwDE",N{Z2083D:9  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
49  
 
(#,;&<kI BLDPART |n4(D?~#BLDPART |nh*\;`k<kD?  
~TKbQ-<kDw?~.dDX5,xxXB4(dv?~#  
g{z<kdv?~,r1 BLDPART T<9(?~1,9((fP+"v/f,49  
Z9(DQw76PI\fZ,{D4?~1`GgK#ZK5}P,+h*>}d  
v?~,"YN"v BLDPART |n#  
g{zk<k_-D~,rXkWH+CD~yyZDomD~<k=,;iP#<  
k *ALL Ts1;h*4PK=h,r* IMPPART |n+7#omD~GZ_-D  
~.04FD#  
y<kDQGkU>DD~Zn?cNa9P+;a;GkU>#  
zk<kDD~rTs  
Z IMPPART |nO,Xk8( from M to j<#from E"Im>zk<kDE"D  
OS/400 bMTsiI#g{z}Z<k4D~,r9*8>I1{#9C OBJ"  
OBJTYPE M MBR N}4j6zk<kD) OS/400 Ts#  
Z OBJ N}O8(b{#Xb5 *LIBL M *CURLIB r_X(Db{G\'VD#  
9*Z OBJ N}O8(TsD{F,r_9C`t{#ITCq= ABC* 48(`t  
Ts,b+&mTz8(DV{*7(g ABC)DyPTsrD~#X(DTs{+<  
k;vTs#Xb5 *ALL +<kZ8(bPR=DyPTs#+G,*"b,;\(  
}Z IMPPART |nO8( OBJ(*LIBL/*ALL) 4<kZbPmPR=DyPTs#X  
b5 *ALL ;N;\dO;vb9C#9a<k_PC'(e`MDNNTsT0*|  
G(eDJ1 *CPY Yw#  
OBJTYPE N}8>zk<kDV`MD OS/400 Ts#;\<k\0&CLr*"\  
mw1&\?~'VD OS/400 Ts`M#m4 P>K\'VD4I1`M,Z523D  
m5P>K\'VDTs`M#9IT<kC'(e?~`M#  
m 4. &CLr*"\mw&\?~'VD OS/400 4I1`M  
OS/400 Ts`M  
*FILE  
OS/400 I1`M  
?~`M  
VRPGTXT¹  
BNDSRC  
CINC  
?~oT  
VRPG  
BND  
C
*FILE  
BND  
C²  
*FILE  
*FILE  
C²  
CINC  
CLE  
*FILE  
C³  
CSRC  
C
*FILE  
C³  
CSRC  
CLE  
*FILE  
CBL⁴  
CBL⁵  
CBL36  
CBL36  
CBLLE⁴  
CBLLE  
CL  
CBLINC  
CBLSRC  
CBL36INC  
CBL36SRC  
CBLLEINC  
CBLLESRC  
CLSRC  
CBL  
*FILE  
CBL  
*FILE  
CBL36  
CBL36  
CBLLE  
CBLLE  
CL  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
CLD  
CLDSRC  
CLD  
50 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
m 4. &CLr*"\mw&\?~'VD OS/400 4I1`M (x)  
OS/400 Ts`M  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
OS/400 I1`M  
CLLE  
?~`M  
CLLESRC  
BLDOPT⁶  
CLPSRC  
?~oT  
CLLE  
CLP  
*NONE  
CLP  
CLP  
CLP  
PRDDFN⁶  
PRDLOD⁶  
CMDSRC  
DDSSRC  
DSPF36SRC  
DDSSRC  
DDSSRC  
PNLSRC  
MNU36SRC  
MSGF36SRC  
OCL36SRC  
DDSSRC  
PNLINC  
*NONE  
*NONE  
CMD  
CLP  
CMD  
DSPF  
DSPF  
DSPF36  
ICFF  
DSPF36  
ICFF  
LF  
LF  
MENU  
MNU36  
MSGF36  
OCL36  
PF  
MENU  
MNU36  
MSGF36  
OCL36  
PF  
PNLGRP⁴  
PNLGRP  
PRTF  
PNLGRP  
PNLGRP  
PRTF  
PNLSRC  
DDSSRC  
REXXSRC  
RPGINC  
REXX  
RPG⁴  
REXX  
RPG  
RPG  
RPGSRC  
RPG36INC  
RPG36SRC  
RPGLEINC  
RPGLESRC  
RPT36SRC  
CINC  
RPG  
RPG36  
RPG36  
RPGLE⁴  
RPGLE  
RPT36  
SQLC²  
SQLC²  
SQLC³  
SQLC³  
SQLCBL⁴  
SQLCBL⁵  
SQLRPG⁴  
SQLRPG  
SRT36  
TXT  
RPG36  
RPG36  
RPGLE  
RPGLE  
RPT36  
SQLC  
CINC  
SQLCLE  
SQLC  
CSRC  
CSRC  
SQLCLE  
SQLCBL  
SQLCBL  
SQLRPG  
SQLRPG  
SRT36  
*NONE  
*NONE  
TXT36  
*NONE  
CBLINC  
CBLSRC  
RPGINC  
RPGSRC  
SRT36SRC  
SCHPTH⁶  
SYSTEML  
TXT36SRC  
TXTSRC⁷  
TXT  
TXT36  
Z6B <k&CLr 51  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 4. &CLr*"\mw&\?~'VD OS/400 4I1`M (x)  
OS/400 Ts`M  
"b:  
OS/400 I1`M  
?~`M  
?~oT  
1. VRPGTXT ?~P?vI1DI1`MGI VARPG y]dZ]4hCD,"R+I  
IMPPART |n4#t#  
2. g{z<kF* H D4D~,r+4(`M* CINC D?~#g{I1`M* C,r<k  
D?~DoT+* CLE#`FX,g{I1`M* SQLC,r?~oT+* SQLCLE#g{  
zk<koT* C r SQLC D CINC ?~,rXkT=X8(oT#  
3. g{I1`M* C R?~`M* CSRC,ry<k?~DoT+* CLE#g{zk<koT  
* C r SQLC DK?~,rXkT=X8(oT#`FX,I1`M SQLC +_PoT  
SQLCLE#  
4. IT<k|,,+G;PXZ OS/400 53DNNE"4+4k|,xV*4#1<k  
RPG"SQLRPG"CBL"SQLCBL r PNLSRC I11,0&CLr*"\mw1?~+IC  
k 4 I 1 T & D 1 ! ? ~ ` M # * + b ) I 1 < k = ` M *  
RPGINC"RPGLEINC"CBLINC"CBLLEINC r PNLINC D?~P,XkT=X8(?~`  
M,r_9C CVTPART |n4|DC?~D`MMoT#  
5. g{z<k`M* CBL r SQLCBL DI1,R||,`vLr,r BLDPART |n+;  
`kZ;vLr#d{Lra;vT,"RZ9((fP+"v/f{"#  
6 . I 0 & C L r * " \ m w 1 4 ( D X b 4 D ~ G  
QBLDOPTSRC"QSCHPTHSRC"QDFNSRC"QLODSRC M QSYSTEMSRC#g{zSb)  
4D~P<kI1,ra4(J1`MD?~#}g,1S QBLDOPTSRC P<k4I11,  
M4(K BLDOPT ?~#  
7. ZCmP4P>d`MDyPI1Gw*`M* TXTSRC"oT* *NONE D?~4<kD#  
1<kI11,I1`M;a|D#  
m 5. \&CLr*"\mw&\?~'VD OS/400 Ts`M  
OS/400 Ts`M  
*BNDDIR  
*CLD  
OS/400 TstT  
?~`M  
BNDDIR  
CLD  
?~oT  
*NONE  
CLD  
*CMD  
CMD  
CMD  
*DTAARA  
*FILE  
DTAARA  
FILE  
*NONE  
DSPF  
DSPF  
ICFF  
LF  
*FILE  
FILE  
ICFF  
*FILE  
FILE  
LF  
*FILE  
PF  
FILE  
PF  
*FILE  
PF  
PARTL  
VRPGBIN  
FILE  
*NONE  
VRPG  
PRTF  
*FILE  
PF  
*FILE  
PRTF  
SAVF  
*FILE  
FILE  
SAVF  
*NONE  
*NONE  
*NONE  
CBLLE  
CLE  
*JOBD  
JOBD  
*JOBQ  
JOBQ  
*MENU  
*MODULE  
*MODULE  
UIM  
MENU  
MODULE  
MODULE  
CBLLE  
CLE  
52 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
m 5. \&CLr*"\mw&\?~'VD OS/400 Ts`M (x)  
OS/400 Ts`M  
*MODULE  
*MODULE  
*MSGF  
OS/400 TstT  
CLLE  
?~`M  
MODULE  
MODULE  
MSGF  
?~oT  
CLLE  
RPGLE  
*NONE  
*NONE  
*NONE  
*NONE  
C
RPGLE  
*MSGQ  
*OUTQ  
MSGQ  
OUTQ  
*PNLGRP  
*PGM  
PNLGRP  
PGM  
C
*PGM  
CBL  
PGM  
CBL  
*PGM  
CBL36  
CBLLE  
CLE  
PGM  
CBL36  
CBLLE  
CLE  
*PGM  
PGM  
*PGM  
PGM  
*PGM  
CLLE  
CLP  
PGM  
CLLE  
CLP  
*PGM  
PGM  
*PGM  
RPG  
PGM  
RPG  
*PGM  
RPG36  
RPGLE  
PGM  
RPG36  
RPGLE  
*NONE  
*NONE  
CBLLE  
CLE  
*PGM  
PGM  
*SCHIDX  
*SRVPGM  
*SRVPGM  
*SRVPGM  
*SRVPGM  
*SRVPGM  
SCHIDX  
SRVPGM  
SRVPGM  
SRVPGM  
SRVPGM  
SRVPGM  
CBLLE  
CLE  
CLLE  
RPGLE  
CLLE  
RPGLE  
Z OBJTYPE N}O9CXb5 *ALL,TT>*4FX(bPyP\'VDTs#K  
5;\kbPm,19C,xR;N;\9C;vX(b#  
Xb5 *SRC 8>z;k*4Fw*4omD~DTs#8( *SRC 1,a<k_P  
TstT PF Rw*4omD~DyPTs#m4T> OS/400 I1`MgNk0&C  
Lr*"\mw1?~`MT&#"b,9a<kmP4PvDI1`MDyPI  
1,+b)I1+w*`M* TXTSRC D?~#K5;\kbPm,19C,xR;  
N;\9C;vX(b#  
Xb5 *NONSRC T>*4F4w*4omD~DyPTs#8( *NONSRC 1,a  
<kkZ523Dm5PPvDTs`M`%dDyPTs#K5;\kbPm,19  
C,xR;N;\9C;vX(b#  
IZ OBJTYPE N}O8>X(Ts`M#}g,I8( OBJTYPE(*PGM) T<ky  
PLr,r8( OBJTYPE(*MSGF) T<kyP{"D~#g{8( OBJTYPE(*FILE),  
r a < k ` M *  
* F I L E  
R _ P t T  
P F ( } ] M 4 o m D ~ ) "  
LF"DSPF"PRTF"SAVF r ICFF DyPTs#<k4D~D==!vZZ TYPE N  
}O8(DZ]#g{8( TYPE(*FILE),r4D~aw*om}]D~<k#*+4  
D~w*4<k,4,%@X<k?vI1,r9C1!5 TYPE(*OBJTYPE)#  
Z6B <k&CLr 53  
Download from Www.Somanuals.com. All Manuals Search And Download.  
<k4omD~1,IZ MBR N}O8(X(4I1,r(}9CXb5 *ALL 8  
>*<k4D~ZDyPI1#9I9C`t{#I9Cg ABC* .`Dq=8(`t  
I1{,Sxa&mTV{ ABC *7DyPI1#  
g{Z OBJTYPE N}O8(K *FILE"*SRC"r *ALL,,198(K OBJ(*ALL),  
rh*5 MBR(*ALL)#g{;S4D~<k;vI1,r8( OBJ(D~{)"  
OBJTYPE(*SRC)(r OBJTYPE(*FILE))M MBR(I1{)#  
k*4(D?~  
Xk8(;)E"48>k*<k OS/400 Tsr4I1D;C#  
XhN}  
?~GZz8>Dn?MiP4(D,T OS/400 Tsr4I1*y!#Z PRJ N}  
O8(n?{,"Z GRP N}O8(i{#b=vN}<GXhD#  
Z TYPE N}O8(0&CLr*"\mw1?~`M#g{8(Xb5 *OBJTYPE  
R}Z<kDTs;G4omD~,r?~`M1!* OS/400 Ts`MD0&CLr  
*"\mw1H'5#}g,g{<k *PGM Ts"8( TYPE(*OBJTYPE),r0&  
CLr*"\mw1`M* PGM#  
g{}Z<kDTsG4omD~,r?vI1<aI;v@"?~#TZb)?  
~,Z8(Xb5 *OBJTYPE 1C?~`M1!* OS/400 TstTMI1`MD0&  
CLr*"\mw1H'5#N<m4Mm5Ti4 OS/400 `Mk?~`MD`XT#  
9I8(X(?~`M#+G,;\Z TYPE N}Oa)T<kD OS/400 Ts^be  
D0&CLr*"\mw1?~`M#}g,;\+`M* *PGM DTs<k`M*  
RPGSRC D?~#g{T<byvD0,IMPPART |na'\#  
XkZ IMPPART |nD TYPE N}O8( VRPGTXT r VRPGBIN,E\<k  
VARPG 4r~xFTs#g{<kK4D~,R8(K`t?~`M,ravp<k  
4D~PDI1#g{<kKomD~,R8(K`t?~`M,rComD~aw  
*`M* *FILE D?~<k#  
>}: TB|n+<kxP C/400 4odD4I1,"4(`M* CSRC D?~  
HELLO#?~oT;hC* CLE(g{ HELLO D4I1tT* C D0)#  
9C IMPPART |n  
IMPPART OBJ(*CURLIB/CSRC)OBJTYPE(*SRC)MBR(HELLO)PRJ(PAYROLL)  
GRP(MASTER)TYPE(CSRC)PART(*NAME)  
9C0`L*"\mw15CLr  
Z0C PDM 49Ci1A;O!q!n 38(<k)#  
g{<k|,tT* C r SQLC D C 4D4I1,a4(`M* CSRC (}GZ  
TYPE N}Ow78(K CINC `M)R?~oTVp* CLE r SQLCLE D?~#  
Z PART N}O8(?~D{F#!q?~{1!5 *NAME a<B4I1{rTs  
{I*B?~D{F#8(?~{(g{k*T}Z<kD?~w7|{D0),r  
x(B{F(r*;<kxPC{FDTsr4I1)#  
>}: I1 BIWKLY ;<k"X|{* EMPMST#  
54 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
IMPPART OBJ(*CURLIB/QRPGSRC)OBJTYPE(*SRC)MBR(BIWKLY)  
PRJ(PAYROLL)GRP(MASTER)TYPE(RPGSRC)PART(EMPMST)  
g{h*<kDTsD{FT0&CLr*"\mw1?~^'(gTsD{FPx  
P!4V{),rXkT=|{B?~#g{ZK&9C PART(*NAME), IMPPART  
|n+a'\#  
g{(}ZTs (OBJ) rI1 (MBR) N}O8( *ALL 4<k`v4I1rTs,  
r;\T=|{b)?~#xG,Xk(}8( PART(*NAME) 4C?~{1!*4I  
1{rTs{#  
>}: TB|n<k10bD4D~ QRPGSRC PDyP4I1,"9Cb)4I1  
D{F44(?~#  
IMPPART OBJ(*CURLIB/QRPGSRC)OBJTYPE(*SRC)MBR(*ALL)  
PRJ(PAYROLL)GRP(MASTER)TYPE(*OBJTYPE)PART(*NAME)  
"b,9C IMPPART |n;\f;n?cNa9PDVf?~#g{C?~Q-fZ  
ZzT<ZdP4(|DiP,r_g{C?~fZZCiDQw76P,r IMPPART  
|na'\#Xk>}Qw76PyPvVC?~D;C,""TYN<kC?~#  
I!N}  
Z+Ts<kn?cNa91,}8(4M?jj<b,9I8>PXC?~DBP  
E":  
v oTtT  
v a}k(N{Z763D:a}k;Tq!ji)  
v k*f"?~D4D~  
v Gqk*9Com}]D~44F}]  
v Gqk*f;Vf?~  
v *mS<k?~{D?~Pm?~  
v Gqk*+}Z<kD?~DIf>i5  
v Gqk*kB?~`X*DhvTD>  
9CN} LANG"PRMCODE"SRCFILE"DATA"REPLACE"PARTL"ARCHIVE M  
TEXT 4Vp8>KE"#  
Z LANG N}O8(C?~DoTtT#LANG N}1!5* *ATTR#g{<kT  
s,Ts`MMTstTC47(0&CLr*"\mw1oTtT#g{<k4D  
~,a9CI1`M#N<Z503Dm4MZ523Dm5Ti4 OS/400 Ts`Mk0&  
CLr*"\mw1?~oTD`XT#  
IZKN}O8(;VoT,r_I8( LANG(*NONE),8>;PoTtT#5  
*NONE vT;h*oTtTD?~P'#  
VRPGTXT r VRPGBIN ?~_P0&CLr*"\mw1?~oT VRPG#  
>}: g{S4D~<k RPG 4I1,+Vk*4(`M* CSRC D?~,rXk  
Z IMPPART |nP8(oTtT C,gTB|nPy>#  
IMPPART OBJ(*CURLIB/QRPGSRC)OBJTYPE(*SRC)MBR(BIWKLY)PRJ(PAYROLL)  
GRP(MASTER)TYPE(CSRC)PART(BIWKLY)LANG(C)  
g{(}ZTs (OBJ) rI1 (MBR) N}O8( *ALL 4<k`v4I1rTs,  
rXk9C1!5 LANG(*ATTR)#  
Z6B <k&CLr 55  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z
S R C F I L E  
N } O 8 ( * f " B ? ~ D ; C # 1 ! i v G ( } 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#  
Z DATA 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:  
v C?~+;lvA*<k|Di  
v C?~+;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*mKPK|n,rK5^'#PARTL N}D1!5G  
*NONE,8>}Z<kD?~+;amSA?~Pm?~#  
BPivBXk8(?~Pm?~:  
v Z|nO8(DiG9C PARTLREQ(*YES) 4(D  
v 8(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#(49|n4\<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  
Z TEXT 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  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
<k;v?~D=8  
>Zhv<k?~1*q-D=h#  
1. j6k*<kD OS/400 TsrI1  
Xk7(CTs`MGq\0&CLr*"\mw1&\?~'V#N{Z523D  
m5#9I<kC'(eD?~`M#  
2. <k4I1  
"v IMPPART |nT<k|,4zkD4omD~#TB>}+F* PROG1 D  
4I1<ki DEVELOPER1 PF* BIWKLY D?~#  
IMPPART OBJ(*CURLIB/QRPGSRC)OBJTYPE(*SRC)MBR(PROG1)PRJ(PAYROLL)  
GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
3. X*1|D?~  
<k?~s,7#49Cb{^(4I1PDyP|,?~Mb?}C#g{^(  
KD0,r+|G|D* *LIBL,x;GX(bD{F#Z9(}LP,bTZJm  
`kwZn?PiRC?~D}7f>45GXhD#  
g{Z IMPPART |nD SRCFILE N}O8(K;,Z *TYPE D5,r&7#  
yP|,?~<G9CD~{^(D#  
4. 9(?~  
Xk9(?~E\7#yP`X?~Q<kRGnBD#(iZ<k?~s9CB  
P!n49(|#  
PART(*ALL) 9(<kDyP?~  
TYPE(*ALL)  
9(yP`MD?~  
g{;<k OS/400 Ts,r9(}L;*@CTs0dT&4.dD?~X5#9  
Xk<k4,r9(}LaZ"T9(CTs1"v/f{"#N{Z1193D  
:Kb?~X5;Tq!PX?~X509(}LDji#  
5. i$?~GqTZ{D==KP  
<ky>&CLr  
>ZhvZ4(B0&CLr*"\mw1n?cNa9MSb SAMPLE P<kTB  
i9&CLr1*q-D;5P|n#(SAMPLE b";Gf>z7a)D,zh*4  
(|#)|Y(zw*<k4I1x;GLrTs#Z<k&CLrs9(|MI4(  
zh*DyPLrTs#  
m6PvKC44(TB=hPEvDB0&CLr*"\mw1n?cNa9D OS/400  
I1(0d`X*DTs`MMI1`M)#  
m 6. OS/400 I10d`X*DTsMI1`M  
OS/400 I1  
REFMST  
CTLFIL  
Ts`M  
*FILE  
I1`M  
PF  
PF  
PF  
PF  
*FILE  
EMPMST  
RSNMST  
*FILE  
*FILE  
Z6B <k&CLr 57  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
m 6. OS/400 I10d`X*DTsMI1`M (x)  
OS/400 I1  
TRWEEK  
TRWEEKL  
PRG03FM  
PRG06RP  
PROC3  
Ts`M  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
*FILE  
I1`M  
PF  
LF  
DSPF  
PRTF  
CLP  
PRG03  
SQLRPG  
SQLRPG¹  
PRG03A  
":  
1. KI15JOG;v|,I1#  
m7PvKC44(TB=hPEvDB0&CLr*"\mw1n?cNa9D OS/400  
Ts,0d`X*DTs`MMTstT#  
m 7. OS/400 Ts0d`X*DTs`MMTstT  
OS/400 Ts  
Ts`M  
TstT  
MESSAGES  
*MSGF  
*NULL  
1. 9C CRTPRJ |n4(n?#TB|na4(n? PAYROLL#  
CRTPRJ PRJ(PAYROLL)SHORTPRJ(PRL)TEXT('WEEKLY PAYROLL PROCESSING  
APPLICATION')  
PX4(n?Dji,N{4(n? (CRTPRJ)#  
2. Zn? PAYROLL P4(yi#&CLra;<kyi#TsIZn?cNa9P  
mSd{i#TB|nZKn?P4(i MASTER#  
CRTGRP PRJ(PAYROLL)GRP(MASTER)SHORTGRP(MST)PARENT(*NONE)  
TEXT('MASTER GROUP IN PROJECT PAYROLL')  
PX4(iDji,N{4(i (CRTGRP)#  
3. j6F.<kDyP&CLr,"7(D)Ts`MI<kn? PAYROLL#N{  
Z503Dm4MZ523Dm5Tq!\0&CLr*"\mw1&\?~'VDy  
P OS/400 Ts`MDPm#  
<G9C0C PDM 49CI11A;M0C PDM 49CTs1A;4Pvwv  
&CLrD?~D OS/400 4D~I1MTs#9IZb)A;P9C IM M IO  
C'(e!n#|GZZ2083D:9CC'(e!n;PwKhv#  
4. 9C IMPPART |nT<k|,4zkDyP4omD~#9CTB|n4+b  
SAMPLE P"VD?v4D~ZDyPI1<kn? PAYROLL#Zi9&CLr  
P,"bI1 PRG03A 5JOG|,I1#  
IMPPART OBJ(SAMPLE/*ALL)OBJTYPE(*SRC)PRJ(PAYROLL)GRP(MASTER)  
TYPE(*OBJTYPE)PART(*NAME)  
g{4zk$tZ8v;,DbP,rT?vb9CK|n,+ SAMPLE f;*  
5Jb{#  
5. 9C IMPPART |nT<k&CLryhDyPTs#9CTB|n4<kb  
SAMPLE PDyPTs#Zi9&CLrP,;a<k;vTs,|;F*  
MESSAGES#  
58 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
IMPPART OBJ(SAMPLE/*ALL)OBJTYPE(*NONSRC)PRJ(PAYROLL)GRP(MASTER)  
TYPE(*OBJTYPE)PART(*NAME)  
6. *?vQ<kD`M* CMDSRC ?~4(`M* BLDOPT D?~#BLDOPT ?  
~&k`M* CMDSRC D?~,{,RXk|,K|n4yhD4(|n#N{  
9C9(!nTq!PXgN*&CLr4(M\m9(!nDji#  
7. +9Cb^(odDyP?~|D* *LIBL#  
8. g{Z<ksz5PD4?~Xk*;*|,?~,r9C CVTPART |n#ZK  
>}P,I1 PROG3A 5JOG|,4I1#ZCI1<k1,a4(`M*  
RPGSRC D?~ PROG3A#K?~Xk*;*`M* RPGINC D?~#PX<k  
|,?~DE",N{Z503Dm4#  
9 . g { k * 9 ( < k D ? ~ , I Z  
B L D P A R T  
| n O 8 (  
GROUP(MASTER)"TYPE(*ALL)"M PART(*ALL),T9(UU<kDyP?~#  
10. + BLDPART |nk SCOPE(*NORMAL) dO9CT9(&CLr#TB|na  
Zn? PAYROLL Di MASTER P9(yP`MDyP?~#  
BLDPART PRJ(PAYROLL)GRP(MASTER)TYPE(*ALL)PART(*ALL)  
SCOPE(*NORMAL)  
N{Z11B 9(&CLrTq!PXgN9(&CLrDji#  
11. (}bT&CLrTi$|GqTZ{D==KP#i4Z12B bTMKP&CL  
rTq!PXxPKYwDE"#  
Z6B <k&CLr 59  
Download from Www.Somanuals.com. All Manuals Search And Download.  
60 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Z7B 9C?~  
Z9C?~1a4PDy>n/P:  
v lv?~  
v |D?~  
v HO?~  
v O"?~  
v lk?~  
v a}?~  
v X|{?~  
v >}?~  
v i5?~  
9ITPX?~DE"4PBPn/:  
v |D?~E"  
v r!?~E"  
v lwPX?~DE"  
v +?~*;*;,`MD?~  
"
k4("|Dr>}0&CLr*"\mw1E"(n?"iM?~)`X*D  
yPNq&9C0&CLr*"\mw1gfjI#b)gf|( CL |nM0`  
L*"\mw1A;(I WRKPRJPDM"WRKGRPPDM M WRKPARTPDM |  
n4()#Kb,9I(} CODE/400 z7M0&CLr*"$_d1D0&CL  
rVd~q1&\?~4CJ0&CLr*"\mw1n?"ir?~#9I9  
C CHGPARTINF |n4,=?~1dAG,TJm BLDPART |n6pQ|D  
D?~#  
lv?~ (CHKOUTPART)  
?~Xkj+IzXF,zE\|D|#KXF(G(}0lv?~1 (CHKOUTPART)  
|nqCD#  
9C CHKOUTPART |n4+?~lvAzT_P|BCJ(Di#SC?~$tD  
i+d4FA8(i,xZ?jiOhCC?~DM;x((n?cNa9P?~I  
a}ADnUi)#CJ\?;hC*zDC'r*m#hCCJ\?D?DG@9d  
{K|BC?~#1z9C0lk?~1 (CHKINPART) |n1,KCJ\?;4;*  
UW#M;x(kf"DPX?~DE"`X*#|G|,vVC?~DnM;CD  
iD{F#  
g{C?~Z+dlvADiPP;fZ,CHKOUTPART |naSn?cNa9PO  
_6pDiP4F|#53aS8(i*<Tn?cNa9xP(h,TiRxP%  
d{FM`MD?~#C?~XkfZZ1!Qw76PE\;lv#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
61  
 
g{k*7(C?~GqQ;lvApDi,r9C PRTPARTINF |nTKP;v(  
f,T>CC?~lvDK1M+C?~lvADi#i4Z863D<30Tq!y>  
(f#  
XhN}  
Z CHKOUTPART |nO8(n?"i"`MM?~#"GyP`MD?~<ITl  
v#  
I!N}  
9C PRMCODE N}48(*Z7(?~Da}7619CDa}k#KN}JCZ  
8v|n,RZZ763D:a}k;PwKhv#"b,g{9Ca}k *NONE lv  
?~,;sv(a}C?~,rXk>}C?~,"9Ca}k *GRP YNlv|#  
X k T g B ` M D ? ~ 8 ( P R M C O D E ( * N O N E ) : b ) ? ~ D ` M *  
PGM"FILE"CLD"CMD"MENU"PNLGRP"MODULE"SRVPGM rGf"ZI09  
(?~1(BLDPART) |n4(D OS/400 TsPDC'(e`M#v1Z PRMPART  
|nO8( EXTEND(*YES) 1E\a}b)`MD?~#"b,`M* PGM RoT  
* CBL36 M RPG36 D?~I9CNNa}klv#  
>}  
>>}5w?~ RPGSRC BIWKLY(fZZi TEST P)gN;lvAi  
DEVELOPER1#Z633D<225wKK}L#  
9C CHKOUTPART |n  
CHKOUTPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
PRMCODE(*GRP)  
9C`L*"\mw5CLr  
Z0C PDM 49C?~1A;O!q!n 28(lv)#  
62 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
< 22. CHKOUTPART |nMa}k  
DEVELOPER1 Da}k* MASTER,yT?~ RPGSRC BIWKLY ;8(*Ka}  
k,m>|nUIa}Xi MASTER#  
g{h*PXa}kDji,i4Z163D:*n?cNa9(e;va}k;Tq  
!PXn?\m1gNhCa}kDhv#Z743D:a}?~ (PRMPART);hv0a  
}?~ (PRMPART) |nMa}kN}D9C=(#*i4iDa}k,"v0r!n  
?1(PRTPRJ) |n#  
}]2+TMj{T  
?~DM;x(h9?~;lvA`vi#}g,g{?~Q;lvAn?cNa9  
m;V'P9C,;a}kDD*"i,raZ?jiOTC?~hCdM;x(#  
?jiGh9zCJC?~D TEST i#  
< 23. ?~ODM;x(hC  
Z7B 9C?~ 63  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z<23P,RPGSRC BIWKLY fZZi TEST P#Zi DEVELOPER2 P$wD*  
"_Q+?~lvACi,"rc9Ca}k TEST +C?~a}Xi TEST#rK,  
g{}Zi DEVELOPER1(|2_Pa}k TEST)P$w,r;\lvK?~#b  
yvb6E_P`,{FM`MD=v?~+;a}A,;i#M;x(I@9bV  
iv"z#  
MASTER  
MASTER  
RPGSRC BIWKLY  
MASTER  
TEST  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
RPGSRC BIWKLY  
< 24. ?~ODM;x(hC  
Z<24P,RPGSRC BIWKLY fZZi MASTER P#|;lvAi DEVELOPER1,  
"+;a}XAi MASTER#RPGSRC BIWKLY ;\;lvAi TEST,r*i  
DEVELOPER1 DM;x(ah9KYwDxP#  
?~DCJ\?h9`v*"_lvC?~#}g,g{Ti_PCJ(Dm;*"  
_QlvC?~,MTC?~hCKM;x(,RC?~DCJ\?Q;hC*KK  
DC'r*m#v1?~DCJ\?;hC*UW1,zE\lvK?~#  
|D?~ (CHGPART)  
;)zlvK?~,|MZzDXF.B,I9C0|D?~1 (CHGPART) |n4|  
D|#XkT|,k*|DD?~Di_P|BCJ(#g{C?~QfZZ8(i  
P,r CHGPART |naWH+dlv#  
"
g{T?~$tDi_P *UPDATE CJ(,rZ0C PDM 49C?~1A;  
OD?~0dk!n 2(|D)#+aZC?~fZDix;GZz$wDiPl  
vC?~"xP|D#  
64 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
CHGPART |naKP OS/400 |n,T|D8(?~DZ]rXw#g{C?~GI  
`-D,raT>J1D`-a0#g{C?~;\`-,raT>J1D|D|n  
TJmzTdXwwJ1D|D#  
XhN}  
8(*|DDn?"i"`MM?~#"GyP`MD?~<I|D#i4=<B. ?~  
`MT0|Gk|nDX5Tq! CHGPART |nyJmD?~`MDPm#  
I!N}  
CHGCMD N}7(*wCD|D|n#IZKN}O8( *TYPE"STRSDA"STRRLU  
r UPDDTA#  
g{!q1!5 CHGCMD(*TYPE),r?~`MMoTtT+C47(*wCD|D|  
n#}g,g{|D`M* RPGSRC D?~,I+ SEU `-wkdo(li&\d  
O9CT`-C4?~PfZD4#  
g{;\`-C?~,53aa>zdkk*|DDE"#}g,g{k*|D`M  
* PGM D?~,IT;|DLr?~DtT,gkd`X*DD>#  
m8T>KZ CHGCMD N}O9C1!5 *TYPE 1*TX(?~`MwCD|n#  
m 8. Z8( CHGCMD(*TYPE) 1wCD OS/400 |D|n  
|n  
*|DD?~`M  
CHGCMD  
CHGDSPF  
CHGDTA  
CHGDTAARA  
CHGICFF  
CHGJOBD  
CHGLF  
CMD  
oTtT* DSPF D FILE  
PARTL  
DTAARA  
oTtT* ICFF D FILE  
CZ`M* JOBD D?~  
oTtT* LF D FILE  
CZoTtT* UIM `M* MENU D?~  
MODULE  
CHGMNU  
CHGMOD  
CHGMSGQ  
CHGOUTQ  
CHGPF  
CZ`M* MSGQ D?~  
CZ`M* OUTQ D?~  
oTtT* PF"VRPGBIN D FILE  
PGM  
CHGPGM  
CHGPRTF  
CHGSAVF  
STRSEU  
oTtT* PRTF D FILE  
oTtT* SAVF D FILE  
BLDOPT"BNDSRC"CBL36INC"CBL36SRC"CBLINC"CBLSRC"  
CBLLEINC"CBLLESRC"CINC"CLDSRC"CLLESRC"CLPSRC"CLSRC"  
CMDSRC"CSRC"DDSSRC"DSPF36SRC"MNU36SRC"MSGF36SRC"  
OCL36SRC"PNLINC"PNLSRC"PRDDFN"PRDLOD"REXXSRC"RPG36INC"  
RPG36SRC"RPGINC"RPGSRC"RPGLEINC"RPGLESRC"RPT36SRC"  
SCHPTH"SRT36SRC"SYSTEML"TXT36SRC"TXTSRC M VRPGTXT¹  
WRKBNDDIRE  
WRKJOBQ  
CZ`M* BNDDIR D?~  
CZ`M* JOBQ D?~  
Z7B 9C?~ 65  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
m 8. Z8( CHGCMD(*TYPE) 1wCD OS/400 |D|n (x)  
|n  
*|DD?~`M  
MSGF  
WRKMSGD  
WRKSCHIDXE  
":  
CZ`M* SCHIDX D?~  
1. T> VRPGTXT ?~PDyPI1DPm#ISKPmP!qM|DvpI1#  
PX|D`M* PARTL D?~Dji,N<Z923D:|D?~Pm?~;#  
TZC'(eD?~`M,at/Z CHGADMACN |nD ACTION N}O(eD  
*CHG Yw#ITC'(eD`M(eDYwZZ1153Dm10PwKhv#  
I8( STRSDA"STRRLU M UPDDTA,x;9C1!5 CHGCMD(*TYPE)(g{  
zZ53O20K0&CLr*"$_d1i~D0)#  
STRSDA  
SDA C4|D?~#SDA CZoTtT* DSPF D DDSSRC ?~#  
g{9C(} CHGPART |nwCD0A;hF(z15CLr`k  
K?~,r9(}LI\;6pb)`k,2;a|BQ|DD?~  
.dDX5#  
STRRLU  
UPDDTA  
RLU C4|D?~#RLU CZoTtT* PRTF D DDSSRC ?~#  
DFU C4|D?~#DFU CZ}]D~#  
": Z9C STRSDA r STRRLU |n.0,&9C ADDPRJLIBL |n+z}Z$  
wDn?bmSAbPm#I(}0C PDM 49C?~1A;9C!n 45(mS  
n?bPm)r9C PDM C'(e!n AP x;G9C ADDPRJLIBL |n#b  
7# SDA M RLU +\;R=}Z}CDD~PDyPVN}C#  
Z SEU r SDA P|DI14`M;a<BT&?~DoTtT"z`&|D#+G,  
g{9C CHGPARTINF |n|DK4?~DoTtT,rT&4I1DI14`Ma  
"z|DT%doTtT#  
"
&"b=g{Z0&CLr*"\mw1DXF6'.b|D?~,rI\a<  
B;I$bDa{#9(}LI\;6pQ|DD?~,2I\;\XB`kr  
&m|#ba<B?~0dT& OS/400 TsMI1.dzze;#  
Z PARTL N}P8( PARTL {a<B CHGPART |nT/+Q|DD?~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*mKPK|n,rK5  
^'#PARTL N}D1!5G *NONE,8>}Z|DD?~+;amSA?~Pm?  
~#  
BPivBXk8(?~Pm?~:  
v Z|nO8(DiG9C PARTLREQ(*YES) 4(D  
v 8(D`M;G PARTL  
66 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
g{8(K?~Pm?~,r:  
v ?~Pm?~XkfZZS|Db)?~Dip<D1!Qw76P#  
v |D?~{;mSA8(?~Pm?~,g{|9;fZD0#(49|n4\|D  
C?~,2I\a"zKiv)#  
g{8(D`M* PARTL,r PARTL N}a;vT#PARTL N}a<B8(?~P  
m?~;|B#  
9C ARCHIVE N}48(}Zf;D?~Gq&i5#PXT?~xPi5Dji,  
>}  
TB|na|Di DEVELOPER1 PD?~ RPGSRC BIWKLY#  
9C CHGPART |n  
CHGPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY) CHGCMD(*TYPE)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 2(|D)#  
CHGCMD(*TYPE) 8(?~`MMoTtTC47(;wCT|DC?~D OS/400 |  
D|n#ZK>}P,?~+EZ SEU `-a0P#  
I9CzT:D`-w4|D?~#I`4 CL r REXX Lr4lwT&Z0&CL  
r*"\mw1?~{D OS/400 4I1{,;s9CKE"4wC`-w#i4Z87  
3D:lw?~E" (RTVPARTINF);Tq!PXgNxPKYwD5w#  
9CzT:D`-w`-j?~s,&9C CHKINPART |n4lk?~#C?~D  
1dAGMON|DC?~DC'a;|B#by,B;N"v BLDPART |n1Ma  
9(C?~#  
*;?~D`MMoT (CVTPART)  
0*;?~1(CVTPART) |nZ,;n?MiZ+w*4I1D?~*;*;,`MD  
?~#<k.s,+`M* RPGSRC D?~*;*?~`M* RPGINC D|,?~,  
rG+`M* CSRC D?~*;*?~`M* CINC D|,?~GG#PCD#  
g{**;D?~;Z CVTPART |nO8(DiP,r;aZn?cNa9Dwvi  
PQwC?~#  
": ILE RPG/400 a)|T:D*;|n:0*; RPG 41(CVTRPGSRC) |n#C  
|na+|, RPG/400 4D4I1*;*|, ILE RPG/400 DI1#|,a{I  
1D4D~DG<$H;(;\YZ 112 vVZ#rK,RPGLESRC M  
RPGLEINC ?~Xk$tZG<$HAY* 112 VZD4D~P#Kb,;(*  
9CZ683Dm9PPvD^(5#  
(#,CVTPART |na4(B?~x;|DC?~#+G,g{-<?~G4I1,  
Rz8(}Z*;D?~D4D~kC4f"-<?~D4D~&G,;D~,r&  
>}-<?~#BD?~M`Mm>-<I1#}g,liF* QRPGSRC D4D~M  
Z7B 9C?~ 67  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
F* A R?~`M* RPGSRC DI1?~#g{+K4D~*;*?~`M RPGINC  
x;|D?~{,r CVTPART |n+>}-<?~ RPGSRC A "+d4FAF*  
RPGINC A DB?~#  
fr  
BPfrJC:  
1. TOTYPE {Xk;,Z FROMTYPE {#  
2. ;\*;`M* FILE D?~#  
3. `M* PGM r SRVPGM D?~;\*;*`M* PGM r SRVPGM D?~#  
4. w*4I1D?~;\*;*Tw*4I1Dd{?~#  
5. `M* TXTSRC D?~I*;*Tw*4I1DNN`MD?~#  
6. f"Z4I1PDNN`MD?~I*;*`M* TXTSRC D?~#  
^F  
}Ovfr.b,9ITZ CVTPART |nO,19CBmPPvD FROMTYPE M  
TOTYPE#  
m 9. CZ CVTPART |nD FROMTYPE M TOTYPE D^(5Pm  
Fromtype  
Totype  
CLD  
CLDSRC  
oT* CLLE D PGM  
oT* CLP D PGM  
RPGSRC  
CLLESRC  
CLPSRC  
RPGINC"RPGLEINC"RPGLESRC  
RPGSRC"RPGLEINC"RPGLESRC  
RPGLEINC  
RPGINC  
RPGLESRC  
RPGLEINC  
RPGLESRC  
": Z*;?~1,9(E";a4FAB?~#  
Z0C PDM 49C?~1A;O9C!n 50(*;?~)1,K CVTPART &\2  
GICD#  
>}  
4PBP=hT+`M* TXTSRC D?~*;*`M* PNLSRC RoT* PNLGRP  
D?~#  
1. 9C CVTPART |n+?~`M*;* PNLSRC#ba+doThC* MENU#  
2. 9C CHGPARTINF |n+doT|D* PNLGRP#  
VZ,Z1!ivB,g{+`M* TXTSRC D?~*;*`M* CSRC r CINC D  
?~,?~oTa;hC* CLE#yT,9I9COv=h+`M* TXTSRC D?~  
*;*:  
v `M* CSRC oT* C D?~  
v `M* CINC oT* C D?~  
v `M* CSRC oT* SQLC D?~  
v `M* CINC oT* SQLC D?~  
68 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
XhN}  
8(m>k**;d`MD?~Dn?"iM`M#g{k**;yP?~,9C1  
!5 PART(*ALL)#9Xk8(B`M#  
I!N}  
I8(:  
v }Z*;D?~D{F#1!5* TOPART(*FROMPART)#}Z*;D?~D{F  
#V;d#  
v a}k#1!5* PRMCODE(*GRP)#a9CCiDa}k#  
v &+C?~w*4I1f"dPD4D~D{F#1!5* SRCFILE(*TYPE)#a9  
C1!4D~#g{8( SRCFILE(*SAME),r9a9C-<?~9CD4D~{  
F#g{}Z*;BP?~`M,raIC5 *TYPE:PGM *;A CLPSRC M  
CLD *;A CLDSRC#i4Z433Dm3Tq!?~`M0d`&1!4D~DP  
m#SRCFILE N}9JCZf"Z4D~I1PDC'(e`M#  
v *;?~;mSAD?~Pm?~D{F#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*mKPK|n,rK5^'#PARTL N}D1!5G *NONE,  
8>}Z*;D?~+;amSA?~Pm?~#  
BPivBXk8(?~Pm?~:  
Z|nO8(DiG9C PARTLREQ(*YES) 4(D  
8(D`M;G PARTL  
g{Z CVTPART |nO8(K?~Pm?~,r:  
?~Pm?~XkfZZS*;b)?~Dip<D1!Qw76P#  
*;?~D{Fa;mSA?~Pm?~(g{|G9;fZD0)#(49|n  
4\*;C?~,2I\a"zKiv)#  
g{8(D`M* PARTL,r PARTL N}a;vT#TZd{ivxT,PARTL  
N}a<B8(?~Pm?~|B#  
HO?~ (CMPPART)  
0HO?~1(CMPPART) |naZ(fPHO=v?~MD5.dDnl#bZzX  
k+^}(FA?~DB;f>1aXpPC#  
ITBP`MD?~xPHO:  
v f"Z4D~I1PD?~  
v ?~`M* FILE RoT* PF(omD~)M VRPGBIN D?~  
v ?~`M* PARTL(?~Pm)D?~  
v ?~`M* VRPGTXT D?~  
*HO VRPGTXT ?~Dvp>z4I1,Tf"C?~D>z4omD~9C  
CMPPFM |n#  
XhN}  
8(m>}ZHODB?~Dn?"i"`MM?~#B?~XkfZZn?Mi  
P#;aQw1!icNa9TiRKiPR;=DNN?~#g{k*HOyP?  
Z7B 9C?~ 69  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
~ , r 9 C N E W T Y P E ( * A L L )  
M
N E W P A R T ( * A L L ) # 9 X k 8 (  
OLDTYPE(*NEWTYPE) M OLDPART(*NEWPART)#  
I!N}  
8(}ZHODI?~Di"`MM?~#aQw1!cNa9TiRKiPR;=  
DNN?~#  
*8(*4PHOD`M,9C CMPTYPE N}#9C CMPTYPE(*LINE) 4HOM  
j6ekD">}DM|BDP;9C CMPTYPE(*FILE) 4i4=vD~DZ]G;  
,9G`,;"9C CMPTYPE(*WORD) 4HOMj6mSD">}DM|BD%J#  
RPTTYPE |nC48((fD`M#1!5 RPTTYPE(*DIFF) ;aPvI1.dDn  
l#9C RPTTYPE(*SUMMARY) aPvHOa{D\a,x;T>j8Dnl;9C  
RPTTYPE(*CHANGE) aa)k *DIFF (f`M`,DE",0b)nlD0s.P;  
x9C RPTTYPE(*DETAIL) aPv{vBD~,8>nl,"a)a{\a#  
9C OUTPUT N}8>dv&&ZD;C#1!5* OUTPUT(*)#(faT>Z$w  
>O#g{|nGTz&m==KPD,rdv+aYQzAr!h8DdvSP#  
OUTPUT(*PRINT) a+dvYQzAr!h8#OUTPUT(*OUTFILE) a+dv}<A  
dvD~#  
OPTION N}hvk*gN4PHO#?;NI8(n` 12 v!n#PX OPTION N  
}D!nDji,N< ADTS/400: File Compare and Merge Utility PDCMPPFM |  
n#  
Z|,xPHO18nodDI1D STMTFILE N}O8(b{MD~{#PXHO  
18nodDji,N< ADTS/400: File Compare and Merge Utility#  
STMTMBR N}8(|,HOodDI1#  
>}  
TB|na+i DEVELOPER1 PD?~ RPGSRC BIWKLYk,;iPD?~  
RPGSRC BIWEEK xPHO#(f;YQzAr!h8#  
9C CMPPART |n  
CMPPART PRJ(PAYROLL)NEWGRP(DEVELOPER1)NEWTYPE(RPGSRC)NEWPART(BIWKLY)  
OLDGRP(DEVELOPER1)OLDTYPE(RPGSRC)OLDPART(BIWEEK)  
OUTPUT(*PRINT)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 54(HO?~)#  
O"?~ (MRGPART)  
0O"?~1(MRGPART) |naO"8(?jiD1!Qw76PDX(?~ryP  
?~#vf"Z4D~PD?~EITO"#ZzXk+|DS?~D^}f>(F  
A?~DB;f>,rG*Tx(?~O")&L|DMzT:D|D1,baXp  
PC#  
70 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
MRGPART |na+?v?j?~M,$?~kd`&y?~xPHO#b)HODa  
{C47(Gq"zK|B#  
*O" VRPGTXT ?~Z"VDvp>z4I1,Tf"C?~D>z4omD~9C  
MRGSRC |n#  
K|n9C MRGSRC |n#PX MRGSRC |nDji,N{ ADTS/400: File  
Compare and Merge Utility ;i#  
XhN}  
?jn?"?ji"?j`MM?j?~{8(?~O"s*ECD;C#?jG;  
v4?~,2I\|,k,$?~O"sD|B#O"Da{aEk?j?~#Xk  
TO"?j?~Di_P|BCJ(#C?j?~+;lvA?ji#i4=<B. ?~  
`MT0|Gk|nDX5Tq! MRGPART |nyJmD?~`MDPm#  
+Qw1!cNa9Tq!*O"D?~DPm#  
g{8(K TGTTYPE(*ALL),rXk8( MAINTTYPE(*TARGET);g{8(K  
TGTPART(*ALL),rXk8( MAINTPART(*TARGET)#  
g{8(K TGTTYPE(*ALL),rXk8( ROOTTYPE(*TARGET);g{8(K  
TGTPART(*ALL),rXk8( ROOTPART(*TARGET)#  
I!N}  
,$n?",$i",$`MM,$?~{8(*O"DQ|D?~*#fD;C#  
,$G;v4?~,|,*O"=?j?~PD|B#  
yn?"yi"y`MMy?~{8(*O"D-<?~*#fD;C#yG4?~  
D-<f>,|Gb=i|BDy!#  
Z PARTL N}O8(I\amS?j?~D?~Pm?~#8( PARTL(*PRV) Jm  
z9CCZKn?DO;v?~Pm?~D{F(g{zG53\m1D0)#+G,  
g{zG*"_D0,KN}aj6CZ8(iDO;v?~Pm?~D{F#g{  
9C QSECOFR C'r*mKPK|n,rK5^'#PARTL N}D1!5G  
*NONE,|8>}ZO"D?~+;amSA?~Pm?~#  
BPivBXk8(?~Pm?~:  
v Z|nO8(DiG9C PARTLREQ(*YES) 4(D  
v 8(D`M;G PARTL  
g{Z MRGPART |nO8(K?~Pm?~,r:  
v ?~Pm?~XkfZZSO"b)?~D?jip<D1!Qw76P#  
v O"?~D{Fa;mSA?~Pm?~(g{|G9;fZD0)#  
g{8(D`M* PARTL,r PARTL N}a;vT#TZd{ivxT,PARTL N  
}a<B8(?~Pm?~|B#  
g{8(K RPTONLY(*YES),r PARTL N}2;GXhD#  
Z7B 9C?~ 71  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
9C SELECT N}48(Gqk*T>0VnO"1A;,TczIZ,$?~P!q  
*O"=?j?~PDvp|D#g{ MRGPART |nGTz&m==KPD,r  
SELECT a;vT,R;aT>0VnO"1A;#  
9C RPTONLY N}48>Gk*4PO"9G;zI(f#g{Z MRGPART |n  
O8(K SELECT(*NO),r;aa>KN}#g{8(K SELECT(*YES),rXk8  
( RPTONLY(*NO)#  
>}  
TB|na+-<f> 1 ?~"Q|DDf> 1 ?~kBDf> 2 ?~O"#  
9C MRGPART |n  
MRGPART PRJ(PAYROLL)TGTGRP(V2)TGTTYPE(RPGSRC)TGTPART(BIWKLY)  
MAINTGRP(V1CHANGE)ROOTGRP(V1)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 55(O"?~)#  
O"y>&CLr  
Y(zQS)&L&SU=|,}v?~:PART A"PART B M PART C D&CL  
r#R1ROOT i|,)&La)D&CLrDZ;v"Pf#zQ-|DK PART A  
M PART B,"4(K;vBD?~ PART D#R1MAINT i|,z|DDMmSDW  
"Pf?~#-};N1d.s,VZ)&LV+&CLrDZ~v"Pf"Mx  
z,Cf>xP|BD PART A M PART C M;vB?~ PART E# R2ROOT i  
|,D?~|,&CLrDZ~v"Pf#n?cNa9T>Z<25D BEFORE ?V  
P#  
72 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
< 25. T>O"0sDn?cNa9D>}  
9CTB|n4O" R2ROOT P)&LD|DkzZ R1MAINT PD|D,"+a{  
EZ R2MAINT iP#  
MRGPART PRJ(ACCTA)TGTGRP(R2MAINT)TGTTYPE(*ALL)TGTPART(*ALL)  
MAINTGRP(R1MAINT)ROOTGRP(R1ROOT)  
O"sDn?cNa9aT>Z<25D AFTER ?VP#"b,PART A G?ji  
R2MAINT PqClv"O"D(;?~,r*K?~Z R1MAINT M R2ROOT PV  
p*=v;,Df>#  
4PO".s,I\av(Z R1MAINT iP|D?~ PART C#g{byD0,Z  
|D.s,&9COvO"}L+|k)&L*Z~v"Pf"MD?~ PART C D  
1>O"#  
*a_T\,&9COvO"}L,}GZ MRGPART |nO8(K TGTPART(C)#  
lk?~ (CHKINPART)  
0lk?~1(CHKINPART) |n(}+Qlv?~DCJ\?4;*UW,4MEC  
?~#bJm2m,;*"iDd{K9CC?~#lk?~";aMEdM;x  
(,yTd{iPD*"_T;;\CJ|#v1C?~;a}A?ji1,EaM  
EM;x(#CHKINPART |n;a+?~FAn?cNa9PDB;vi#  
Z7B 9C?~ 73  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
CHKINPART |n9a7#|B?~D1dAG,Tk`& OS/400 TsrI1D1d  
AG`%d#ba7#9(}L6pQ|DD?~,"ZB;N"v BLDPART |n1  
XB`kC?~#  
lk?~DK1DC'r*mXkGlvC?~Dr*m;+G,n?\m1I9C  
CHGPARTINF |n+NN?~DCJ\?4;*UWTlkC?~#(;Pn?\m1  
EP(9C CHGPARTINF |n|DCJ\?#)  
XhN}  
8(n?"i"`MM?~#i4=<B. ?~`MT0|Gk|nDX5Tq!  
CHKINPART |nyJmD?~`MDPm#  
g{k*,1lk8v?~,Z TYPE r PART N}O9C!n *ALL#balk3  
V`MDyP?~,rlkTzlvDyP?~#  
>}  
K>}5wgNlki DEVELOPER1 PD?~ RPGSRC BIWKLY#  
9C CHKINPART |n  
CHKINPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 29(lk)#  
a}?~ (PRMPART)  
0a}?~1(PRMPART) |n+8(?~T;N;iD==S?~yZDiFAd8  
zi#z;\SzTd_P|BCJ(DiPa}?~#a}D?~DCJ\?Xk  
*UWr;hC*zDC'r*m#4,C?~XkGTzlvD#  
g{*a}D?~;lv,Za}.0|aHT/lk#Zlv?~1,C?~DC  
J\?;hC*zDC'r*m,yTzTC?~_P@PD|BCJ(#a}?~  
1,CJ\?;4;*UW,Tcd{*"_I9CC?~#  
VRPGTXT 0dX* VRPGBIN ?~&9C PRMPART |n;pa}#ba,$ VRPG  
M'z?~.dDj{T,r* VRPGTXT ?~I\|,X* VRPGBIN ?~D3)  
dv#  
XhN}  
8(n?"i"`MM?~#Jma}D?~`M+aC=a}(g{|G4+|G  
lvAd{KD0)#i4=<B. ?~`MT0|Gk|nDX5Tq! PRMPART |  
nyJmD?~`MDPm#  
I!N}  
(}9(4?~zID?~Gdv?~,Rv1zZ PRMPART |nO8(  
EXTEND(*YES) 1E\a}#EXTEND(*YES) G\;a}xPa}k *NONE D?~  
74 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
D(;=(#ZI&)9a}s,PRMPART |n+ZOMiP>} PGM M PF ?  
~#g{_-D~T}Za}DNNomD~?~*y!,rZ)9a}s+;aS  
OMiP>}b)?~#  
g{k*,1a}8v?~,I(}+ TYPE r PART N}k *ALL !ndO9C4  
xPKYw#bJmza}3V`MDyP?~,r4lvAd{KDyP`MDy  
P?~#;Na}8v?~Dm;=(G4(?~Pm?~(`M* PARTL D?  
~ ) , " 9 C P A R T L O P T N } 4 a } C ? ~ P m ? ~ # } g , g { 8 (  
PARTLOPT(*LIST),raa}?~Pm?~ZPvD?v?~#  
g{k*+Qa}?~mSA?~Pm?~,r&8( PARTL N}#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*mKPK|n,rK5^'#PARTL N}  
D1!5G *NONE,|8>}Za}D?~+;amSA?~Pm?~#  
g{ZC|nO8(D8ziG9C PARTLREQ(*YES) 4(D,rXk8(?~Pm  
?~#  
Z PRMPART |nO,I9C PARTL N}48( TYPE(PARTL),r*K|nI9  
*?~Pm?~,"Vp&m?~PmPD?v?~#  
g{Z PARTL N}O8(K?~Pm?~,r:  
v ?~Pm?~XkfZZSda}b)?~Dip<D1!Qw76P#  
v a}?~a;mSA8(?~Pm(g{|G9;fZD0)#(49|n4\a}  
C?~,2I\a"zKiv)#  
9C ARCHIVE N}48(}Zf;D?~Gq&i5#PXT?~xPi5Dji,  
>}  
K>}5wgN+?~ RPGSRC BIWKLY Si DEVELOPER1 a}An?cNa9  
PDB;vi,4i TEST#  
9C PRMPART |n  
PRMPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 30(a})#  
a}I9(}L4(Ddv?~  
g{k*,1a}9(}LDdv?~M`X*D4?~,r9C EXTEND N}#  
1!5* EXTEND(*NO)#;PZ PRMPART |nO8(D?~Ea;a}#g{8  
( EXTEND(*YES),ra,1a}8(?~0ZON9(C?~14(Ddv?~#K  
b,TsE"b (OIR) D~q}]x(f"C4`kCTsD4D4D~{"b{MI  
1{D;C)a;|B,T43BDb{#I9(}L4(D?~Da}k* *NONE#  
EXTEND(*YES) G\;a}xPa}k *NONE D?~D(;=(#  
Z7B 9C?~ 75  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
a}xPa}k *NONE D?~1,BPfrJC:  
v g{*a}ADiPQ-fZa}k;,Z *NONE D,;?~,r;\a}xPa  
}k *NONE D?~#  
v yP`XomD~M_-D~Xk;Z,;iP#omD~kdX*D_-D~;  
(*EZ,;iP#  
v Za}C?~.s,C?~Da}kT* *NONE#n?\m1rTC?~;a}A  
Di_P *UPDATE CJ(DNNC'<&TyP?~KP BLDPART |nT7#  
|G<GnBD#G)Q-GnBD?~;axP`k#  
a}?~Pm?~  
g{}Za}?~Pm?~,r PRMPART |nJmz8(a}|D==#PRMPART  
|naTTB==&m?~Pm?~:  
1. 1!Qw76C4Qw?~Pm?~#g{4R=?~Pm?~,r PRMPART |  
n'\#g{8(K PARTLOPT(*PART),r8(iPXkfZ PARTL ?~#  
2. g{Z PRMPART |nO8( PARTLOPT(*LIST),raa}?~Pm?~PD?  
v?~#g{8( PARTLOPT(*PART),rasa}NNd{?~;ya}?~P  
m?~#g{8( PARTLOPT(*BOTH),r?~Pm?~0dZ?PvD?~<a  
;a}#9IZ PRMPART |nO8(`t?~{#PXji,N{Z8B ?~P  
g{}ZKPD|nl#ax,rI\G4&mdPD3)?~#*7#yPD?~  
<C=&m,&i4yPms{""YNKPC|n(g{X*D0)#  
>}  
TB|n+?~Pm?~ PART001 Si DEVELOPER1 a}An?cNa9PDB;  
vi,4i TEST:  
PRMPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(PARTL)PART(PART001) PARTLOPT(*LIST)  
a}k  
> Z h v a } k  
( P R M C O D E )  
N } , | J C Z  
CHKOUTPART"CPYPART"CRTPART"IMPPART M RNMPART |n#n?\m1  
aZ4(X(i1(e|Da}k#  
(#,Z9C?~1;9C;va}k#+G,n?\m1I\(eK8va}7  
6,rK,;vn?cNa9ZI\P8va}k#g{zDi/Z|B,;&CL  
rDm;f>1Xk,$dVff>,rI\avVbViv#i4Z193D:;v  
?~D=vf>;Tq!bVivD>}#  
PRMCODE N}8(*C47(n?cNa9P?~Da}76Da}k#I8(=v  
5#  
*GRP  
a+Z GRP N}(CPYPART |nD TOGRP N})OTi8(Da  
}k8(xC?~#  
g{T CHKOUTPART"CPYPART r IMPPART |n8(K *GRP,  
R ? ~ D ? ~ ` M *  
PGM"FILE"CLD"CMD"MENU"PNLGRP"MODULE"SRVPGM,  
76 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
rGf"ZI BLDPART |n4(D OS/400 TsPDC'(e`M,  
r9C PRMCODE(*NONE) 4&mC?~#}G9C EXTEND N},  
qrb)`MD?~^(a}#EXTEND(*YES) G\;a}xPa}  
k *NONE D?~D(;=(#g{ BLDPART |n4(D?~Gf  
"Z4I1PD?~,rI BLDPART |n4(Dw`MD?~<I  
Ta}#"b,`M* PGM RoT* CBL36 M RPG36 D?~Da  
}kITG *GRP#  
*NONE  
;aTC?~8(NNa}k#C?~;\a}#  
9C CHKOUTPART"CHKINPART M PRMPART |n  
<26MZ783D<279Cy>n?cNa945w9C CHKOUTPART"CHKINPART  
M PRMPART |n0s?~"zDd/#  
Z<26D BEFORE ?VP,RPGSRC ?~ BIWKLY ;fZZi TEST P#*T?  
~w;)|D#z9C CHKOUTPART |n+C?~lvA*"i DEVELOPER1#b  
aZ<D AFTER ?VP5w#+ BIWKLY 4FACi,"TC?~hCKM;x(#  
CJ\?ahC*zDC'r*m,Th9d{K|BC?~#  
< 26. CHKOUTPART |n  
H; BIWKLY QlvAzDi,zMIT|D|#jI|Ds,9C CHKINPART |  
n4lkC?~#C?~T#fZ DEVELOPER1 P,gZ783D<27P BEFORE ?  
Vy>#g{b;iGId{*"_2mD,r{GdPD;KI"LlvC?~M  
|D|#  
Z7B 9C?~ 77  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
i DEVELOPER2 PD*"_;\lv BIWKLY,r*C?~QlvAi  
DEVELOPER1(;\C?~Gq;lvAi DEVELOPER1 PD*"_)#C?~}H  
};a}Ai TEST,RTi DEVELOPER2 ;IC#  
< 27. CHKINPART M PRMPART |n  
VZ9C PRMPART |n4+da}XAi TEST#<27D AFTER ?VT>  
PRMPART |ngN+C?~a};v6p,FAi TEST#g{C?~TGTzlv  
D,rZ+C?~a}XAi TEST .0, PRMPART |naH+C?~lkA  
DEVELOPER1#+ BIWKLY a}Ai TEST a+ TEST PC?~DI1>f;*4  
T DEVELOPER1 DB?~#  
BP|nzzDYwT>ZZ773D<26M<27P:  
1. *lv?~ RPGSRC BIWKLY,dk:  
CHKOUTPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
PRMCODE(*GRP)  
2. *|D?~ RPGSRC BIWKLY,dk:  
CHGPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
CHGCMD(*TYPE)  
3. *+?~ RPGSRC BIWKLY lXAi DEVELOPER1,dk:  
CHKINPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
4. *+?~ RPGSRC BIWKLY a}XAi TEST,dk:  
PRMPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
78 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
X|{?~ (RNMPART)  
9C0X|{?~1(RNMPART) |nTZ,;n?MiP+?~S;v{FX|{*  
m;v{F#  
TZx({FM`MD?~,v18(iP;fZxPB{Fx`M`,D?~1,  
E\TdX|{#g{CiPQ-fZ`,{FM`MD?~,ra"v;u{",  
R RNMPART |n'\#  
X|{?~+;a,$I\Q-fZDPXI?~D9(E"#?~;aZ8(iP  
X|{,x;aZ{vn?PX|{#  
XkT|,}ZX|{D?~Di_P|BCJ(#  
g{X|{?~.0C?~QTzlv,rC?~+aX|{,+;aTzlv#g  
{C?~QlvAm;C',ra"v;u{",x RNMPART |na'\#  
g{k*|D4F?~DtT(g|DoTrD>),rZX|{jIs9C0|D  
?~E"1 (CHGPARTINF) |n#  
`M* VRPGTXT r VRPGBIN D?~;\9CK|n4X|{#  
XhN}  
8(}ZmSD?~Dn?"i"`MM?~{,T0?~DB{F#XkT}ZX  
|{D?~yZDi_P|BCJ(#NN`MD?~<I9C RNMPART |n4X  
|{#  
*X|{C'(e`MD?~,XkTC?~`M(e *CPY M *DLT Yw#  
NEWPART N}Jmz8(C?~DB{F#K{F;(*PpZZ PART N}O8  
(D{F#  
I!N}  
9C PRMCODE N}48(Gqa}B?~#KN}JCZ8v|n,RZZ763D  
:a}k;;ZPwKhv#  
I8( PARTL N}T+X|{?~mSA?~Pm?~#8( PARTL(*PRV) Jmz  
9CCZKn?DO;v?~Pm?~D{F(g{zG53\m1D0)#+G,g  
{zG*"_D0,KN}aj6CZ8(iDO;v?~Pm?~D{F#g{9  
C QSECOFR C'r*mKPK|n,rK5^'#PARTL N}D1!5* *NONE,  
|8>}ZX|{D?~+;amSA?~Pm?~#  
BPivBXk8(?~Pm?~:  
v Z|nO8(DiG9C PARTLREQ(*YES) 4(D  
v 8(D`M;G PARTL  
g{8(D`M* PARTL,r PARTL N}a;vT#TZd{ivxT,PARTL N  
}a<B8(?~Pm?~|B#  
Z7B 9C?~ 79  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
>}  
TB|naZ PAYROLL n?Di TEST P+?~ RPGSRC BIWKLY X|{*  
RPGSRC BIWEEK#  
9C RNMPART |n  
RNMPART PRJ(PAYROLL)GRP(TEST)TYPE(RPGSRC)PART(BIWKLY)  
PRMCODE(*GRP)PARTL(*NONE)  
NEWPART(BIWEEK)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 7(X|{)#  
>}?~ (DLTPART)  
9C0>}?~1(DLTPART) |n4SiP>}?~#XkTCi_P|BCJ(,R  
;(;\Td{KlvC?~#  
XhN}  
Tq!II DLTPART |n>}D?~`MDPm#  
9C TYPE(*ALL) >}yP`MD?~,r9C PART(*ALL) >}yP?~#  
XkH>}_-D~?~,E\>}`X*DomD~?~#  
g{}Z>}D?~4;lvAd{K,ra>}C?~00&CLr*"\mw1  
&\?~#fDPXC?~DNNE"#g{C?~Q;lv,r;\>}|#  
I!N}  
g{k*S?~Pm?~}%Q>}D?~,r&8( PARTL N}#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*mKPK|n,rK5^'#PARTL N}  
D1!5G *NONE,|8>}Z>}D?~+;amSA?~Pm?~#  
"b,Z DLTPART |nO, PARTL N}GI!D,49ZC|nO8(DiG9  
C PARTLREQ(*YES) 4(D#  
g{8(K?~Pm?~,R*>}D?~"G PARTL `M,r:  
v ?~Pm?~XkfZZS>}C?~Dip<D1!Qw76P#  
v Q>}?~aS?~Pm?~P}%#(49|n4\>}C?~,2I\a"zK  
iv)#  
g{8(D`M* PARTL,r PARTL N}a;vT#TZd{ivxT,PARTL N  
}a<B8(?~Pm?~|B#  
9C DLTARCHIVE N}48(Gq&Z>}C?~D,1>}C?~Di5f>#Z  
>}yPi5I11,g{4D~P;PNNd{I1,r9a>}C4D~#  
80 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
>}  
K>}5wgNSi DEVELOPER1 P>}?~ RPGSRC BIWKLY#  
9C DLTPART |n  
DLTPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 4(>})#  
M;x(gN|D  
g{>}K;v?~,x`,?~fZZ`viP,rM;x(a|D*8rC?~  
10lvADi#<G<28:  
< 28. DLTPART |nMM;x(  
Y(+?~Si DEVELOPER1 a}Ai TEST,;s+dYlvAi DEVELOPER1#  
VZ?~ BIWKLY D1>fZZTB}viP:DEVELOPER1"TEST M MASTER#  
g{Zi DEVELOPER1 P>}KC?~D1>,rM;x(a8ri TEST#bZZ  
823D<29PwK5w#  
Z7B 9C?~ 81  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
< 29. M;x(PD|D  
n?\m1I$  
r*;v?~IfZZ`viP,*Sn?cNa9P9W>}|I\h*n?\m  
1DI$#g{>}K;v?~,xC?~D1>TfZZzTd;P|BCJ(D  
m;viP,MavVbViv#\m1Xk>}?~DCf>#  
i5?~  
Z0&CLr*"\mw173P,r*?~Z];O|D,zI\k*#fb)?  
~DH0f>#(}9C ARCHIVE N},BP|nVZIZx(iPT/i54?~  
Dn`evf>#  
CHGPART  
IMPPART  
PRMPART  
ii5b|,?~DH0f>,RCbG9COv|n*C?~y$tDi4(D#  
KbI|,d{Fkd?~{j+`,D4D~,x?vbI|,n`evH0f>  
I1#I1{* "archiven",dP n=1 GnBf>,x n=5 *nIf>#  
g{8(K ARCHIVE(*YES):  
v 4(ii5b(g{|9;fZD0)#ii5bD{F* xxxx_yyyyy,dP xxxx G  
n?rF,x yyyyy GrLi{#ii5bD(^kibD(^`,#  
v li|,}Zf;D?~DiDi5b,TiRxPC?~D{FD4D~#g{  
xPC{FD4D~;fZD0,Ma4(|#  
v g{4D~|,I1 "archive5",CI1a;>}#  
v `BDI1aX|{,T9I1{PD`ES 1#}g "archive4" I* "archive5"#  
v };f;DI1+4FAI1 "archive1"#  
82 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
": Z,;iP,I\aP=v?~9C,;{F(+_P;,`M)#bVI1+;  
i5A,;4D~,Tc;vi5?~I\2Gm;v#rK,wGDw(G9  
C(;?~{(uAT;,`MD?~2Gby),g{{Gh*i5D0#  
*lwrXvi5?~,9CIMPPART |n#Z LIBRARY a>{O8(ii5bD  
{F,"Z MEMBER a>{O8(i5I1D{F#G!T!4N=8(I1{,"  
C+}E}p4#I9C REPLACE(*YES) 4+|DXvA?~#  
g{}Z9C0C PDM 49C?~1A;r0C PDM 49C?~PmPD?~1A  
;,IZC?~Tdk!n 52(9Ci5I1)TxA0C PDM 49CI11A;,  
CA;aPvC?~Di5I1#;s,I9CC'(e!n IM(<k?~)Xv|  
DLTPART |nOD DLTARCHIVE N}Jmz8(Gq&Z>}C?~>mD,1>  
}C?~Di5f>#Z>}yPi5I11,g{4D~P;PNNd{I1,r  
9a>}C4D~#  
?~DX*E"  
?v?~<Pkd`X*DE",zIT|Db)E",2ITr!v4#9C0|  
D?~E"1(CHGPARTINF)"0r!?~E"1(PRTPARTINF) M0lw?~E"1  
(RTVPARTINF) |n49C?~E"#  
|D?~E" (CHGPARTINF)  
0|D?~E"1(CHGPARTINF) |nIC4|DPX?~DBPE"(?N;v?  
~):  
v ?~DoT#Z393Dm2Pv?~`M00`X*DoT#  
v VPC?~DvKDCJ\?(C'r*m)(;Pn?\m1E\|D|)#  
v ?~DD>hv#  
g{9C CHGPARTINF |n4|D?~DoT,r?~D1dAGahC*101  
d,xON|DC?~DK1DC'r*ma;hC*10C'#  
g{49C CHGPARTINF |n|D?~DoT,r CHGPARTINF a7#?~D1d  
AGHZC?~DTsrI1DON|DD1dAG#g{ToT"CJ\?MD>  
hv8(K *SAME,rI\a"zbViv#  
09(?~1|n (BLDPART) +;a9(`M* CSRC"CINC M PGM,oT* C  
M SQLC D?~#*#V}]Dj{T,b)?~+;aT/*;*oT CLE r  
SQLCLE(g{b)`MD?~QfZD0)#*+oT|D* CLE r SQLCLE,I9  
C CHGPARTINF |n#  
XhN}  
8(k*|DdE"Dn?"i"`MM?~#i4=<B. ?~`MT0|Gk|nD  
X5Tq!I9C CHGPARTINF |n|Dd?~E"D?~`MDPm#  
Z7B 9C?~ 83  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
I!N}  
g{|DK?~DoTtT,RC?~D`M*Z503Dm4PvD`M.;rC'(  
e`M,r|,C?~DT& OS/400 4I1D4`M2a`&"z|D#C'(e4  
I1`M2a|D#  
oTN}D1!5* LANG(*SAME)#|8(;|D10oT#g{Z CHGPARTINF  
|nOnkKyPXhDN},r *SAME +f;*10oT#g{;k*C?~kN  
NoTX*,r9C LANG(*NONE),rdkX(oT#i4Z393Dm2Tq!?~`  
M0dX*oTDPm#  
g{k*+Q|D?~mSA?~Pm?~,r&8( PARTL N}#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*mKPK|n,rK5^'#PARTL N}  
D1!5G *NONE,|8>d?~E"}Z|DD?~+;amSA?~Pm?~#  
BPivBXk8(?~Pm?~:  
v Z|nO8(DiG9C PARTLREQ(*YES) 4(D  
v 8(D`M;G PARTL  
g{Z CHGPARTINF |nO8(K?~Pm?~,r:  
v ?~Pm?~XkfZZS}Z|D?~E"Dip<D1!Qw76P#  
v }Z|Dd?~E"D?~D{FamSA?~Pm?~,g{|9;fZD0#  
b+axP|B,uAZ8(K LANG(*SAME)"ACCKEY(*SAME) M  
TEXT(*SAME) DivB#(49|n4\|D?~E",2I\a"zKiv)#  
g{8(D`M* PARTL,r PARTL N}a;vT#TZd{ivxT,PARTL N  
}a<B8(?~Pm?~|B#  
*|D?~DD>hv,9C TEXT N}#9C TEXT(*SAME) #f`,hv;9C  
TEXT(*BLANK) +10hv|D*UW;r9C TEXT(hv)dkBhv#  
0&CLr*"\mw1?~DD>hvn$IP 80 vV{,xkd`X*D>zT  
sDD>hvn$;\P 50 vV{#TsDD>hva;XO*n$ 50 vV{,x  
?~D>hvG9C CHGPARTINF |n|DD#  
I9C ACCKEY N}4|D?~DCJ\?#bJm+BDC'r*mj6*VP?  
~DC'r*m,r_,I}%CJ\?x(,T9C?~I)d{C'9C#+  
G,;Pn?\m1E\|D ACCKEY N}#  
>}: TB|na+?~ BIWKLY DoT|D* LF,"+dD>hv|D*UW#  
9C CHGPARTINF |n  
CHGPARTINF PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(DDSSRC)PART(BIWKLY)  
LANG(LF)ACCKEY(*SAME)TEXT(*BLANK)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 13(|DE")#  
84 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
r!?~E" (PRTPARTINF)  
0r!?~E"1(PRTPARTINF) |nar!XZ?~XwDBPE":  
v n?"i"`MM?~  
v C4`kC?~DoT  
v ON|DC?~DK1  
v ON|D?~Z]DUZM1d  
v 4(C?~DUZM1d  
v 8(xC?~Da}k  
v M;x(  
v CJ\?  
v T&D OS/400 {F(b"Ts"`M"I1)  
v |,Zn?cNa9DCV'PvVC?~DnM;C,Ra}kkK?~`,D  
i
v Cn?cNa9DCV'PvVC?~DnM;COD?~lv,Ra}kkK?  
~`,DK1DC'r*m  
v hvC?~DD>  
XhN}  
8(k*r!dE"D?~Dn?"i"`MM?~{#i4=<B. ?~`MT0|G  
k|nDX5Tq!IZ PRTPARTINF |nO8(D?~`MDPm#  
I!N}  
9C OUTPUT N}8>dv&&ZD;C#1!5* OUTPUT(*PRINT)#(f;YQ  
zAKw5Dr!h8#OUTPUT(*OUTFILE) a+dv}<AdvD~#  
dvD~DG<q=kb QADM PD53a)}]bD~ QALYPARTI 9CDq=  
`,#  
>}: I(}8(`FgBD|n+dv}<AdvD~#  
9C PRTPARTINF |n  
PRTPARTINF PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
OUTPUT(*OUTFILE)OUTFILE(*LIBL/FILE1)  
OUTMBR(*FIRST *ADD)SCAN(*YES)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 26(r!E")#  
bPmC47(*f"dvD~ FILE1 D;C#FILE1 PDZ;vI1SUdv,"  
+dv}]mSAVfG<#  
PRTPARTINF |nOD SCAN N}8(GqQwn?cNa9TiRC?~(g{Z  
8(iPR;=|D0)#1!5* SCAN(*YES)#  
>}: TB|nr! RPGSRC ?~ BIWKLY D?~E"#  
Z7B 9C?~ 85  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
PRTPARTINF PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
OUTPUT(*PRINT)SCAN(*YES)  
(f;YQzAKw5Dr!h8#<30T>y>(f#  
5722WDS V5R1M0  
&CLr*"\mw  
- ?~E"(f 05/08/01  
12:00:00 3f . . : 0001  
n?. . . . . . . . . . . . . . . : PAYROLL  
i. . . . . . . . . . . . . . . . : DEVELOPER1  
`M. . . . . . . . . . . . . . . : RPGSRC  
?~. . . . . . . . . . . . . . . : BIWKLY  
oT . . . . . . . . . . . . . . : RPG  
ON|D(C'j6). . . . . . . : SMITH  
ꢀ1ꢁ  
ꢀ2ꢁ  
ON|DUZ. . . . . . . . . . . : 05/08/01 12:00:00 ꢀ3ꢁ  
4(UZ . . . . . . . . . . . . : 05/08/01 12:00:00 ꢀ4ꢁ  
a}k . . . . . . . . . . . . . : MASTER  
M;x(. . . . . . . . . . . . . :  
CJ\?(VP_). . . . . . . . :  
53{:  
ꢀ5ꢁ  
ꢀ6ꢁ  
ꢀ7ꢁ  
Ts . . . . . . . . . . . . . . : QRPGSRC  
ꢀ8ꢁ  
ꢀ9ꢁ  
ꢀ10ꢁ  
ꢀ11ꢁ  
ꢀ12ꢁ  
ꢀ13ꢁ  
b. . . . . . . . . . . . . . . . :  
`M . . . . . . . . . . . . . . : *FILE  
I1. . . . . . . . . . . . . . . : BIWKLY  
lvA PWS. . . . . . . . . . . . : No  
vV?~DnM;CDi. . . . . . :  
nM;CvVD?~D  
PAY.DEV1  
VP_ . . . . . . . . . . . . . :  
ꢀ14ꢁ  
ꢀ15ꢁ  
D> . . . . . . . . . . . . . . :  
* * * * * P m a x * * * * *  
< 30. ?~E"(fy>  
BDhv?~E"(fPDE":  
ꢀ1ꢁ  
ꢀ2ꢁ  
ꢀ3ꢁ  
?~DoT#  
ON|DC?~DK1DC'j6#  
ON|DC?~DUZM1d#ON|DC?~DUZM1dI\aH4(C  
?~DUZM1d*g#g{Sn?cNa9P&ZO_6pDilv?~D  
0,MavVbViv#byvD0,9(}L9(C?~M;a;I&#O  
N|DC?~DUZM1dMGSn?cNa9P&ZO_6pDiP4FD  
?~DUZM1d#  
ꢀ4ꢁ  
ꢀ5ꢁ  
ꢀ6ꢁ  
ꢀ7ꢁ  
4(C?~DUZM1d#  
kC?~`X*Da}k#  
C?~DM;x(;* *NONE ri{#  
VPC?~DK1DCJ\?rC'r*m#bGlvC?~DK1DC'r  
*m#g{3vKlvK;v?~,rd{NNK<;\|B|#  
ꢀ8ꢁ  
ꢀ9ꢁ  
T&D OS/400 53Ts{#  
T&D OS/400 53b{#  
T&D OS/400 53`M#  
ꢀ10ꢁ  
ꢀ11ꢁ  
T&D OS/400 53I1{#g{C?~;G4I1D0,(fOM;avVb  
;P#  
ꢀ12ꢁ  
ꢀ13ꢁ  
8>Gq+C?~lvAI`L$w>#  
|,Zn?cNa9DCV'PvVC?~DnM;C,Ra}kkK?~`  
,Di#  
86 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
ꢀ14ꢁ  
ꢀ15ꢁ  
lvn?cNa9DCV'PvVC?~DnM;COD?~,Ra}kkK  
?~`,DK1DC'r*m#  
hvC?~DD>#  
lw?~E" (RTVPARTINF)  
0lw?~E"1(RTVPARTINF) |naZ CL r REXX LrZlwx(0&CLr  
*"\mw1D*{FD+^( OS/400 TsrI1{#g{C?~G;vTs,rK  
|na5Xb{"Ts{MTs`M#g{C?~G;vI1,rK|na5Xb  
{"D~{MI1{#K|n;\w* CL r REXX LrD?VKP#  
Z RTVPARTINF |nO,8(n?"i"`MM?~D{F,T0*SUb{"Ts  
{"Ts`MMI1{D CL d?#(i4=<B. ?~`MT0|Gk|nDX5Tq  
!I9C RTVPARTINF |nTdlw?~E"D?~`MDPm#)CL d?XkTM  
E (&) *<,n`IP 10 vV{#  
I9C CL r REXX LrlwTsrI1{,"9CzT:D$_T?~4Pwv&  
\#}g,g{53O4200&CLr*"$_d1i~,rIT`4 CL r REXX  
Lr4lwT&Z0&CLr*"\mw1?~D OS/400 4TsrI1D{F,"9  
CKE"4wCzT:D`-w#  
Z883D<31T>y> CL Lr EDITPART,T5wZ9C;,Z SEU D`-w1a  
gN|D4?~#y>Lralv?~,lwPXC?~D53E",wC SEU `-  
w4|DC?~,"lkC?~#h*9C CHKOUTPART |nE\9C?~&Z0&  
CLr*"\mw1DXF.B#I4(;v`FDLr4TZTBLrPwC SEU `  
-wD==4wCzT:D$_#  
y>Lr9C0&CLr*"\mw1M{"#IZ4(D CL r REXX LrP4P  
`,Yw#{"G<+T>CLrQ4PDYw#  
Z7B 9C?~ 87  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
/********************************************************************/  
/*  
*/  
*/  
*/  
*/  
/* A sample program that illustrates how a source part could  
/* be changed when using an editor other than SEU. The project,  
/* group, type, and part names are passed to the program. The  
/* program issues the CHKOUTPART command, calls an editor (SEU is */  
/* used as an example), and then issues the CHKINPART command.  
/*  
*/  
*/  
/********************************************************************/  
PGM PARM(&PRJ &GRP &TYP &PART)  
/********************************************************************/  
/*  
*/  
*/  
*/  
*/  
*/  
/* The following variables are the parameters passed to this  
/* program. The variables resolve to the name of the project,  
/* group, type, and part.  
/*  
/********************************************************************/  
DCL  
DCL  
DCL  
DCL  
VAR(&PRJ)TYPE(*CHAR)LEN(32)  
VAR(&GRP)TYPE(*CHAR)LEN(32)  
VAR(&TYP)TYPE(*CHAR)LEN(10)  
VAR(&PART)TYPE(*CHAR)LEN(10)  
/********************************************************************/  
/*  
*/  
*/  
*/  
*/  
/* The following variables receive the information returned from  
/* the RTVPARTINF command.  
/*  
/********************************************************************/  
DCL  
DCL  
DCL  
DCL  
VAR(&OBJ)TYPE(*CHAR)LEN(10)  
VAR(&LIB)TYPE(*CHAR)LEN(10)  
VAR(&TYPE)TYPE(*CHAR)LEN(10)  
VAR(&MBR)TYPE(*CHAR)LEN(10)  
/********************************************************************/  
/*  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
/* The part is checked out to the user running this program.  
/* Any messages from the Application Development Manager  
/* product are monitored. The part must be checked out so that  
/* it remains under the control of the Application Development  
/* Manager feature.  
/*  
/********************************************************************/  
CHKOUTPART PRJ(&PRJ)GRP(&GRP)TYPE(&TYP)PART(&PART)  
MONMSG  
MSGID(ADM0000)  
< 31. 9C RTVPARTINF |nDy> CL Lr EDITPART (1/2)  
88 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
/********************************************************************/  
/*  
*/  
*/  
*/  
*/  
/* The RTVPARTINF command retrieves the information  
/* necessary to edit the part.  
/*  
/********************************************************************/  
RTVPARTINF PRJ(&PRJ)GRP(&GRP)TYPE(&TYP)PART(&PART)+  
OBJLIB(&LIB)OBJ(&OBJ)OBJTYPE(&TYPE)+  
MBR(&MBR)  
MONMSG  
/********************************************************************/  
/* */  
/* The editor that is being used can now be called. In this example */  
MSGID(ADM0000)  
/* it is assumed that the editor can be started from a command.  
/* In any case, the library name is contained in &LIB, the */  
/* source file name is contained in &OBJ, and the */  
/* part name is contained in &MBR. The line below would be  
/* replaced with the actual call to the editor.  
/*  
*/  
*/  
*/  
*/  
/********************************************************************/  
STRSEU  
MONMSG  
SRCFILE(&LIB/&OBJ)SRCMBR(&MBR)OPTION(2)  
MSGID(CPF0000)  
/********************************************************************/  
/*  
*/  
*/  
*/  
*/  
*/  
/* When the editor is ended, the part must be checked in. This  
/* informs the Application Development Manager  
/* the part has been changed.  
/*  
feature that  
/********************************************************************/  
CHKINPART PRJ(&PRJ)GRP(&GRP)TYPE(&TYP)PART(&PART)  
MONMSG  
ENDPGM  
MSGID(ADM0000)  
< 31. 9C RTVPARTINF |nDy> CL Lr EDITPART (2/2)  
Z7B 9C?~ 89  
Download from Www.Somanuals.com. All Manuals Search And Download.  
90 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Z8B ?~Pm?~"-rXFM|DzY  
?~Pm?~G?~`M* PARTL D?~,|,Iw*_-Vi&mD?~DPm#  
1*xPBPYw1a"VK?~`MG#PC:  
v ;Na};iX(?~  
v ;N9(;iX(?~  
v ;N<v;iX(?~  
v zYQ|DD;iX(?~  
>Ba)PXBPwbDE":  
v 4(?~Pm?~  
v |D?~Pm?~  
v T>?~Pm?~  
v r!?~Pm?~  
v zYJb  
v |D PARTL N}1!5  
4(?~Pm?~  
I9C CRTPART |n4(?~Pm?~#  
>}  
TB|nZn? PAYROLL Di DEVELOPER1 P4(?~Pm?~#4(DZ;v  
?~+* PAY000001#  
CRTPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(PARTL)PART(*GENERATE)LANG(*DFT)  
TEXT('My first part-list part')  
Xk8(?~`M PARTL MoT *DFT#g{4(`M* PARTL D?~,r1!4  
D~N};JC#  
*5)-rXF,I9C;B|{<(T/zID?~Pm?~{F"L4(b)?  
~#I+ CRTPART |nk PART(*GENERATE) M TYPE(PARTL) dO9C44(  
Z?~Pm?~Z,4(k*w*_-Vi&mD?~Pm#}g,ZOv?~Pm  
?~P,ImSBPu?:  
RPGSRC PROGRAM1  
RPGSRC PROGRAM2  
RPGSRC PROGRAM3  
9I9C`t?~`Mr?~{#GE (*) MJE (?) D9CfrZZ333D:XhN  
};PwKhv#9C *ALL 8>&9CyP{F#9C **ALL 48>&9CT ALL  
axDyP{F#  
TB?~Pmu?+<B53&m0;>}PT>D`,?~#  
RPGSRC PROGRAM*  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
91  
 
Z9C?~Pm?~1,G!BPfr:  
v IZ?~Pm?~ZPvNN`MD?~,|(d{?~Pm?~#  
v TZ;Pv`ND?~,;a&m;N#  
v ?~I\a/2I\;a4|GvVZPmPDNrxP&m#&m!vZ}Z4  
PD|nMPmPD?~`M#  
v QPv+;fZD?~a;vT#  
v g{8(K`t`M5(g P*),xPvD?~/|,`M* PARTL D?~,r  
PRMPART M BLDPART |n+9*?~Pm#  
v g{Z TYPE N}O8(K PARTL,RZ PART N}O8(K`t?~5(g  
ABC*):  
PRMPART |nay]Z PARTLOPT N}O8(D *LIST r *BOTH 5)9?  
~#  
BLDPART |na)9`M* PARTL D?~ZD?~Pm#  
i4 BLDPART"EXPPART M PRMPART |nTq!gN(}b)|n9C?~P  
m?~Dhv#TZyPd{?~*"|n,`M* PARTL D?~D&mkd{?~  
`MD&m==`,;4,a&m PARTL ?~>m,x;GdPPvD?~#i4Z  
2153D:=<B. ?~`MT0|Gk|nDX5;,|T>KJmZ TYPE N}O8  
( PARTL D|n#  
|D?~Pm?~  
g{k*9CCHGPART |n|D`M* PARTL D?~,awC53a)D0}]D  
~5CLr1(DFU),,1avVTBA;#DFU Gk0&CLr*"\mw1&\?  
~dO9CD Application Development ToolSet/400 5CLr#PXK5CLrDji,  
N<ADTS/400: Data File Utility#  
g{9C CHGPART |n4T>`M* PARTL D?~,avVTBA;#  
92 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
PARTL ?~:PAY000001  
|D?~Pm?~  
==:ENTRY  
?~`M . . . . . . . . . . . . RPGSRC  
?~{. . . . . . . . . . . . . . PROGRAM1  
C'E". . . . . . . . . . . . . PROGRAM1 D RPG 4  
F3=Kv  
F9=ek  
F5="B  
F10=dk  
F6=!qq=  
F11=|D  
< 32. |D?~Pm?~A;  
T?~`MM?~{VNdk5#g{8(D5Z?~PmPQ-fZ,raT/x  
k|D==#bJmz|ByPVf?~Pmu?,|H'Z40F11=|D1#9Cv  
/|OBv/T/@?~Pm?~u?#  
40F1=oz1i4PXKA;DE"#  
40F3=Kv1Kv10Nq"5XA*<NqDA;#  
40F5="B1e}A;ODdka>#  
40F6=!qq=1xA0DFU !qq=|1A;#TZ`M* PARTL D?~,;P  
;vG<q=#  
40F9=ek1r0F10=dk1+B?~{mSA?~Pm#C?~;;(*fZMI  
T+d{FmSA?~Pm#  
40F11=|D1|Dk?~PmPD?~`X*DC'E"#  
40F14=G<Fx1xA?~PmPDB;v?~#  
40F21=4,1i4K DFU LrD4,#  
40F23=>}1S?~PmP>}10PvD?~DG<#Y4 F23 7O>}Yw#  
9&+BPu?mSA PAY000001 ?~Pm?~:  
RPGSRC PROGRAM2 PROGRAM2 D RPG 4  
RPGSRC PROGRAM3 PROGRAM3 D RPG  
4
!\4T}ZKPD53a) DFU Lr(eNNT/VN,+T;Tb)A;(eK  
BP&\|#  
Z8B ?~Pm?~"-rXFM|DzY 93  
Download from Www.Somanuals.com. All Manuals Search And Download.  
F18  
F19  
F20  
F22  
SON|DT/vS  
SD~axT/]v  
T/G<Fx  
T/4F  
T>?~Pm?~  
g{9C DSPPART 4T>`M* PARTL D?~,avVTBA;#  
T>omD~I1  
D~ . . . . . . : PAY000001  
I1 . . . . . . : QALYPRTL  
XF . . . . . . . _________________  
b
. . . . :  
PAY.DEV11  
1
1
G< . . . :  
P . . . . . :  
iR . . . . . . . ________________________________________  
RPGSRC  
RPGSRC  
RPGSRC  
PROGRAM1  
PROGRAM2  
PROGRAM3  
PROGRAM1 D RPG 4  
PROGRAM2 D RPG 4  
PROGRAM3 D RPG 4  
****** }]ax ******  
W?  
F3=Kv F12=!{ F19=rs F20=rR F24=d`|  
< 33. T>omD~I1A;  
9CKA;i4`M* PARTL D?~Pm?~PPvD?~#  
r!?~Pm?~  
+ DSPPART |nk OUTPUT(*PRINT) dO9CTr!`M* PARTL D?~#Y  
QzD~G9C{F QPLYPRTL 4(D#  
zYJb  
|D\mDX*XTMGzYJb#bVJbzYVF*-rXF#n?\m1IT  
NNX(ir*-rXF,b*s*"_8(?~Pm?~{(-r)TG<CiP  
}ZxP&mD?~#^[N1ZiP4(?~r|D?~,r_^[N1+?~a  
}Ai,<h*8(?~Pm(-r)#b+oz\m1MsF1|P'XzYrks  
Dhsrv?&\xlID|D#  
BP0&CLr*"\mw1\m1|na)-rXF'V:  
|Di (CHGGRP)  
4(i (CRTGRP)  
94 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
r!n? (PRTPRJ)  
Z?~*"|nO,Z PARTL N}O8(?~Pm?~{a<BTd4P?~|nD  
?~T/mSA8(?~Pm,r_,g{GZ DLTPART |nOxPKYw,?~a  
T/S?~PmP}%,SxuY?~Pm?~D,$#g{}Z&mD?~MGZ  
PARTL N}O8(D?~,rKfr}b#ZbVivB,K?~Pm?~D{F;a  
T,{(Z PARTL N}O8()mSA`M* PARTL D?~rSC?~P}%#  
g{Z4(r|Di18(K PARTLREQ(*YES),rZCiP"v?~|nD*"_X  
kZ|nO8(P'D?~Pm?~{#b9C\m1\;7#kTx(hsMv?  
&\(-r)zYyP|D#g{|n'\,I\h*9C CHGPART |nSPmP>  
}C?~Pm?~#  
Z PARTL N}P8(D?~Pm?~XkfZZZ|nO8(DiD1!Qw76  
P#g{G CPYPART |nr}b,ZbVivB,C?~XkfZZ4F?jDiD  
1!Qw76P,w*}ZC?jiP4(DB?~#  
BP0&CLr*"\mw1?~*"|na)9C PARTL N}D-rXF'V:  
9(?~ (BLDPART)  
|D?~ (CHGPART)  
|D?~E" (CHGPARTINF)  
*;?~ (CVTPART)  
4F?~ (CPYPART)  
4(?~ (CRTPART)  
>}?~ (DLTPART)  
<k?~ (IMPPART)  
O"?~ (MRGPART)  
a}?~ (PRMPART)  
`v*"_I(}Z?~*"|nOD PARTL N}P8(`,?~Pm?~T,1|  
BC?~#  
|D PARTL N}1!5  
TZBP0&CLr*"\mw1?~*"|n,53a)D PARTL N}1!5G  
*NONE:  
9(?~ (BLDPART)  
|D?~ (CHGPART)  
|D?~E" (CHGPARTINF)  
*;?~ (CVTPART)  
4F?~ (CPYPART)  
4(?~ (CRTPART)  
>}?~ (DLTPART)  
<k?~ (IMPPART)  
O"?~ (MRGPART)  
a}?~ (PRMPART)  
X|{?~ (RNMPART)  
Z8B ?~Pm?~"-rXFM|DzY 95  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
8( PARTL(*PRV) Jmz9CCZ8(n?DO;v?~Pm?~D{F(g{zG  
n?\m1D0)#+G,g{zG*"_,8( PARTL(*PRV) Jmz9CCZ8(  
iDO;v?~Pm?~D{F#g{9C QSECOFR C'r*m8(|D0,r  
PARTL(*PRV) ^'#  
TZ QSYS bPDNNryPOv?~*"|n,<II53\m19C CHGCMD |  
n+ PARTL N}D1!5S *NONE @C|D* *PRV#  
96 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Z9B 9CQw76  
>Bhv:  
v Qw76Dy>-r  
v 4(Qw76?~.0*<GDBn  
v gN4(Qw76?~(`M* SCHPTH D?~),|(  
4(;fn?Qw76  
4(*|(C'bDb?Qw76  
v gN&mQw76?~  
KbQw76  
Z9C{CQw76D|n.0,&T|GxPKb#dMn?Zn?cNa9P<  
i/P8vi#rK,dMn?<P8vf>D4Mdv#Msg0(eD;y,Q  
w76G7(0&CLr*"\mw1&\?~Zn?cNa9PQw?~y@UD  
NrDiDEP#PDV`MDQw76#  
1!Qw76  
Qw76XEn?DicNa9DV'SX(irOQw,1A"|(yi#  
yiGn?cNa9PDZ;vir%?Di#ZZ983D<34P,Si  
DEVELOPER1 *<D1!Qw76* DEVELOPER1 A TEST A MASTER#  
8CQw76  
(}irPDQw76;,Z(}n?cNa9PDV'DQw76#ZZ98  
3D<34P,8CQw76I(e*;|(i MASTER,r|(i TEST M  
MASTER,r_I\D0,|( DEVELOPER3 M MASTER i#  
;fn?Qw76  
|(`vn?PDiD8CQw76#;fn?Qw76Z?~;`vn?}  
C1G#PC#&hC;v%@Dn?4#fb)+2?~,;s+Kn?|  
(Z}C+2?~D?vn?DQw76?~P#  
b?Qw76  
b?Qw76G;u8CQw76,|(;vr`vb?b#b?bGZ0&  
CLr*"\mw173b?R=DC'b#Z*;?V&CLr&Z0&C  
Lr*"\mw1DXF.b"T;\;}C|DivB,b?Qw76G#  
PC#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
97  
 
MASTER  
MASTER  
MASTER  
TEST  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
MASTER  
DEVELOPER3  
< 34. 5wQw76EnDy>n?cNa9  
d;;vn?;P;vn?cNa9,+;vn?IP`vQw76,xRrKaP  
`vQw76?~(`M* SCHPTH D?~)#SCHPTH ?~|,C47(iR8(  
?~1QwiDNrDiPm#  
Z`4BP|nT9C8Cr;fn?Qw764iR?~1,h*Qw76?~:  
mSn?bPm (ADDPRJLIBL)  
9(?~ (BLDPART)  
<v?~ (EXPPART)  
i/?~ (QRYPART)  
Z`4BP|nT9Cb?Qw764iR0&CLr*"\mw173b?D?~  
1,2h*Qw76?~:  
mSn?bPm (ADDPRJLIBL)  
9(?~ (BLDPART)  
ADDPRJLIBL M BLDPART |na|D10w5DbPmDC'?V,TT&1!Q  
w76PDiDNrrQw76?~PP>DiDNr#bDC'?VPQ-fZD  
yPn?b+;}%#iIQw76Dn?ba;mSAb0fDbPm#n?cN  
a9PnM;CDim>*QwDZ;vi,r_,9CbPm`FD0,+GbP  
mPDZ;vb#BLDPART |naZ|njI1V4bPm,x ADDPRJLIBL |n  
r;a#  
QRYPART M EXPPART |n;a|DbPm,+Ta9CQw764iR?~#TZ  
b)|n, SCHPTH ?~P"VDd{n?PDNNi<a;vT#g{Q-+xP  
`vV'Dn?cNa9(e*y]oTrM'(yZ(F)4\m&CLrDf  
>,r SCHPTH ?~aG#PC#|GJmng BLDPART .`D|nQw;;(Z  
1!Qw76PDiPD?~Df>#  
98 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
i0dkbPmDX5  
n?cNa9ZDQw76T&bPm#`kw9CbPm4iR|,D~Mbvb  
?}C#<355wn?cNa9kbPm.dDX5#  
< 35. Payroll n?0dT&DbPm  
?;i<P;vb#KbD{FICdct*Dn?rFMrLi{iI,}g,  
PAY.SYST#  
4(Qw76?~  
g{h*|DiR?~1QwiDNr,rh*Qw76?~;(4,g{h*9C  
8CQw76";fn?Qw76rb?Qw76)#Qw76?~Jmz4(n?c  
Na9DY1S<,CS<;,Zn?cNa9>m4(DS<#  
(#;h*4(Qw76?~#+G,I\h*D;vQw76`MG-}g,;f  
n?Qw76#i4Z1013D:4(;fn?Qw76;Tq!PXK`MDQw7  
6Dji#  
`M* SCHPTH D?~D4(M\m==`FZd{0&CLr*"\mw1?~,  
+Gz;\9(|#*4(Qw76?~,9C CRTPART |n"Z TYPE N}O8  
( SCHPTH#Qw76?~nu|,9I1!Qw76DiPm,"TZ CRTPART |  
nO8(Di*7#<G<36:  
Z9B 9CQw76 99  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
MASTER  
MASTER  
MASTER  
TEST  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
< 36. 1!Qw76  
TZKn?cNa9,i DEVELOPER1 PD1!Qw76*:DEVELOPER1 A TEST  
A MASTER#bm>,g{}Zi DEVELOPER1 P$w,R*4(BDQw76?  
~,|a`FgBy>#  
PAYROLL DEVELOPER1  
PAYROLL TEST  
PAYROLL MASTER  
*"_;&+{F QDFT xh{G4(DQw76?~#n?\m1&4(Qw76?  
~ QDFT#d?DGJmZxPQw76 (SCHPTH) N}D|nO9C5 *DFT#  
?;PIszi{Dn?{iI#Qw76?~PDPma;S7A2Qw,`FZ  
bPmC4iRTsD==#}g,g{Z9COfT>D SCHPTH ?~D|nO8  
(i DEVELOPER1,rWHaZi DEVELOPER1,;sG TEST,;sG MASTER  
PQwC?~#g{Z|nO8(i TEST,rTC?~DQw+aS TEST *<,g  
{R;=D0,rFA MASTER#yZ<36D8CQw76DQw76?~I\|,B  
PE"#  
PAYROLL DEVELOPER2  
PAYROLL MASTER  
Z`-`M* SCHPTH D?~1,G!BPfr:  
v WHvVn?{#0<Uq+;vT#  
v n?{sXkz;vr`vUq#  
v SEavVi{#  
v CPODyP#`}]a;vT#  
v ;JmNN"MP#  
G!4(`M* SCHPTH D?~1,b)?~ITsd{?~;ya}#bm>n?  
cNa9PIfZ;vQw76?~D`v;,f>#9(?~1,I\a;!D9  
C=4*8CQw76r;fn?Qw76#  
100 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z0`L*"\mw15CLrP9CQw761,h*G!;)"bBn#N<Z2  
043D:|Da01!5;Tq!PXZ9CK5CLr18(Qw76Dji#  
4(;fn?Qw76  
;fn?Qw76Gm;V8CQw76#g{Q-hCK;vn?T|,8vn?  
+2DD~Md{?~,rbVQw76aG#PC#(}9C;fn?Qw76,  
IT8YXiRX(&CLr+2DG)?~#Z`M* SCHPTH D?~Z,I(e  
|(4TZm;n?DiDQw76#Z<37P,ZQw?~1a9C=vn?cN  
a9#  
< 37. ;fn?Qw76  
Qw76?~ PAYROLL MASTER SCHPTH QDFT VZ|,BPQw76E"#  
PAYROLL DEVELOPER1  
PAYROLL TEST  
PAYROLL MASTER  
EMPDATA TESTDATA  
EMPDATA MASTER  
g{kZ8vn?P2m+2E",r;fn?Qw76aG#PC#+2E"I\  
|(`v&CLrP9CD_6oTLr"zDi/4("(Z|DDj<|,D  
~"`v&CLr+2D}]hvf6 (DDS) rVN}CD~#  
;fn?Qw76k8CQw76GT,;==4(M&mD#+G,Z9C;fn  
?Qw761*G!;)fr#b)fr|(:  
v Z&m BLDPART |n1,;fn?iPR=DyP`X?~<a;mSAQw7  
6#  
v 9(}LaZ;fn?iPQwM9Cm>|,D~Mb?hvD~D?~#  
v 9C;fn?Qw76D ADDPRJLIB M BLDPART |n;aZ2mn?P9Cr  
Qw BLDOPT r SCHPTH ?~#  
Z9B 9CQw76 101  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
v BLDPART |n;a&m;fn?iPR=D?~#}g,g{ DDSSRC 4?~Q  
Z2mn?PwK|D,M;a4(BD FILE ?~#9(}L9C FILE ?~DV  
f1>47(GqXk`k}C FILE D?~#  
v g{?~Z2mn?PQ-GID,9(}L;a"v/frms{"#\m1&  
7#^[N1Z2mn?Pwv|D,<a9C BLDPART |n49(Q|D?~#  
4(b?Qw76  
b?Qw76Gm;V8CQw76#g{k*CJ&CLrP&Z0&CLr*"  
\mw173.bD3)?~,rbVQw76aG#PC#TC'bPR=D)&  
LDm~&CLr(|,8Yv?~)*}#zI\k*|D3)?~,+V;kC  
d{?~CZ0&CLr*"\mw1DXF.B#byD0,MI9Cb?Qw7  
64}CC'bPD4|D?~,MCsG0&CLr*"\mw19(K&CLr  
;y#  
+Xb5 *USRLIB 8(*n?{Jmz+;vr`vb?bmSAQw76?~#g  
{T *USRLIB xPK`k,rZCu?O8(Dba;mSAtzZ0&CLr*"  
\mw1n?bsfvVDbPmDC'?V#Kc(7#9(aWHQw0&CL  
r*"\mw1n?PDTs#v1Zb)n?PR;=Ts1,EaQwC'b#  
}g,zI\k*+&Z0&CLr*"\mw1XF.BDb?bmSA`FZZ1  
003D<36PT>Dn?cNa9#RGITO*Kb?bMGF* SOFTLIB Dm~  
b#g{k*+ SOFTLIB mSAbPmDC'?V,&+b?Qw76?~|D*|  
,BPE":  
PAYROLL DEVELOPER1  
PAYROLL TEST  
PAYROLL MASTER  
*USRLIB SOFTLIB  
b?Qw76k8CQw76GT,;==4(M&mD#+G,Z9Cb?Qw7  
61*G!;)fr#b)fr|(:  
v aWHQwQw76?~4iR10i#|(10isfvVDC'bDyPi<  
a;mSAbPm#(iyP *USRLIB u?&EZ0&CLr*"\mw1n?b  
DyPu?.s#  
v g{"vxPQw76?~{D ADDPRJLIBL |n,ra+b?bmSACQw7  
6#g{Z *USRLIB u?O8(DC'bQ-fZZbPm.P,r ADDPRJLIBL  
+vTCu?#  
v RMVPRJLIBL ;\}%9Cb?Qw76D ADDPRJLIBL |nmSDC'b#  
v 9(}LWHaQwM9C0&CLr*"\mw1n?PD?~#v1Cn?P  
R;=b)?~1,9(EaZC'bPQwb)?~#G!,v1Z BLDPART |  
nO8(D0&CLr*"\mw1n?PR=4?~1,9(}LEa9(|#  
102 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
gN&mQw76?~  
Qw76G9C SCAN M SCHPTH N}&mD#P}v|na,19C SCAN M  
SCHPTH N}(BLDPART |n;9C SCHPTH N}):  
mSn?bPm (ADDPRJLIBL)  
<v?~ (EXPPART)  
i/?~ (QRYPART)#  
SCAN M SCHPTH N}I`%dO9C#9C SCAN N}48(GqQwn?cN  
a94iR?~(g{Z8(iPR;=|D0)#SCAN(*YES) aQwQw76?~"  
9CZC?~P(eDQw76#g{R;=C?~D0,a9C1!Qw76#  
SCAN(*NO) a+T?~DQw6'^F*z8(Di#9C SCHPTH N}48>Qw  
76?~D{F#  
g{8( SCAN(*YES),rC4iR8(?~DQw76aTgB==7(:  
1. g{8(K1! SCHPTH(*DFT),rK|naZTx(i*7D1!Qw76Pi  
R SCHPTH QDFT ?~#  
v g{R=K SCHPTH QDFT ?~,ra9CZ SCHPTH QDFT P(eDQw7  
64QwC?~#  
v g{ SCHPTH QDFT Z1!Qw76P;fZ,r1!Qw76>maCwCQ  
w76#aS8(iAyi4Qw76PDyPi,1=R=C?~*9#  
2. g{8(K SCHPTH ?~D{F,raZTx(i*7D1!Qw76PQwC?  
~#  
v g{R=C?~D0,ZdP(eDQw76aC4QwC?~#SCHPTH ?~  
XkfZ#  
v g{4R=?~ SCHPTH D{F,raSU=ms{"#  
ZQw76?~P8(ix;Pv|G  
*8>*Z4(Qw76?~19Cn?cNa9D1!Qw76,9CXb5 *DFT  
x;Gi{#|8>*9Cn?cNa9D1!Qw76#i4Z2043D:|Da0  
1!5;TKbQw76DV[09C0`L*"\mw15CLr1|GylID  
0l#  
>}  
Qw76 PAYROLL *DFT azIZ1003D<36PhvDQw76(g{Zz9CD  
|nO8(K DEVELOPER1 D0)# PAYROLL DEVELOPER1  
TEST PAYROLL MASTER  
PAYROLL  
*+yPi|(Zn?cNa9D1!Qw76Px;P>?vi,9C *DFT 5G;  
vr%D=(#TZ *DFT 5,awgBbv:  
1. a(hQw76?~ZPvDQw76TiRXb5 *DFT#  
2. TZR=D?v *DFT,|, *DFT DPaf;*TBN=Dn?MiTD{F:  
a. S *DFT P*<,;sliQw76?~PPvD08P,ali?;PTiR  
k *DFT `X*Dn?D{F#  
b. g{R=K`,n?{,rCn?MiTD1!Qw76aC4bv5 *DFT#  
c. g{4R=`,n?{,ali}ZKPD|nTi4n?{Gq%d#  
Z9B 9CQw76 103  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
d. g{Z}ZKP|nO8(K`,n?{,r10kCn?`X*DiaCw  
*f;5 *DFT D1!Qw76Dp<c#g{R;=NN%dDn?{,a"  
vms{"#  
3. ;)bvKQw76?~PPvDyP *DFT 5,Qw76MaTZC|nO8(  
Dn?/iTp<,szyPn?/iT,MsQw76?~PP>D;y#g{  
ZC|nO8(Dn?/iT;ZbvPmP,ra"v/f#  
>}  
y]Z1013D<37,Y(Q-4(KTBQw76,RQZ QRYPART |nO8(K  
i TEST#  
PAYROLL DEVELOPER1  
PAYROLL *DFT  
EMPDATA TESTDATA  
EMPDATA *DFT  
@]OfP>Dfr:  
1. ZQw76?~PR=5 *DFT#  
2. Z;v *DFT 5;af;* PAYROLL n?PDi MASTER#  
PAYROLL MASTER  
3. Z~v *DFT 5af;*T EMPDATA n?PDi TESTDATA *7D1!Qw  
76#  
EMPDATA TESTDATA  
EMPDATA MASTER  
a{G QRYPART |naZTBQw76PQw?~#  
PAYROLL TEST  
PAYROLL MASTER  
EMPDATA TESTDATA  
EMPDATA MASTER  
104 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z10B &mC'(e`M  
>Bhv:  
v C'(e`MDEn0-a9C|G  
v C49CC'(e`MD|n (ADDADMTYPE"RMVADMTYPE"PRTADMTYPE)  
v
C 4 9 C C ' ( e o T D | n  
(ADDADMLANG"RMVADMLANG"CHGADMLANG"PRTADMLANG)  
v kC'(e`M`X*DYw (CHGADMACN)  
KbC'(e`M  
I(ezT:D?~`M,|I9K&\?~Tz|PC#|GF*C'(e`M#  
C'(e`MGz(eD,Tc0&CLr*"\mw1&\?~I6pD?~`  
M#!\0&CLr*"\mw1&\?~'Vn#CDTs`M"I1`MM`k  
w,+TP;)&CLrI\a|,;\'VDTs`M#za"V,Z*\m?~  
D`vf>,rGk*xPBPYw1,K&\+G#PC:  
v r10;\'VD`kwoTmSC'(e4I1,g PL/1 r FORTRAN  
v r10;\'VDTs`MmSC'(eTs`M  
v mS+;Z0&CLr*"\mw1n?DTsr4D~I1Pf"DC'(e`  
M,TJmh*\md}]b#MDf>D CASE $_k0&CLr*"\mw1&  
\?~;%wC  
mSC'(e4I1`M (ADDADMTYPE)  
9C0mS ADM `M1(ADDADMTYPE) |n4mS4I1`M#*K,Z SYSTYPE  
N}O8( *MBR#g{9CD53a)DrC'(eD`kw;\0&CLr*"\  
mw1&\?~'VD0,zI\k*mS4I1?~`M#zI(}gB==4o  
=K?D:  
v *\;9C CRTPART M BLDPART |n4(M9(C'(e`MD?~,&9C  
0mS ADM oT1(ADDADMLANG) |n+oTmSAC'(e`M,"(e  
BLDPART |nC4`kC'(e`MMoTD?~D|n#g{k*`kC'(e  
`MD?~,`kwXk4A System API Programming PyvD0&CLr*"\  
mw API1#  
v g{`kw44A0&CLr*"\mw API1,z;\,$4Dwvf>#z+^  
(9(C'(e`MD?~#  
+G,49zT;*C'(e`M(e`MMoT,zy5PD`kw9G;\4  
A0&CLr*"\mw API1#}g,ImSC'(e`M ZPASSRC "TC`M  
(eoT PASCAL#  
zI\h*mSC'(e`MDm;v-rGa)$&m#}g,zI\h*mSC  
'(e`M RPT,Tc\;+0T/(fLr14f"Z0&CLr*"\mw1n?  
P#ZTK`M(eoT1,XkT0mS ASDM oT1(ADDADMLANG) |nOD  
BLDCMD N}8(04(T/(fLr1(CRTRPTPGM) |n#r* CRTRPTPGM |  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
105  
 
nawC CRTRPGPGM(|GkT0&CLr*"\mw1&\?~tCD),yTI  
9C BLDPART 4`k RPT ?~#PXji,kN<Z1183D:mSC'(e`M  
}g,g{zP RPG/38 `kw,zI\k*mS System/38 C'(e4I1`M#;  
s,I9C CRTPART |n4(C'(e`MD?~#;\Z ADDADMLANG |n  
D BLDCMD N}O(e9(|n#;\T0&CLr*"\mw1&\?~tC  
RPG/38 `kw#I,$4?~D;,f>,+*`kC'(e`MD?~,zXk4P  
BPdP;nNq:  
v 9C ADDPRJLIBL |n+b)?~y$tDimSAbPm,;swC8(k*f  
"dv *PGM TsDbD`kw#  
v Z EXPPART |nD SCAN N}O8( *YES,T+*`kD?~<vAb,;s  
wC8(*+b)?~<vyAbD{FD`kw#  
mSC'(eTs`M  
9C0mS ADM `M1(ADDADMTYPE) |nTmSC'(eTs`M;}g,Ts  
`M* *CSI D?~`M ZCSI#Z SYSTYPE N}O8({FTmSC'(eTs`  
M#TZ4\^ZX(b(}g QSYS r #LIBRARY)R;G *FILE DNN OS/400  
Ts`M,<ITTd(eC'(e`M#  
+ CHGADMACN |nk ADDADMTYPE |ndO9CT(e;)Yw,0&CLr  
*"\mw1&\?~XkCb)Yw49CC'(e`MD?~#  
mS4f"ZTsr4D~I1PDC'(e`M  
9C0mS ADM `M1(ADDADMTYPE) |nZ0&CLr*"\mw1n?PmS  
4f"Z OS/400 Tsr4D~I1PDC'(e`M#K&\?~azY?v?~,  
+5e>m4f"ZK&\?~DXF6'.b#  
Z ADDADMTYPE |nD SYSTYPE N}O8( *NONE,T8>C'(e`MD?  
~;af"Z0&CLr*"\mw1n?D OS/400 Tsr4D~I1P#  
g{Z9CzkzI$_,zI\ak*mSbVC'(e`M#I4(C4f"4  
zkDC'(e`M#`k4zk1,I\a4(;vr`vI1#b)I1+T&  
53a)DrC'(eD?~`M#  
mSC'(e`M-y>=h  
*mSC'(e`M,h*q-}v=h:  
1. 9C ADDADMTYPE |nmSC'(e`M#  
2. 9C ADDADMLANG |n(e;VoT,Tc\4(M9(_PC'(e`MD  
?~#  
3. (e0&CLr*"\mw1&\?~h*C4&m_PC'(e`MD?~DY  
w#*K,9C CHGADMACN |n#P1I\;h*9C CHGADMACN |n#  
g{`M"ZQP?~`M(}g,I1M}]x)DTsP,r ADDADMTYPE  
|na$nkYw#  
106 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
"
Z(eC'(e?~`M1,Xk7#(eDYwGTT&8(?~DTs"I  
1r5e4PD#g{4\I&,rI\a<B;I$*Da{#  
f;d?D}79C+7#T`&DTs"I1r5e4PYw#i4=<D. f  
;d?Tq!wVf;d?Dhv#  
TBPmT>IC4(eM9CC'(e`MDyP|n:  
ADDADMLANG  
ADDADMTYPE  
CHGADMACN  
CHGADMLANG  
PRTADMLANG  
PRTADMTYPE  
RMVADMLANG  
RMVADMTYPE  
+oTmSAC'(e?~`M  
mSC'(e`M  
|DC'(e`MDYw(e  
|DC'(e?~oT  
r!C'(e?~oTE"  
r!C'(e`ME"  
}%C'(e?~oT  
}%C'(e`M  
yPb)|n(PRTADMTYPE M PRTADMLANG }b)<G<Zn? *ALL Dn  
?G<P#PRTPRJLOG |na|D*r!kksDn?`%drn?5* *ALL Dy  
PG<#  
": yPb)|n(PRTADMTYPE M PRTADMLANG }b)<h* *ALLOBJ (^#  
Z04(C'r*m1(CRTUSRPRF) |nD SPCAUT N}O8(K(^#  
9CC'(e`M  
BP|nJmz9CC'(e`M:  
ADDADMTYPE  
PRTADMTYPE  
RMVADMTYPE  
mSC'(e`M  
r!C'(e`ME"  
}%C'(e`M  
mSC'(e`M (ADDADMTYPE)  
9C0mS ADM `M1(ADDADMTYPE) |nT+C'(e`MmSA0&CLr*  
"\mw1&\?~#mS.s,yPn?PDyP*"_<I9CCC'(e`  
M#  
Xk_P *ALLOBJ (^E\9CK|n#K5GZ04(C'r*m1(CRTUSRPRF)  
|nD SPCAUT N}O8(D#  
mSC'(e`M1,;aTC`M8(NNoT#Xk9C ADDADMLANG |n4  
K|nDE"#  
Z10B &mC'(e`M 107  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
XhN}  
8(C'(e`M0*Z53Of"C'(e`MD?~D==#(iC'(e`M  
TV8 Z *7#ba7#C'(e`M;akNN+453a)D?~`MX{#g{  
+453a)D`MkC'(e`MX{,53a)D`M+_PEH(#i4=<  
C. |{frTKb?~`MD|{fr#  
*f"C'(e`MD?~DTs`MITG OS/400 Ts{"*MBR,r_,I8(  
C'(e`MD?~;f"Z0&CLr*"\mw1n?D OS/400 Tsr4D~I  
1P,rGCTs`MITG OS/400 4D~I1#  
g{Z SYSTYPE N}O8({F,C'(e`MD?~Maf"Z OS/400 Ts`M  
P#Jm;\^ZX(bDyP OS/400 Ts`M#}g,;JmXkfZZb QSYS  
r #LIBRARY PDTs#xR,`M* *FILE DTs2;;Jm#  
g{Z SYSTYPE N}O!q5 *NONE,C'(e`MD?~M;af"Z0&CL  
r*"\mw1n?ZD OS/400 Tsr4D~I1P#K&\?~azY?v?~,  
+5e>m4f"ZK&\?~b?#C'(e`MD?~GIz9C CHGADMACN  
|n(eDYw4&mD#  
g{!q5 *MBR,C'(e`MD?~Maf"Z OS/400 4D~I1P#  
I!N}  
I8(BPI!N}:  
v f"C'(e`MD?~D1!4omD~#DFTSRCF(QTXTSRC) Gw*4I1D  
C'(e`MD1!5#I8(1!4D~D{F#  
v C4f"C'(e`MD?~DNN4omD~D1!G<$H#DFTRCDLEN(92) G  
1!5#IT4omD~8(1!G<$H(13 A 32678 VZ)#  
v d{?~Gq\;|(C?~`M#1!5* ALWINC(*NO);d{?~;\|(C  
'(e`MD?~#  
v C?~`MGq\|(d{?~#1!5* INCLUDES(*NONE);C'(e`MD?  
~;\|(d{?~#g{8(K{F,rXk9C ALWINC(*YES) 4(eC'(  
e`M,rCC'(e`MXkGw*|,D53a)D`M#  
BLDPART |na9CzT ALWINC M INCLUDES N}8(D5#  
}%C'(e`M (RMVADMTYPE)  
9C0}% ADM `M1(RMVADMTYPE) |n}%C'(e`M#v1NNn?P<  
;fZC'(e`MD?~,R;Pd{NNC'(e`MZ ADDADMLANG |nD  
BLDOUTTYPE N}O(ePCX(`M1,bEaI&#  
Xk_P *ALLOBJ (^E\9CK|n#K5GZ04(C'r*m1(CRTUSRPRF)  
|nD SPCAUT N}O8(D#  
;*Z RMVADMTYPE |nOdk*}%D`M4I#  
g{k*q!_Pk*}%D`MD?~DPm,Z WRKPRJPDM |nO8( *ALL,  
MavV0C PDM 49Cn?1A;#|aP>zP(9CDyPn?#TZPvD  
?vn?,9C QRYPART |n"Z TYPE N}PdkC'(e`M#baP>_P  
CC'(e`MDyP?~#  
108 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
r!C'(e`ME" (PRTADMTYPE)  
9C0r! ADM `M1(PRTADMTYPE) |nTKP(f,K(fPvT0&CLr  
* " \ m w 1 & \ ? ~ ( e D N N r y P C ' ( e ` M # K ( f 4 3 9 C  
ADDADMTYPE |nmSC'(e`M1!qDyPN}5,TC`M(eDYw}  
b#9C CHGADMACN |n4(eb)5#i4<38Tq!y>(f#  
XhN}  
8(k*r!dE"D?~`M#TYPE(*ALL) ar!yPC'(e`MDE"#I8  
(X(?~`MD{F#  
I!N}  
9C OUTPUT N}8>&dvyAD;C#1!5* OUTPUT(*PRINT)#(faYQ  
zAKw5Dr!h8#OUTPUT(*OUTFILE) a+dv}<AdvD~#  
dvD~DG<q=kb QADM PD53a)D}]bD~ QALYPTYP P9CDG  
<q=`,#  
>}: I(}8(`FgBD|n+dv}<AdvD~#  
PRTADMTYPE TYPE(ZPASSRC)OUTPUT(*OUTFILE)OUTFILE(*LIBL/FILE1) OUTMBR(*FIRST  
*ADD)  
bPmC47(*f"dvD~ FILE1 D;C#FILE1 PDZ;vI1SUdv,"  
+dv}]mSAVfG<#  
>}: TB|nr!PX`M PASSRC DC'(e`ME"#  
PRTADMTYPE TYPE(ZPASSRC)OUTPUT(*PRINT)  
(f;YQzAKw5Dr!h8#<38T>y>(f#  
5722WDS  
05/08/01  
V5R1M0  
&CLr*"\mw  
15:30:21 3f . . : 0001  
- r! ADM `M  
`M . . . . . . . . . . . . . . :  
53`M . . . . . . . . . . . . :  
1!4D~ . . . . . . . . . . . :  
1!G<$H . . . . . . . . . . :  
GqJm|(`M . . . . . . . . :  
|(?~`M . . . . . . . . . . :  
*CRT |n. . . . . . . . . . . . :  
ZPASSRC  
ꢀ1ꢁ  
ꢀ2ꢁ  
ꢀ3ꢁ  
ꢀ4ꢁ  
ꢀ5ꢁ  
ꢀ6ꢁ  
*MBR  
QTXTSRC  
00092  
q
*NONE  
QSYS/ADDPFM FILE(&L/&F)MBR(&ZN)  
ꢀ7ꢁ  
ꢀ8ꢁ  
*DLT |n. . . . . . . . . . . . :  
*MOV |n. . . . . . . . . . . . :  
*CPY |n. . . . . . . . . . . . :  
*CHG |n. . . . . . . . . . . . :  
*DSP |n. . . . . . . . . . . . :  
*PRT |n. . . . . . . . . . . . :  
QSYS/RMVM FILE(&L/&F)MBR(&ZN)  
*NONE  
ꢀ9ꢁ  
.
QSYS/CPYF FROMFILE(&L/&F)TOFILE(&ZI/&ZF)FROMMBR(&ZN)TOMBR(&ZJ)CRTFILE(*YES)MBROPT(*RE  
PLACE)FMTOPT(*MAP)  
ꢀ10ꢁ  
ꢀ11ꢁ  
QSYS/STRSEU SRCFILE(&L/&F)SRCMBR(&ZN)OPTION(2)  
QSYS/STRSEU SRCFILE(&L/&F)SRCMBR(&ZN)OPTION(5)  
QSYS/STRSEU SRCFILE(&L/&F)SRCMBR(&ZN)OPTION(6)  
ꢀ12ꢁ  
ꢀ13ꢁ  
< 38. r! ADM `M(fy>  
TBPmhv0r! ADM `M1(fPDE":  
ꢀ1ꢁ  
ꢀ2ꢁ  
Z ADDADMTYPE |nD TYPE N}O8(DC'(e`M#  
Z ADDADMTYPE |nD SYSTYPE N}O8(D53`M#  
Z10B &mC'(e`M 109  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
ꢀ3ꢁ  
ꢀ4ꢁ  
ꢀ5ꢁ  
Z ADDADMTYPE |nD DFTSRCF N}O8(D1!4D~#  
Z ADDADMTYPE |nD DFTRCDLEN N}O8(D1!G<$H#  
Jm_PC'(e?~`MDd{?~|(CC'(e`MD?~#bGZ  
ADDADMTYPE |nD ALWINC N}O8(D5#  
ꢀ6ꢁ  
JmC'(e`MD?~|(d{?~#bGZ ADDADMTYPE |nD  
INCLUDES N}O8(D5#  
ꢀ7ꢁ  
ꢀ8ꢁ  
Z CHGADMACN |nD CMD N}O8(D5r4(|n#  
Z CHGADMACN |nD CMD N}O8(D5r>}|n#  
Z CHGADMACN |nD CMD N}O8(D5rF/|n#  
Z CHGADMACN |nD CMD N}O8(D5r4F|n#  
Z CHGADMACN |nD CMD N}O8(D5r|D|n#  
Z CHGADMACN |nD CMD N}O8(D5rT>|n#  
Z CHGADMACN |nD CMD N}O8(D5rr!|n#  
ꢀ9ꢁ  
ꢀ10ꢁ  
ꢀ11ꢁ  
ꢀ12ꢁ  
ꢀ13ꢁ  
9CC'(eoT  
BP|nJmz9CC'(eoT:  
ADDADMLANG  
CHGADMLANG  
PRTADMLANG  
RMVADMLANG  
mSC'(eoT  
|DC'(eoT  
r!oTE"  
}%C'(eoT  
rC'(e`MmSoT (ADDADMLANG)  
9C0mS ADM oT1(ADDADMLANG) |n4+C'(eoTmSAC'(e`  
M#*K\;9C BLDPART |n4(M9(C'(e`MD?~,9C0mS ADM  
oT1(ADDADMLANG) |n4mSoT"(e BLDPART |n+C4`kC'(e  
`MMoTD?~D|n#  
ZmS.s,yPn?PDyP*"_<IT9CCC'(eoT#;Pm>G|,  
DI1r;PTsrI1DC'(e`M(4,Z ADDADMTYPE |nD SYSTYPE  
N}O8(K *NONE)EITZ BLDCMD N}O(e|n#  
zXk_P *ALLOBJ (^E\9CK|n#K5GZ04(C'r*m1  
(CRTUSRPRF) |nD SPCAUT N}O8(D#  
XhN}  
Z TYPE N}O8(C'(e`M#Z LANG N}O8(oTr *NONE#  
g{}ZmSDoTGCZkxPtTD OS/400 Ts`T&DC'(e`M,(iz  
+oT{hC*ktT{`,#"R,g{}ZmSDoTGCZk4I1`T&D  
C'(e`M,k8(kI1`M`,DoT#b\7# IMPPART |nZ<kTs/  
rI1/1\;}7X<kTsM4#}g,oT* PLI DC'(e`M ZPGM kt  
T* PLI DTs`M *PGM `T&#  
110 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
I!N}  
IT8(BPI!N}:  
v 9(}L&9CT`k_Pz8(D`MkoTDiOD?~D|n#  
1!5G BLDCMD(*NONE)#bm>;\9C BLDPART |n49(?~`MMo  
T#  
ZBPivP,XkZ BLDCMD N}O8( *NONE:  
g{}ZmSDoTG *NONE  
g { T Y P E N } O 8 ( D C ' ( e ` M f " Z T s P ( 4 , g { Z  
ADDADMTYPE |nD SYSTYPE N}O8(K OS/400 Ts`MD{F)  
g{C'(e`MG;v|,(G9C ADDADMTYPE |nOD ALWINC(*YES)  
(eD)  
g{C'(e`MG *MBR r SYSTYPE *NONE,rIT8(*C49(C'(e  
`MMoTD?~D|nV{.#|nV{.n$Io 250 vV{#;&Z|nV{  
.Pdk"M#;\a> BLDCMD N}#g{z(eD`k|n4f;9(}LD  
Vfdv?~,r BLDPART |nZ"T9( BLDPART |nO8(DC'(e`  
MD?~1,|a'\#  
ITZ|nV{.P9Cf;d?#Z"v|n.0,|Ga;f;*5JD5#  
T CHGADMACN |nD CMD N}P'DyPf;d?2<TKN}P'#Z22  
73D:=<D. f;d?;hvKyPf;d?,"8> BLDCMD N}OJmD)  
f;d?#  
Z3)ivB,0&CLr*"\mw1&\?~;\7(CZf;f;d?DE  
"#}g,g{}Z(eDYw*>}Yw,r &ZH f;d?;\;f;*}ZF  
/r4FD?~D{F#K1,9Cf;d? &ZH ;PNNbe#g{}Z9C  
BLDCMD N},r &ZH f;d?;\;f;*(h5#ZbVivB,g{;P  
XhDE"IC,r;abvKd?#  
>}: K>}Y(z9CDG{* ZRPG DC'(e RPG `kw,RC`kw4A  
System API Programming PhvD0&CLr*"\mw API1#  
TB|nT>K ADDADMLANG |nD BLDCMD N}O(eD CRTZRPGPGM `  
k|nD>}#  
0ADDADMLANG TYPE(ZRPGSRC)LANG(ZRPG)BLDCMD('CRTZRPGPGM PGM(&L/&ZN)  
SRCFILE(&L/&F)SRCMBR(&ZN'))BLDOUTTYPE(PGM)  
SPLFNAME(*INPUT)  
BLDOUTLANG(*INPUT)  
v 9(}LzIDdvTsD?~`M  
g{`MG;v|,"f"Z OS/400 TsPD`Mr4Z TYPE N}O8(`X  
*TsrI1DC'(e`M,rKN};vT#g{Z LANG M BLDCMD N}  
O8(K *NONE,r;JmKN}#1!5G BLDOUTTYPE(*NONE)#bm>;  
a4(NNdv?~#  
Z9(8(`MMoTD?~1,ITT9(}LzID *PGM dvTs8({F#  
v 9(}LzIDdvDoT  
g{`MG;v|,"f"Z OS/400 TsPD`Mr4Z TYPE N}O8(`X  
*TsrI1DC'(e`M,rKN};vT#g{Z LANG M BLDCMD N}  
O8(K *NONE,r;JmKN}#  
Z10B &mC'(e`M 111  
Download from Www.Somanuals.com. All Manuals Search And Download.  
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(`kwPmDYQzD~+k9(}LzIDdv?~,{,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?~#  
zXk_P *ALLOBJ (^E\9CK|n#K5GZ04(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}O8(DC'(e`Mf"ZTsP(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  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
ITZ|nV{.P9Cf;d?#Z"v|n.0,|Ga;f;*5JD5#  
;\a> BLDCMD N}#Z2273D:=<D. f;d?;hvKyPf;d?,"  
8> BLDCMD N}OJmD)f;d?#  
v 9(}LzIDdvD`M  
1!5G BLDOUTTYPE(*SAME)#9CdvTs (*PGM) D?~`M#1a>  
CHGADMLANG |n1,*SAME ;f;*dv`MD{F#  
Z9( TYPE M LANG N}O8(D`MMoTD?~1,ITT9(}LzID  
*PGM dvTs8(?~`MD{F#  
g{8( *NONE,r9(}L;a4(NNdv?~#  
v 9(}LzIDdvDoT  
1!5G BLDOUTLANG(*SAME)#9Cdv?~`MD10oT#1a>  
CHGADMLANG |n1,*SAME a;f;*5JDoT#  
IT*9(dv?~8(;v{F#  
g{8( BLDOUTLANG(*INPUT),r9(}LzIDdv?~k4(|D?~_P  
`,DoT#  
g{8( BLDOUTLANG(*NONE),r9(}LzIDdv?~;PNNoT#  
v 9(}LCZ|#fD`kwPmDYQzD~D{F  
g{`kwzI`kwPm,RZ BLDPART |nO8(K SAVLST N},rK{  
FJC#  
1!5G SPLFNAME(*SAME)#9C`kwPmDYQzD~D10{F#1a>  
CHGADMLANG |n1,*SAME a;f;*PmD{F#  
zIT*`kwPmDYQzD~8(;v{F#  
g{8( SPLFNAME(*INPUT) r SPLFNAME(*OUTPUT),r`kwPmDYQz  
D~Vpkdvrdv?~,{#  
g{8( SPLFNAME(*NONE),r BLDCMD N}O(eD`k|n;a4(NN  
YQzD~`kwPm#g{8( *NONE,r9(}L+;&mrli`kwPm#  
}%C'(eoT (RMVADMLANG)  
9C0}% ADM oT1(RMVADMLANG) |n4}%C'(eoT#v1NNn?  
P<;fZC'(e`Mko TiOD?~, R;Pd{C'(e`M_P  
ADDADMLANG |nD BLDOUTLANG N}O(eDX(oT1,K|nEaI&#  
zXk_P *ALLOBJ (^E\9CK|n#K5GZ04(C'r*m1  
(CRTUSRPRF) |nD SPCAUT N}O8(D#  
;*dk*}%DC'(e`MMoT4I#  
g{8( *NONE,bm>a}%oT *NONE#(oT *NONE 8>;\9(C?~#)  
g{z8(oTD{F,Rz}Z}%TC?~`M(eD(;oT,roTN}a  
4;* *NONE#  
r!C'(eoTE" (PRTADMLANG)  
9C0r! ADM oT1(PRTADMLANG) |n4KP;v(f,K(fP>TC'(  
e`M(eDNNryPC'(eoT#K(fT>kX(`MkoTDiO`X*  
Z10B &mC'(e`M 113  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
D`M"oTM9(|n#9(|nZ ADDADMLANG |nO8(#|9aT>9(  
}LzID?~D`MMoTT0YQzD~D{F#  
XhN}  
8(*r!doTE"DC'(e`M#  
8(*S TYPE N}O8(DC'(e`MP}%DC'(eoT#zIT8(X(?  
~oTD{F;IT8( LANG(*ALL) Tr!XZyPC'(eoTDE";2IT  
8( LANG(*NONE) Tr!XZC'(eoT *NONE DE"#  
I!N}  
9C OUTPUT N}8>&dvyAD;C#1!5G OUTPUT(*PRINT)#(fYQz  
AKw5Dr!h8#OUTPUT(*OUTFILE) a+dv}<AdvD~#  
dvD~D}]bq=kZb QADM PD53a)D}]bD~ QALYPLNG P9C  
D}]bq=`,#  
>}: (}8(`FgBD|n,I+dv}<AdvD~#  
PRTADMLANG TYPE(ZPASSRC)LANG(*ALL)OUTPUT(*OUTFILE)OUTFILE(*LIBL/FILE1)  
OUTMBR(*FIRST *ADD)SCAN(*YES)  
bPmC47(ZN&f"{* FILE1 DdvD~#FILE1 PDZ;vI1SU=d  
v,"+dv}]mSAVfG<#  
>}: TB|nr!T?~`M ZPASSRC (eDyPoT#  
PRTADMLANG TYPE(ZPASSRC)LANG(PAS)OUTPUT(PGM)  
k<39PD(f`FD(f+YQzAKw5Dr!h8#  
5722WDS V5R1M0  
&CLr*"\mw  
- r! ADM oT  
05/08/01  
9:49:55 3f . . : 0001  
Type . . . . . . . . . . . . . . :  
ZPASSRC  
ꢀ1ꢁ  
dv  
`M  
PGM  
dv  
oT  
*NONE  
YQzD~  
{F  
*INPUT  
oT  
PAS  
9(|n  
CRTPASPGM PGM(&L/&ZN)SRCFILE(&L/&F)SRCMBR(&ZN)  
ꢀ2ꢁ  
ꢀ3ꢁ  
ꢀ4ꢁ ꢀ5ꢁ ꢀ6ꢁ  
* * * * *  
P
m
a
x
* * * * *  
< 39. r! ADM oT(fDy>  
TBPmhv0r! ADM oT1(fPDE":  
ꢀ1ꢁ  
PRTADMLANG |nO8(DC'(e`M,r}Zr!D`M.;(g{8  
(K *ALL D0)  
ꢀ2ꢁ  
ꢀ3ꢁ  
ꢀ4ꢁ  
ꢀ5ꢁ  
ꢀ6ꢁ  
T ADDADMLANG |nODC'(e`M(eDoT  
T ADDADMLANG |nODC'(e`MkoTDiO(eD9(|n  
T PRTADMLANG |nODC'(e`MkoTDiO(eDdv`M  
T PRTADMLANG |nODC'(e`MkoTDiO(eDdvoT  
T ADDADMLANG |nODC'(e`MkoTDiO(eDYQzD~{  
114 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
(e*dOC'(e`M9CDYw (CHGADMACN)  
Z+C'(e`MmSA0&CLr*"\mw1&\?~.s,I(eK&\?~  
XkC49CCC'(e`MD?~DYw#  
Z9C ADDADMTYPE |n8(C'(e`M1,TZd SYSTYPE N}5* *NONE  
r53a)D`M;P9CD5DG)?~`M,yPYw<;u</* *NONE#Z  
(e?~`M1,g{d ADDADMTYPE |nOD SYSTYPE N}5Q;53a)D  
`M9C,rYw5Du</==k53a)D`M`F#  
0|D ADM Yw1(CHGADMACN) |n*C'(e`M8(Yw#zXk_P  
*ALLOBJ (^E\9CK|n#K5GZ04(C'r*m1(CRTUSRPRF) |nD  
SPCAUT N}O8(D#  
Z1173D:mSC'(e`M ZPASSRC->};a)K CHGADMACN |nD>}#  
m10T>K*dOC'(e`M9CDYw,T04Pb)YwD`X0&CLr*  
"\mw1|n#  
m 10. Yw0d`X|n  
ACTION N}OD5  
Yw  
4(  
>}  
&CLr*"\mw|n  
*CRT  
*DLT  
CRTPART  
D L T P A R T " E X P P A R T ( 1 8 (  
REPLACE(*YES) 1)"PRMPART(1Z  
ADDADMTYPE |nO8( SYSTYPE(*MBR)  
1)M RNMPART(CZNN`M)#  
*MOV  
(}n?cNa9F/ PRMPART  
?~  
": z&CZ *MOV YwD{F0fmS|,C|nDbD{F#bIT7#;9C;IC(^  
"vC|nDm;1>#&7#TF/Yw(eD|n;PrpKa)dk|nDza#  
*CPY  
4F  
CHKOUTPART"CPYPART"EXPPART"  
I M P P A R T " P R M P A R T ( g { Z  
A D D A D M T Y P E  
| n O 8 ( K  
SYSTYPE(*MBR))M RNMPART(CZNN`  
M)#  
*CHG  
*DSP  
*PRT  
|D  
T>  
r!  
CHGPART  
DSPPART  
DSPPART  
XhN}  
Z TYPE N}O8(C'(e`M,"Z ACTION N}OTd8(Yw#N{m10,  
Tq!zITZ ACTION N}O!qD5T0k?v5`X*D0&CLr*"\m  
w1|n#  
1Z CRTPART |nD PRMPT O8( *YES 1,aa>Q(eD *CRT Yw#g  
{Z ADDADMTYPE D SYSTYPE N}O8(w*TsDC'(e`MD{F,ra  
a>Q(eD *CHG Yw#  
Z10B &mC'(e`M 115  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
1|na>_VYwDNN;V1,TNNX|VN}Ddk<G;JmD#Z|n  
V{..0ekJE (?)#Z|nV{.PD?vX|VN}0fekJEMGE (?*)#  
;Fvz(exPa>V{(? M ?*)DYw#  
I!N}  
+ CMD N}k ACTION N}dO9C#Z CMD N}O,8(k*C0&CLr*  
"\mw1&\?~C44PZ ACTION N}O8(DYwD|n#;\a> CMD N  
}#  
1!5G CMD(*SAME)#CZ8(DYwD|n;a|D#9C0&CLr*"\m  
w1|n#1a> CHGADMACN |n1,*SAME a;f;*|n(N{m10)#g  
{8( CMD(*NONE),b8>Z ACTION N}O8(DYw;\TC'(e`MD?  
~4P#  
I8(CZ4PZ ACTION N}O8(DYwD|nV{.#IZK&9Cf;d?,  
Z"v|n.0,f;d?a;f;*5#  
P1,0&CLr*"\mw1&\?~;\7(C4f;f;d?DE"#}g,  
g{}Z(eDYw*>}Yw,r &ZJ f;d?;\;f;*}ZF/r4FD?  
~D{F#ZbVivB,9Cf;d? &ZJ G;PbeD#g{;PXhDE"I  
C,r;bvf;d?#=<D. f;d?hvKyPf;d?,"8> CMD N}O  
JmD)f;d?#  
g{8(NN0&CLr*"\mw1|nD TEXT N},rZNNC'(e`MYw  
O8(D TEXT N}y;vT#}g,IZ *CRT YwO8( TEXT N},+Z4  
(K`MD?~1,+9C CRTPART |nOD TEXT N}#  
g{C'(e`MYwR;=+Mx|&mD?~,r&Ca5XTB{"#  
ADM9004 C'(e`MYwR;=?~#  
0&CLr*"\mw1&\?~a}%k}Z&mD?~`X*D0?~?<u  
?14TK{"wvl&#&1;aT9C SYSTYPE(*NONE) (eDC'(e`MY  
w5XK{"#  
mS RJE Ts`M *CSI->}  
BP=hT>gNmSC'(e`M RJE:  
1. 9C ADDADMTYPE |n4mSC'(e`M#  
*+ RJE Ts`M *CSI (e*C'(e`M,8(TBZ]#  
ADDADMTYPE TYPE(ZCSI)SYSTYPE(*CSI)  
2. 9C ADDADMLANG |n4*C'(e`M8(oT,TcI4(M9(C?~#  
ITZ|nV{.P9Cf;d?#Z2273D:=<D. f;d?;hvKyPf;  
d?#  
*+oTmSAC'(e`M CSI,8(TBZ]#  
ADDADMLANG TYPE(ZCSI)LANG(*NONE)  
;\9(`M* CSI D?~,rK,8( LANG(*NONE)#  
116 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
3. 9C CHGADMACN |n4(e0&CLr*"\mw1&\?~h*C49C_  
PC'(e`MD?~DYw#ITZ|nV{.P9Cf;d?#Z2273D  
:=<D. f;d?;hvKyPf;d?#  
** CSI ?~`M(e4(Yw,8(TBZ]#  
CHGADMACN TYPE(ZCSI)ACTION(*CRT)CMD('QSYS/CRTCSI CSI(&L/&ZN)')  
** CSI ?~`M(e>}Yw,8(TBZ]#  
CHGADMACN TYPE(ZCSI)ACTION(*DLT)CMD('QSYS/DLTCSI CSI(&L/&ZN)')  
** CSI ?~`M(eF/Yw,8(TBZ]#  
CHGADMACN TYPE(ZCSI)ACTION(*MOV)CMD('QSYS/MOVOBJ OBJ(&L/&ZN)  
OBJTYPE(*CSI)TOLIB(&ZI)')  
** CSI ?~`M(e4FYw,8(TBZ]#  
CHGADMACN TYPE(ZCSI)ACTION(*CPY)CMD('QSYS/CRTDUPOBJ OBJ(&ZN)  
FROMLIB(&L)OBJTYPE(*CSI)TOLIB(&ZI)NEWOBJ(&ZJ)')  
** CSI ?~`M(e|DYw,8(TBZ]#  
CHGADMACN TYPE(ZCSI)ACTION(*CHG)CMD('QSYS/CHGCSI CSI(&L/&ZN)')  
** CSI ?~`M(eT>Yw,8(TBZ]#  
CHGADMACN TYPE(ZCSI)ACTION(*DSP)CMD('QSYS/DSPCSI CSI(&L/&ZN)')  
** CSI ?~`M(er!Yw,8(TBZ]#  
CHGADMACN TYPE(ZCSI)ACTION(*PRT)CMD('QSYS/DSPCSI CSI(&L/&ZN)  
OUTPUT(*PRINT)')  
mSC'(e`M ZPASSRC->}  
BP=hT>gNmSC'(e`M ZPASSRC#K>}Y(C'PQT0&CLr*  
"\mw1&\?~tCD PASCAL `kw:  
1. 9C ADDADMTYPE |n4mSC'(e`M#  
*(e*f"Z OS/400 4D~I1PD`M ZPASSRC,8(TBZ]#  
ADDADMTYPE TYPE(ZPASSRC)SYSTYPE(*MBR)  
2. 9C ADDADMLANG |n4*C'(e`M8(oT,TcI9(C?~#  
*+oTmSAC'(e`M,8(TBZ]#  
ADDADMLANG TYPE(ZPASSRC)LANG(PAS)BLDCMD('CRTPASPGM PGM(&L/&ZN)  
SRCFILE(&L/&F)SRCMBR(&ZN)')BLDOUTTYPE(PGM)  
BLDOUTLANG(*INPUT)SPLFNAME(*INPUT)  
3. 9C CHGADMACN |n4(e0&CLr*"\mw1&\?~h*C49CC  
'(e`MD?~DYw#ITZ CMD N}O(eD|nV{.P9Cf;d?#  
Z2273D:=<D. f;d?;hvKyPf;d?,"8> CMD N}OJm9  
CD)f;d?#  
K>}9CI1`M ZPASSRC#CHGADMACN |nD CMD N}PQ$Hnk  
KYw|n#BfD>}T>K53a)D$HnkDYw#zI\k|Db)$  
HnkDYwT{OzT:Dh*#  
** ZPASSRC ?~`M(e4(Yw,8(TBZ]#  
Z10B &mC'(e`M 117  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
CHGADMACN TYPE(ZPASSRC)ACTION(*CRT)CMD('QSYS/ADDPFM FILE(&L/&F)  
MBR(&ZN)')  
** ZPASSRC ?~`M(e>}Yw,8(TBZ]#  
CHGADMACN TYPE(ZPASSRC)ACTION(*DLT)CMD('QSYS/RMVM FILE(&L/&F)  
MBR(&ZN)')  
** ZPASSRC ?~`M(eF/Yw,8(TBZ]#  
CHGADMACN TYPE(ZPASSRC)ACTION(*MOV)CMD(*NONE)  
** ZPASSRC ?~`M(e4FYw,8(TBZ]#  
CHGADMACN TYPE(ZPASSRC)ACTION(*CPY)CMD('QSYS/CPYF FROMFILE(&L/&F)  
TOFILE(&ZI/&ZF)FROMMBR(&ZN)TOMBR(&ZJ)CRTFILE(*YES)  
MBROPT(*REPLACE)FMTOPT(*MAP)')  
** ZPASSRC ?~`M(e|DYw,8(TBZ]#  
CHGADMACN TYPE(ZPASSRC)ACTION(*CHG)CMD('QSYS/STRSEU SRCFILE(&L/&F)  
SRCMBR(&ZN)OPTION(2)')  
** ZPASSRC ?~`M(eT>Yw,8(TBZ]#  
CHGADMACN TYPE(ZPASSRC)ACTION(*DSP)CMD('QSYS/STRSEU SRCFILE(&L/&F)  
SRCMBR(&ZN)OPTION(5)')  
** ZPASSRC ?~`M(er!Yw,8(TBZ]#  
CHGADMACN TYPE(ZPASSRC)ACTION(*PRT)CMD('QSYS/STRSEU SRCFILE(&L/&F)  
SRCMBR(&ZN)OPTION(6)')  
mSC'(e`M RPT->}  
BP=hT>gNmSC'(e`M RPT:  
1. 9C ADDADMTYPE |n4mSC'(e`M#  
** RPT |,(e?~`M,8(TBZ]#  
ADDADMTYPE TYPE(ZRPTINC)SYSTYPE(*MBR)DFTSRCF(QRPGSRC)ALWINC(*YES)  
2. 9C ADDADMLANG |n4*C'(e`M8(oT#  
** RPT |,(eoT,8(TBZ]#  
ADDADMLANG TYPE(ZRPTINC)LANG(RPG)  
3. 9C ADDADMTYPE |n4mSC'(e`M#  
** RPT 4(e?~`M,8(TBZ]#  
ADDADMTYPE TYPE(ZRPTSRC)SYSTYPE(*MBR)DFTSRCF(QRPGSRC)  
INCLUDES(ZRPTINC)  
4. 9C ADDADMLANG |n4*C'(e`M8(oT,TcI4(M9(C?~#  
ITZ|nV{.P9Cf;d?#=<D. f;d?hvKyPf;d?#  
ADDADMLANG TYPE(ZRPTSRC)LANG(RPG)BLDCMD('CRTRPTPGM PGM(&L/&ZE)  
SRCFILE(&L/&F)SRCMBR(&ZN)')BLDOUTTYPE(PGM)BLDOUTLANG(RPG)  
118 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z11B 9(&CLr  
>Bhv:  
v Kb?~X5  
v BLDPART |nwCD`kwM$&mw  
v BLDPART |ngN7(N1`k?~  
v Z;N9(  
v 9C9(!n  
v 9(}LgNQw?~  
v 9C BLDPART |n  
v X(?~`MDXb9(&m  
v 9(y>&CLr  
Kb?~X5  
&CLrGPtIvi~9ID:IT`kD4,T0(}`k4xzID#i"L  
rrD~.`Ddv#dP?;vi~<G;v0&CLr*"\mw1?~#1z  
9C BLDPART |n1,aZK&\?~P7("f"?~X5#  
P=VX5:4(X5M`XX5#1`k4?~T4(ngLr.`Ddv?~  
1,c("K4(X5#`XX5Pm`V#1z`k4?~,x|h*m;?~E  
\fZ1,bMG`X#D~"SLrM|,<G`X?~D>}#?N9C BLDPART  
|n1,XZ`k?~1y9CD`X?~DE"MakC`k?~;pw*`XX  
5f"p4#BLDPART |n9Cb)X547(9C9(}L1*<GD)?~T0  
D)?~h*`k#  
T0S49(}D?~;_PX5,rK,ZwC BLDPART |n1,a9(b)?  
~#Z;N9(}Lay]`kw5XDE"mS|GDX5#  
Z BLDPART |nI&X&m?~.s,|a+PX`kC?~19CD?~.dDX  
5DE"#fB4#1?~D9(&mI&jIs,cO*C?~Q9(#9(&m  
n/|(`k?~(g{PX*D0)M#fXZK?~kd{?~DX5DE"#  
Z1203Dm11T>K0&CLr*"\mw1&\?~PD?~X5#mjb_PT  
B,e:  
X5D4  
4G_6oT4r C/400® Lrr#i#  
X5  
4kX5?j.dDX5G4(r`XX5#  
X5{ 4k?j.dDX5D{F;4("s("|,"SLr"}C"yZ,}C  
dPDG<r}CdPDVNPD;V#  
X5D?j  
kX5D4`XD?~#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
119  
 
m 11. &CLr*"\mwPDX5  
X5D4  
X5  
4(  
X5{  
4(  
X5D?j  
SRVPGM  
PGM  
BNDSRC  
CBLSRC"CBLLESRC"CLLESRC" 4(  
CLPSRC"CSRC"RPGLESRC"RPGSRC  
4(  
CBLLESRC"CLLESRC"CSRC(CZ 4(  
CLE oT)"RPGLESRC  
4(  
4(  
MODULE  
oT SQLCBLLE D CBLLESRC"oT 4(  
SQLCLE D CSRC"oT SQLRPGLE D  
RPGLESRC  
MODULE"PGM"SRVPGM  
CLDSRC  
CMDSRC  
DDSSRC  
MODULE  
4(  
4(  
4(  
4(  
4(  
4(  
4(  
CLD  
CMD  
FILE  
PGM  
4(  
s(  
oT MENU D PNLSRC  
oT PNLGRP D PNLSRC  
BNDDIR  
4(  
4(  
`X  
4(  
4(  
}C  
}C  
oT UIM D MENU  
PNLGRP  
BNDDIR"MODULE"SRVPGM  
FILE  
CBLINC"CBLLEINC"CBLLESRC" `X  
CBLSRC"CINC"CLLESRC"CLPSRC"  
CSRC"DDSSRC"RPGINC"RPGLESRC"  
RPGLEINC"RPGSRC  
CMDSRC"DDSSRC"PNLSRC" `X  
}C  
MSGF  
PNLINC  
MODULE (CRTPGM)  
CBLINC, CBLSRC  
CBLLEINC"CBLLESRC  
CINC"CSRC  
`X  
`X  
`X  
`X  
`X  
`X  
`X  
`X  
}C  
BNDDIR"MODULE"SRVPGM  
|,  
CBLINC  
CBLLEINC  
CINC  
|,  
|,  
PNLINC"PNLSRC  
RPGINC"RPGSRC  
RPGLEINC"RPGLESRC  
oT LF D DDSSRC  
|,  
PNLINC  
RPGINC  
RPGLEINC  
FILE  
|,  
|,  
yZ  
CBLINC"CBLSRC"CBLLEINC" `X  
CBLLESRC"CINC"CLLESRC"  
CLPSRC"CSRC"DDSSRC"RPGINC"  
RPGSRC"RPGLESRC"RPGLEINC  
}CdPDG<  
FILE  
DDSSRC  
`X  
}CdPDVN  
4(  
FILE  
f " Z I 1 P D C ' ( e ` M ( Z 4(  
ADDADMTYPE |nD SYSTYPE N}  
O8(K *MBR)  
f"ZTsPDI53a)DrC'(  
eD`M  
f " Z I 1 P D C ' ( e ` M ( Z 4(/|,  
ADDADMTYPE |nD SYSTYPE N}  
O8(K *MBR)  
4(/|,  
f"ZTsPDI53a)DrC'(  
eD`M  
120 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
m 11. &CLr*"\mwPDX5 (x)  
X5D4  
X5  
X5{  
4(  
X5D?j  
"4f"Zn?DTsr4D~I1P 4(  
DC'(e`M(Z ADDADMTYPE  
| n D S Y S T Y P E N } O 8 ( K  
*NONE)  
f"ZI1r`vI1PDI53a)  
DrC'(eD`M  
"b:  
v ;\9( C M SQLC oTD CSRC M PGM#  
v ;\9( System/36 `M#  
<405wKZ1203Dm11PDEn#?~fZZ;v;|,;viD!Mn?P;r  
K,TZK>},xvn?{"i{"`M{M?~{D+^({F;GXhD#*  
Kr%p{,;T>K?~`MM?~{#rbfD C m>4(X5,D m>`XX  
5#  
DDSSRC EMPDTA  
C
D
D
RPGSRC BIWKLY  
C
FILE EMPDTA  
RPGSRC MNTHLY  
C
PGM BIWKLY  
PGM MNTHLY  
< 40. iPD?~M|GD`Xn  
Kn?,PBP?~:  
DDSSRC EMPDTA-PF  
Q`kI FILE EMPDTA D DDS 4omD~#  
DDSSRC EMPDTA 4( FILE EMPDTA#  
FILE EMPDTA-PF  
RPGSRC BIWKLY  
(}`k DDSSRC EMPDTA x4(DD~#  
Q`kI PGM BIWKLY D4zk#RPGSRC  
BIWKLY T FILE EMPDTA _P`XX5,T PGM  
BIWKLY _P4(X5#  
PGM BIWKLY  
(}`k RPGSRC BIWKLY x4(DLr#  
RPGSRC MNTHLY  
Q`kI PGM MNTHLY D4zk#RPGSRC  
MNTHLY T FILE EMPDTA _P`XX5,T PGM  
MNTHLY _P4(X5#  
PGM MNTHLY  
(}`k RPGSRC MNTHLY x4(DLr#  
<415wKk<40`,DEn,+9C`M* CSRC D?~#|T>K`M* CSRC R  
oT* CLE D?~gN9C04( C/400 #i1(CRTCMOD) |n44(`M*  
MODULE D?~#19C04(Lr1(CRTPGM) |ns(`M* MODULE D?~  
1,|4(`M* PGM D?~#g{T`M* CSRC D?~9C04(s( C L  
Z11B 9(&CLr 121  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
r1(CRTBNDC) |n,r;a4(`M* MODULE D?~,x;4(`M* PGM  
D?~#  
DDSSRC EMPDTA  
CRTPF  
D
D
CSRC BIWKLY  
FILE EMPDTA  
CSRC MNTHLY  
CRTBNDC  
CRTCMOD  
CRTCMOD  
D
MODULE MNTHLY  
MODULE BIWKLY  
CRTPGM  
PGM BIWKLY  
< 41. iPD?~0d`Xn. `M* CSRC r CINC D?~xPoT CLE#  
BLDPART |nwCD`kwM$&mw  
m12P>KITdO0&CLr*"\mw1&\?~9CD`kwM$&mw,"  
T>1Z`kwr$&mw|nO8( TGTRLS(*PRV) 1,GqIT9CX(`kw#  
IT9C SBMJOB |nTz&m=="v BLDPART |n#;x,XkJm(}  
BLDPART |nwCD`kwT;%===KP#Xkbyv,bGr* BLDPART |  
nGpv&m?~D,Rh*&m`kw5XDE"#  
m 12. ITk&CLr*"\mw&\?~dO9CD`kwM$&mw  
`kw/$&mwoT `kw/$&mwOS/400|n  
ZT0?j"Pf18  
(K *PRV 1Gq\'  
V
RPG/400  
ILE RPG  
COBOL/400®  
ILE COBOL  
ILE CL  
CRTRPGPGM  
G
q
G
q
q
G
|
|
CRTBNDRPG¹,CRTRPGMOD  
CRTCBLPGM  
CRTBNDCBL¹,CRTCBLMOD  
CRTBNDCL¹,CRTCLMOD  
CRTCMOD¹,CRTBNDC  
ILE C  
DDS²  
CRTPF"CRTLF"CRTDSPF"CRTPRTF" ;JC  
CRTICFF  
CL  
CRTCLPGM  
G
CLD  
CRTCLD  
G
CMD  
CRTCMD  
;JC  
G
SQL SQL²  
SQL SQL²  
CRTSRVPGM  
CRTPGM  
MENU  
CRTSQLRPG"CRTSQLCBL"CRTSQLCI  
CRTSQLRPGI"CRTSQLCBLI  
CRTSRVPGM  
q
G
CRTPGM  
G
CRTMNU TYPE(*UIM)  
;JC  
122 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
m 12. ITk&CLr*"\mw&\?~dO9CD`kwM$&mw (x)  
`kw/$&mwoT `kw/$&mwOS/400|n ZT0?j"Pf18  
(K *PRV 1Gq\'  
V
PNLGRP  
CRTPNLGRP  
;JC  
"b:  
1. BLDPART |n9C1!|n#  
2. y]?~`MMoT,9CJ1D1!`kw|n#  
BLDPART |ngN7(N1`k?~  
>ZhvZz"v BLDPART |n19(?~D;)-r:  
v 4?~T04-`k#4?~;fZNNX5#  
v TSON9(?~.s,BLDOPT ?~Q|D#PXji,N{Z1383D:9C9  
v CZ`kx(?~D BLDOPT ?~kH09(y9CD?~;,#  
v H09(9CDG BLDOPT ?~,+VZ9CDG1!D`k|n,r`4#  
v BLDPART |nD FORCE N};hC* *YES#9(yP?~,^[|GGBD9  
GID#  
v Qw76PR;=dv?~#  
v 4?~r|,?~D1dAGQ|D#  
9((fhvK9(}L`k?~D-r#=<E. 9((f{"P>9((fD9(-  
r{"#  
hC9(73  
n?\m1h*hC9(73,T9?v*"_9C BLDPART |n1,IT;BX&  
m?~#n?\m17(BPwn:  
#f}]  
Z9(&CLrPDom}]D~?~1G#f9G>}}]I CRTPRJ |nOD  
SAVDTA N}7(#g{Cn?G9C SAVDTA(*YES) 4(D,rz9(b)D~  
1,+#fkom}]D~`X*D}]#g{n?G9C SAVDTA(*NO) 4(D,r  
>}`X*D}]#  
g{ CHGPRJ |nOD SAVDTA N}5;Y{OzDhs,rIT|DK5#\m  
17(Gq#f}]#*"_;\|D SAVDTA N}#  
(" BLDPART <r  
ITZzDi/P("<rrfr,TZ+*"_a}An?cNa9PDB;vi  
.0,Dx{G9(yP?~"i$?~Gq\;s$ZDGy$w#Kb,9a(  
i9CX( BLDPART N}5#}g,ITDx*"_9C SCOPE(*LIMITED) 49  
(B?~#Z9(YwI&s,I9C SCOPE(*NORMAL) 9(C?~#  
Z11B 9(&CLr 123  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Dx*"_T;BD==9(?~D;V=(GZ0`L*"\mw15CLrPh  
C;vC'(e!n,T)yP*"_Z<8C9(?~19C#  
>}  
BLDPART |nDTBC'(e!n8>Z*"iP9(?~1*9CDX(Qw76  
?~M9(6'#  
BP = “BLDPART PRJ(&ZP)GRP(&ZG)TYPE(&ZT)PART(&ZN)  
SCHPTH(DEVGRP)SCOPE(*LIMITED)”  
\m1IT(}4(`M*9(!n (BLDOPT) D?~4("`kw&mj<#PX9  
\m1IT4()*"_9CD8CQw76#8CQw76GZ`M* SCHPTH D  
?~P(eD#PXQw76Dji,N{Z993D:4(Qw76?~;#  
g{zDi/9C`M* SCHPTH M BLDOPT D?~,r;&Dx*"_a}{G  
T:D BLDOPT r SCHPTH ?~,}G{GC=\m1r!i$DmI#PXgN  
Zn?cNa9P9Cb)?~Dji,N{Z1453D:n?cNa9PP`v9(  
Z;N9(  
>ZhvZ;N9(?~#  
Y(zGZi DEVELOPER1 P$w#Zz"v BLDPART |n.0,?~.d;P  
`XX5#DEVELOPER1 PDBP?~G9C BLDPART |n1!59(D#T  
PART M TYPE N}8(K *ALL#  
Z>BD>}P,g{Xkj6?~DoT,r|asz?~{;}g,PGM  
BIWKLY-RPG#  
RPGSRC BIWKLY  
DDSSRC EMPID-PF  
DDSSRC EMPDTA-PF  
Payroll &CLrD?~;}C_-D~ FILE  
EMPID-PF D RPG Lr#  
M1j6;yZomD~ FILE EMPDTA-PF D_-D  
~#  
M1}];DDS 4omD~#  
<42T>KZz"v BLDPART |n0i DEVELOPER1 PD?~#  
DEVELOPER1  
RPGSRC BIWKLY-RPG  
DDSSRC EMPDTA-PF  
DDSSRC EMPID-PF  
< 42. Z9C BLDPART |n0Di DEVELOPER1  
ZKP BLDPART |nI&.s,M("K?~.dDX5,x4?~Q;`kI  
DEVELOPER1 PDBPdv?~#  
RPGSRC BIWKLY  
Q`kI PGM BIWKLY-RPG  
124 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
DDSSRC EMPID-PF  
Q`kI FILE EMPID-PF  
Q`kI FILE EMPDTA-PF  
DDSSRC EMPDTA-PF  
i DEVELOPER1 VZ|,<43PP>D?~#  
DEVELOPER1  
RPGSRC BIWKLY-RPG  
DDSSRC EMPDTA-PF  
DDSSRC EMPID-PF  
PGM BIWKLY-RPG  
FILE EMPDTA-PF  
FILE EMPID-PF  
< 43. 9C BLDPART |nsDi DEVELOPER1  
BN9C BLDPART |n1,9(}Lali`XX5,T7(h`kD)?~T0b  
)?~Gqh*`k#  
<44T>Ki DEVELOPER1 PD?~.dDX5#,y,C m>4(X5,x D m  
>`XX5#  
DEVELOPER1  
DDSSRC EMPDTA-PF  
C
FILE EMPDTA-PF  
D
DDSSRC EMPID-PF  
C
D
FILE EMPID-PF  
RPGSRC BIWKLY-RPG  
C
PGM BIWKLY-RPG  
< 44. i DEVELOPER1 PD9(X5M9(}LDa{  
zITZ BLDPART |nO9(4?~rdv?~#ZX*1,a|Bdv?~#}  
g,z9IT8(9C *EXTENDED 9(6'49(|,?~,+a9(kC|,?  
~`XDyP?~#  
": 1z}Z}C|,?~rD~?~1,ITZ4?~P8(D~{,+ZbVi  
vB;*Z4P9CX(b{#g{byv,9(}LI\aZn?cNa9P  
R;=C?~D}7f>#  
9C *LIBL,x;G9CX(bD{F,rZh*DX=9C1!5 *LIBL#g{`k  
19CK`Xn,xC`XnV;G0&CLr*"\mw1?~,r9(}LZ9  
((fP"v;u/f{"#  
Z11B 9(&CLr 125  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
?N9(.s  
Z?N9(.s,z&1:  
1. li9(jI{",TKbGqPNN?~9('\,rGq"vKNN/f#  
2. g{;vr`v?~9('\,r"vK/f,rz&1li9((f#  
3. liw5G<T7(I\Dms#  
4. li`kwPmT7(I\Dms#  
9(}LgNQw?~  
9(}LZQw76PiR?~D==k`kwZ53OQwbPmD==`,#B  
5O,9(}L+bPm|D*|,Qw76PDb#1z"v BLDPART |n1,a  
y] SCHPTH N}|DbPm#Z9(}L.s,bPm5X9(}L.0|y&D  
4,#(PXQw76Dji,N{Z973D:Z9B 9CQw76;#)<G<45PD  
n?cNa9:  
MASTER  
MASTER  
DDSSRC EMPDTA-PF  
RPGSRC BIWKLY  
MASTER  
TEST  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
DDSSRC EMPDTA-PF  
RPGSRC BIWKLY  
< 45. 9(}LMQw76  
?~fZZi MASTER M DEVELOPER1 P#+ DDSSRC EMPDTA-PF M RPGSRC  
BIWKLY lvAi DEVELOPER1,TcIT|D|G,+|GTfZZi MASTER  
P#Z|D|G.s,MSi DEVELOPER1 "v BLDPART |n,CiD9(6'  
* *NORMAL,Qw76* *DFT#  
Z9(I&.s,BP?~fZZi DEVELOPER1 P:  
DDSSRC EMPDTA-PF  
FILE EMPDTA-PF  
RPGSRC BIWKLY  
PGM BIWKLY  
126 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
VZ,Y(i DEVELOPER2 PD3v*"_ks9(?~ RPGSRC BIWKLY#i  
DEVELOPER2 ;|,NN?~#9(}LZKiPQw*9(D?~#Z  
DEVELOPER2 PR;=b)?~,rK9(}LZn?cNa9PD DEVELOPER2 O  
fDiPiR,4iRi TEST#Ki;|,NN?~#b)?~G(}i MASTER 9  
(D,dv PGM BIWKLY M FILE EMPDTA-PF ;Eki DEVELOPER2#bm>  
i DEVELOPER2 PD*"_D9(?~Df>ki DEVELOPER1 PD*"_9(  
Df>;,#  
g{k*C9(}L(};,Z1!Qw76DirPQw?~,rzI\k4(z  
T:DQw76?~#TZ"vD?v BLDPART |n,;a9C;vQw76?~#  
K?~D?~`M* SCHPTH#BLDPART |nOD SCHPTH N}P=v5:*DFT  
M{F#Z1033D:gN&mQw76?~;hvKb=v5#  
r*KP BLDPART |n10&CLr*"\mw1&\?~a9CbPm,yT,}  
C`X?~1,;&Z4zkP8(b{#g{zbyvD0,1`kwZQw76  
P(eDbPmPQw1,I\a9C;}7D?~f>#bI\a<B BLDPART |  
n"v/f{"#  
g{z}Z9(D|,rD~?~;fZZn?P,+fZZbPmP,raZ9(  
(fP"v/f#;x,P19(aLx4P,"R;"v/f:  
v Z QCC/H PD C/400 |,D~,MZ QCLE/H PD ILE C/400 |,D~  
9(}LvT53|,D~#(Zb(E (<...>) PDD~{8>53|,D~#(Z  
+}E ("...") PDD~{8>C'|,D~#  
v DB2/400 |,D~  
9(}LavT8(D DB2® OS/400 f|,od,gBy>:  
EXEC SQL INCLUDE SQLCA  
EXEC SQL INCLUDE SQLDA  
IZDB2 OS/400 f`kw;aSm;vI1r4D~A!4,yTb)od;Gf  
}D|,od#  
v |,Z QRPG/QIRGINC PD RPG/400  
BLDPART |n;QwQw76PDi4j6`kwy9CD{"D~#g{R;=  
MSGF,r_|;G;v?~,ra"v/f#  
9C9(?~|n  
9C BLDPART |nI9(;v?~r{v&CLr#*"_M\m1<IT9CK|  
n#(#,n?\m1r!i$9(&CLr,x*"_9(&CLrD?~ri  
~#>Zhv\m1M*"_gNXF9(}LD"z,y] BLDPART |nD9(6  
'"9(==M9(?FN}O8(D57(9(D)?~#  
XkZ BLDPART |nD PRJ M GRP N}O8(n?{Mi{#zXkTKi_P  
|BCJ(#9Xk8(?~`MM?~{#  
*8>*9(X(`MM{FD?~,kZ PART N}Odk{F,"Z TYPE N}  
Odk`M#zIT8( *ALL T8>*9(yP`MDyP?~#}g,g{dk  
TYPE(*ALL) PART(*ALL),ra9(yP`MDyP?~#2ITT`MM?~8(  
`t{#i4Z333D:XhN};,TKb`t{D9C#  
Z11B 9(&CLr 127  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
g{*+9(dv?~mSA?~Pm?~,rh8( PARTL N}#8(  
PARTL(*PRV) Jmz9CCZKn?DO;v?~Pm?~D{F(g{zG53\  
m1D0)#+G,g{zG*"_D0,KN}aj6CZ8(iDO;v?~Pm  
?~D{F#g{z9C QSECOFR C'r*mKPK|n,rK5^'#PARTL N  
}D1!5G *NONE,b8>;a+9(dv?~mSA?~Pm?~#  
g{|nO8(DiG9C PARTLREQ(*YES) 4(D,rXk8(?~Pm?~#  
g{Z BLDPART |nO8(K?~Pm?~,r:  
v C?~Pm?~XkfZZT9(b)?~Dip<D1!Qw76P#  
v 9(Zd4(D?~;mSA?~Pm?~(g{|G9;fZD0)#(49|n  
4\9(C?~,2I\a"zKiv)#  
"
g{z}Z9C?~Pm?~4G<*^)|Dr4(DyP?~((}ZC4  
4P^)D|n(}g,CHGPART"CRTPART,HH)D PARTL N}O8(  
C?~Pm?~),zI\k*<GZ BLDPART |nD PARTLN}O9Cm;  
?~Pm?~#bGr* BLDPART |n;+9( OUTPUT ?~(4,G4?  
~)mSA?~Pm#(}g,`M* PGM M FILE D?~#)g{;k<vG  
4?~,rIZTs9CC?~Pm4+^)<vAz7b#  
g{z;k9(_PX(oTD?~,r9C LANG N}#1!5 LANG(*ALL) +  
9(yPoTD?~#KN}G#PCD;v>}G:CZ`M* FILE D?~#*9  
(yPr!D~,k8( TYPE(DDSSRC)"PART(*ALL) M LANG(PRTF)#  
g{z}Z9(`M* CBLSRC RoT* CBL r SQLCBL D?~,Rg{||,  
`vLr,r BLDPART |n;`kZ;vLr#d{Lr;vT,"Z9((fP"  
v/f{"#  
;\9C BLDPART |n9( System/36 &CLr,bGr* System/36 `kw;5  
X9(}LyhDE"#PXgN`k System/36 TsDji,N{Z2123D:9(  
>}  
K>}5w BLDPART |ngN9(i MASTER PDyP?~#  
9C BLDPART |n  
BLDPART PRJ(PAYROLL)GRP(MASTER)TYPE(*ALL)PART(*ALL)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 14(9()#  
H0 BLDPART |nO9CDI!N}0d1!5gBy>#  
SCHPTH(*DFT)SCOPE(*NORMAL)FORCE(*NO)BLDMODE(*COND)SAVLST(*NO)  
BINDSTEP(*YES)PARTL(*NONE)  
128 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
BfwZ|j8X5wK SCOPE"FORCE"BLDMODE"SAVLST"BINDSTEP M  
PARTL(*NONE) N}#PX SCHPTH N}D|`5w,N{Z1033D:gN&mQ  
hC9(6'  
BLDPART |nOD SCOPE N}XFK9(}LZd*&mD?~D6'#9(6'  
8DGgN9C?~.dDX54 7(<G9(D)?~#;(;a9(;fn??  
~,+9(}La|B|R=DX5?jM4;fn??~#Z SCOPE N}O,zI  
TS 4 v5PxP!qT7(*9(D?~:*NORMAL"*LIMITED"*DIRCHAIN M  
*EXTENDED#  
g{;PZ BLDPART |nO8(NNE",r1!ivG9C9(6' *NORMAL#  
bMGZ9(?~19CDndMD6'#}#9(6'9 BLDPART |nO8(D?  
~I*10?~#g{?~G9CC44(|DyP4M`X?~DnBf>9(  
D,rC?~G10?~#`4X,g{ZON9(?~.sQ|DK4M`XT  
s,rC?~Q''#;xT.,g{9C9(6' *NORMAL,ra9( PART N  
}O8(D?~M|y@5DyPd{?~,T0G)?~y@5D?~,HH#  
}g,g{9C}#9(6'9(?~ RPGSRC BIWKLY,xKLr|,T?~ FILE  
BIWKLY PDG<D}C,ra&mb=v?~#rK,b;v9(|na<B4(=  
v?~,4 PGM BIWKLY M FILE BIWKLY#  
1*"_Z{GD*"iPbT`XD?~1,&19CK5#1\m1Zn?cN  
a9PD?viP9(C&CLr1,2&9C|#  
9(6' *LIMITED <B;&m BLDPART |nO8(D?~#T}Z9(D?~P  
Dd{`XnD}C;vT#Z4(B?~rdV|DVf?~.s,*"_&19  
CK9(6'#9(6' *LIMITED Jmzi$?~Gqs$ZDGy$w(Ttk=  
=)#  
9(6' *DIRCHAIN(r1S4)4PDYwk9(6' *NORMAL `,,+a4  
Px;=D9(&m#9a9(1S@5ZNN}Z9(D?~DyP?~#  
9(6' *EXTENDED 4PDYwk9(6' *DIRCHAIN `,,+|a4Px;=  
D9(&m#9+9(1SrdSk9(DyP?~`XDNN?~#}g,Z|D  
VN}CD~PDVN.s,\m1r*"_I9C9(6' *EXTENDED 49(&  
CLr#  
Z1303D<465wK9(6'&\#DDSSRC EMPID-PF G;v?~,'FEK?~  
hvK9(6' *LIMITED"*NORMAL"*DIRCHAIN M *EXTENDED#$z_8>  
y]8(D6'Z9(}LPf0=D?~#iz_8>I\a9(Z9(}LPf  
0=D?~(y]8(D6')#SCOPE(*NORMAL) G1!5#K>}Y(yP?~<  
Q''#"b,ITZ BLDPART |nO8(4 DDSSRC EMPID-PF rdv FILE  
EMPID-PF#b=_xv`,Da{#  
Z11B 9(&CLr 129  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
DEVELOPER1  
DDSSRC EMPDTA-PF  
FILE EMPDTA-PF  
DDSSRC EMPID-PF  
FILE EMPID-PF  
*NORMAL  
*LIMITED  
*DIRCHAIN *EXTENDED  
RPGSRC BIWKLY-RPG  
PGM BIWKLY-RPG  
< 46. BLDPART |nM DDSSRC EMPID-PF ?~D9(6'  
g{!q *LIMITED"*NORMAL"*DIRCHAIN r *EXTENDED 9(6',rO<  
PD?~4gB==9(:  
*LIMITED  
;9( DDSSRC EMPID-PF#g{ FILE EMPDTA-PF fZ,raX  
B4( FILE EMPID-PF#|B DDSSRC EMPID-PF M FILE  
DDSSRC-LF .dT0 DDSSRC EMPDTA-PF M FILE EMPDTA-PF  
.dDX5#  
liyP`X?~,Kb|G1PGqPNNQ|D+P49(#  
*LIMITED 9(6'ZliLrMD~D?~`Xn1#9ZZ;c`  
XnO#w* *LIMITED 9(6';?VDiz_uT>C9(}L  
9C FILE EMPDTA-PF 47(Gqh*9( DDSSRC EMPID-PF#  
g{ FILE EMPDTA-PF Q|D,r9( DDSSRC EMPID-PF#  
*NORMAL  
9( DDSSRC EMPID-PF y@5D?~#Z>}P,|@5Z FILE  
EMPDTA-PF,rK9( DDSSRC EMPDTA-PF#  
9( BLDPART |nO8(D?~,4 DDSSRC EMPID-PF#XB4  
( FILE EMPID-PF#  
*DIRCHAIN  
aT *DIRCHAIN 9(6'9(Q-* *NORMAL 9(6'9(D?  
~#  
*EXTENDED 9( DDSSRC EMPID-PF y@5D?~#Z>}P,|@5Z FILE  
EMPDTA-PF,rK9( DDSSRC EMPDTA-PF#  
9( BLDPART |nO8(D?~,4 DDSSRC EMPID-PF#XB4  
( FILE EMPID-PF#  
130 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
9(@5Z FILE EMPID-PF D?~#|G RPGSRC BIWKLY#XB  
4( PGM BIWKLY#  
g{9C SCOPE(*EXTENDED),rliyP`%X*D?~"`&X  
xP9(#ZK>}P,r*yP?~<`%X*,yTZxP  
SCOPE(*EXTENDED) D BLDPART |nO8(NN?~<aC=`  
,Da{#  
g{9(`M* PGM"FILE"CLD"CMD MODULE r SRVPGM D?~,r  
BLDPART |na`k4(g{PX*D0),498(K SCOPE(*LIMITED) `g  
K#ITZ BLDPART |nO8(4rdv?~#Z523Dm5P>K0&CLr*"  
\mw1&\?~'VD OS/400 Ts`M#  
(}9CZ1303D<46P9CD?~,CRG49(`k}D RPG Lr BIWKLY#  
g{z!q *LIMITED"*NORMAL"*DIRCHAIN r *EXTENDED 9(6',r?  
~4gB==9(:  
*LIMITED  
;9( PGM BIWKLY-RPG#RGks BLDPART |n+9(}L^  
F*;9( PGM BIWKLY-RPG#`k RPGSRC BIWKLY-RPG#  
9C RPGSRC BIWKLY 1S@5DyP?~47(Gq`k RPGSRC  
BIWKLY#ZZ1303D<46P,bm>9(}L9C FILE EMPID-PF  
47(Gqh*9( RPGSRC BIWKLY-RPG#g{ FILE EMPID-PF  
r RPGSRC BIWKLY Q|D,ra9( BIWKLY,+;`k FILE  
EMPID-PF#  
*NORMAL  
9( RPGSRC BIWKLY-RPG y@5D?~#Z>}P,|@5Z  
FILE EMPID-PF#H9(omD~,;sY9(_-D~;rK,H9  
( DDSSRC EMPDTA-PF,;s9( DDSSRC EMPID-PF#  
9( BLDPART |nO8(D?~,4 RPGSRC BIWKLY-RPG,"  
XB4( PGM BIWKLY-RPG#  
*DIRCHAIN  
* *DIRCHAIN 9(6'9(Q-* *NORMAL 9(6'9(D?  
~#  
*EXTENDED * *EXTENDED 9(6'9(Q-* *NORMAL 9(6'9(D?  
~#  
>}  
BfDv|n5wyZZ1303D<46D *LIMITED"*NORMAL"*DIRCHAIN M  
*EXTENDED 9(6'D9C#  
y]TB|n,;9( DDSSRC EMPID-PF#  
BLDPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(DDSSRC)PART(EMPID)  
SCHPTH(*DFT)SCOPE(*LIMITED)FORCE(*NO)  
BLDMODE(*COND)SAVLST(*NO)  
y]TB|n,9( DDSSRC EMPDTA-PF M DDSSRC EMPID-PF#  
BLDPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(DDSSRC)PART(EMPID)  
SCHPTH(*DFT)SCOPE(*NORMAL)FORCE(*NO)  
BLDMODE(*COND)SAVLST(*NO)  
y]TB|n,9( DDSSRC EMPDTA-PF M DDSSRC EMPID-PF#byD0,Ma  
* *DIRCHAIN 9(6'9(Q-* *NORMAL 9(6'9(D?~#  
Z11B 9(&CLr 131  
Download from Www.Somanuals.com. All Manuals Search And Download.  
BLDPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(DDSSRC)PART(EMPID)  
SCHPTH(*DFT)SCOPE(*DIRCHAIN)FORCE(*NO)  
BLDMODE(*COND)SAVLST(*NO)  
y]TB|n,9( DDSSRC EMPDTA-PF"DDSSRC EMPID-PF M RPGSRC  
BIWKLY-RPG#9( RPGSRC BIWKLY-RPG Du~G:|GT09(D(rKk  
DDSSRC EMPID-PF ("KX5),"RVZQ''#  
BLDPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(DDSSRC)PART(EMPID)  
SCHPTH(*DFT)SCOPE(*EXTENDED)FORCE(*NO)  
BLDMODE(*COND)SAVLST(*NO)  
>}  
Z1333D<475w1|({* FILE MNTHLYL-LF D_-D~1D9(6'&\#Z  
DDSSRC EMPDTA-PF P,|DK DDSSRC EMPID-PF P}CDVN#DDSSRC  
E M P I D - P F  
G ; v ? ~ , ' F E K ? ~ h v K 9 ( 6 '  
*LIMITED"*NORMAL"*DIRCHAIN M *EXTENDED#$z_8>y]8(D6'Z  
9(}LPf0=D?~#iz_8>Z9(}LPf0=D,I\;a9(D?~  
(y]8(D6')#K>}Y(yP?~<Q'',"R,T0Z?jiPQ9(b  
)?~# "b,ITZ BLDPART |nO8(4 DDSSRC EMPID-PF rdv FILE  
EMPID-PF#b=_xv`,Da{#  
132 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
DEVELOPER1  
DDSSRC EMPDTA-PF  
FILE EMPDTA-PF  
DDSSRC EMPID-PF  
FILE EMPID-PF  
*NORMAL  
*LIMITED  
*DIRCHAIN *EXTENDED  
DDSSRC MNTHLYL-LF  
FILE MNTHLYL-LF  
RPGSRC MNTHLY-RPG  
PGM MNTHLY-RPG  
RPGSRC BIWKLY-RPG  
PGM BIWKLY-RPG  
< 47. BLDPART |nM DDSSRC EMPID-PF ?~D9(6'  
g{!q *LIMITED"*NORMAL"*DIRCHAIN r *EXTENDED 9(6',r0<  
PD?~4gB==9(:  
*LIMITED  
iz_8>;9( DDSSRC EMPID-PF,"R;XB4( FILE  
EMPID-PF,bGr*_-D~yZ FILE EMPID-PF#  
*NORMAL  
9( DSSSRC EMPID-PF y@5D?~#Z>}P,|@5Z FILE  
EMPDTA-PF,rKa9( DDSSRC EMPDTA-PF#  
;9( BLDPART |nO8(D?~(4 DDSSRC EMPID-PF),b  
Gr*_-D~yZKD~#  
*DIRCHAIN  
9( DSSSRC EMPID-PF y@5D?~#ZK>}P,|@5Z FILE  
EMPDTA-PF,rKa9( DDSSRC EMPDTA-PF#  
9( BLDPART |nO8(D?~,4 DDSSRC EMPID-PF#  
9(1S@5Z FILE EMPID-PF D?~#bb6E9( DDSSRC  
MNTHLYL-LF#XB4( FILE MNTHLYL-LF#  
Z11B 9(&CLr 133  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
*EXTENDED 9( DDSSRC EMPID-PF y@5D?~#Z>}P,|@5Z FILE  
EMPDTA-PF,rKa9( DDSSRC EMPDTA-PF#  
9( BLDPART |nO8(D?~,4 DDSSRC EMPID-PF#XB4  
( FILE EMPID-PF#  
9(@5Z FILE EMPID-PF D?~#9( DDSSRC MNTHLYL-LF,  
TXB4( FILE MNTHLYL-LF#  
9( RPGSRC BIWKLY,TXB4( PGM BIWKLY#  
g{9C SCOPE(*EXTENDED),rliyP`%X*D?~"`&X  
xP9(#ZK>}P,r*yP?~<`%X*,yTZxP  
SCOPE(*EXTENDED) D BLDPART |nO8(NN?~<aC=`  
,Da{#  
7(Gq9(yP?~  
Z&m?~1,9(}L9C1!5 FORCE(*NO)#bb6E;&mG)h*9(D?  
~# b99(|n;X&m;h*&mD?~#g{3v?~G10?~,r;aYN  
9(|#  
(}8( FORCE(*YES),I7#&myP?~,49PD?~P4|D#zI\k*  
*7#|B&CLrPDyP?~x4PKYw#  
"b,g{8( BLDMODE(*COND),"R4\9(3v`X?~,r49 FORCE G  
*YES,2;9(NN@5Z|D?~#  
Y(zDi DEVELOPER1 PP=v?~:RPGSRC BIWKLY( T"vO;v  
BLDPART |n.s,K?~4"z|D)M PGM BIWKLY(|G RPGSRC BIWKLY  
Ddv?~)#g{zZ8(K FORCE(*NO) DivB!q9( RPGSRC BIWKLY,  
r;4PNNYw#r* BIWKLY G10?~,yT;`k|#g{zZ8(K  
FORCE(*YES) DivB!q9(|,ra`k|#  
lv"|DMa}?~1,Z*"6pO=DiPD?~I\a\lXdC}1,b  
I\a<BZ*"iP`kG)?~#  
zI\a"V,C\m1Z*"iO=DiP(ZwC BLDPART TYPE(*ALL)  
PART(*ALL) FORCE(*NO) aTxuYZ*"iP4PD`k#  
7(9(==  
9(}L9CD==r=(I BLDMODE N}O8(D57(#}VI\D9(==  
VpG0u~1"0^u~1M0?(f1#  
1!5G BLDMODE(*COND)#0u~19(==m>1zZ BLDPART |nO8(  
;v?~1,g{r*NN-r4\9(K?~y@5DG)?~,r;9(8(D  
?~#}g,?~ RPGSRC BIWKLY |,T?~ FILE BIWKLY D}C#g{4`  
k DDSSRC BIWKLY,rH;4( PGM BIWKLY 2;4( FILE BIWKLY#  
0^u~19(== (BLDMODE(*UNCOND)) 8>49?~4\I&X`k,2a`  
k@5Z|D?~#}g,494\`k?~ DDSSRC BIWKLY,+T+`k RPGSRC  
BIWKLY#  
134 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
0?(f19(== (BLDMODE(*RPTONLY)) 8>z;k5JX`k?~,x;kz  
I;v(f,K(fP>1Z BLDMODE N}O8( *COND 1+a`kD?~#r  
*K!nh9K?~D`k,yT9(}L;9CONI&9(yzIDXZ?~D  
X5E"#  
#f9((fM`kwPm  
Zz9C BLDPART |n1,\GazI9((f#9C SAVLST N}4+9((f  
M`kwPm#f=dviPDD~ QALYBLDREP P#1!ivG;#f|G#*8  
>zk#f|G,k8( SAVLST(*YES)#  
g{9(s??~RzkT/em BLDPART |nzIDYQzD~,r9C  
SAVLST(*DLT) N}#KN}+>}yPI&`kDPm#g{yP(f<9(I&,  
4"vNN/fR48( BLDMODE(*RPTONLY),r9+>}9((f#  
Z4(;vi1,caZBiP4(;v{* QALYBLDREP DomD~#  
QALYBLDREP |,=V`MDdvPm,49((fM`kwPm#9((ff"Z  
{* QREPxxxxxx DI1P,dP,xxxxxx ;f;*;.}V#I1`MG REPORT#  
b)?~DhvI BLDPART |nO8(D?~D{FM`MiI#  
`kwPmf"Z{* QLSTxxxxxx DI1P,dP,xxxxxx ;f;*;.}V#|  
GDI1`MG BLDPART |nzID(fD{F,4 QREPxxxxxx#b)I1Dhv  
I`kD4?~D{FM`MiI#  
": 1 SAVLST G *YES 1,BLDPART |nZ{`kwzI1!YQzD~{#g  
{;GbyD0,r BLDPART |n;\#f`kwPm#Z3)ivB,Z`k  
w|nD PRTFILE N}O|D1!{Fa<BbViv#  
<48T>K9((fDZ;3,K3P>K BLDPART |nO8(DN}#  
5722WDS  
V5R1M0  
&CLr*"\mw  
- 9((f  
08/11/96  
12:00:00  
3f . . : 0001  
n?  
i
. . . . . . . . . . . . . . . . : PAYROLL  
. . . . . . . . . . . . . . . . . : DEVELOPER1  
ꢀ1ꢁ  
ꢀ2ꢁ  
ꢀ3ꢁ  
ꢀ4ꢁ  
ꢀ5ꢁ  
ꢀ6ꢁ  
ꢀ7ꢁ  
ꢀ8ꢁ  
ꢀ9ꢁ  
ꢀ10ꢁ  
ꢀ11ꢁ  
`M . . . . . . . . . . . . . . . . . : RPGSRC  
?~ . . . . . . . . . . . . . . . . . : *ALL  
Qw76 . . . . . . . . . . . . . . . : *DFT  
9(6' . . . . . . . . . . . . . . . : *NORMAL  
?F9( . . . . . . . . . . . . . . . : *NO  
9(== . . . . . . . . . . . . . . . : *RPTONLY  
#fPm . . . . . . . . . . . . . . . : *NO  
4Ps(=h . . . . . . . . . . . . . : *YES  
9CDQw76?~ . . . . . . . . . . : *DFT  
9CDQw76 . . . . . . . . . . . . : PAYROLL  
PAYROLL  
DEVELOPER1  
TEST  
ꢀ12ꢁ  
< 48. 9((fDZ;3-(fjb  
ꢀ1ꢁ  
ꢀ2ꢁ  
ꢀ3ꢁ  
ꢀ4ꢁ  
ꢀ5ꢁ  
ꢀ6ꢁ  
Z BLDPART |nO8(Dn?#  
Z BLDPART |nO8(Di#  
Z BLDPART |nO8(D`M#  
Z BLDPART |nO8(D?~#  
Z BLDPART |nO8(DQw76#  
Z BLDPART |nO8(D6'#  
Z11B 9(&CLr 135  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
ꢀ7ꢁ  
ꢀ8ꢁ  
Z BLDPART |nO8(D?F#  
Z BLDPART |nO8(D==#  
ꢀ9ꢁ  
Z BLDPART |nO8(D SAVLST !n#  
Z BLDPART |nO8(Ds(=h!n#  
BLDPART 9CDQw76?~(g{9CK1!Qw76,r* *DFT#)  
ꢀ10ꢁ  
ꢀ11ꢁ  
ꢀ12ꢁ  
BLDPART 9CDQw76#(bITGQw76?~PDiPm,2ITG1  
!Qw76#)  
<49T>K9((fDZ~3,K3P>9(}LP"VD/fMmsD{",|(  
{"EM{"D>#i4=<E. 9((f{",Tq!9((f9(-r{"DPmM  
I\avVD9((f/f{"DPm#  
5722WDS V5R1M0  
&CLr*"\mw  
- 9({" 05/08/01  
12:00:00  
3f . . : 0002  
{"j6 D>  
------- --------------------------------------------------------------------------------------------------------------------  
ADM4455 `k PAYROLL DEVELOPER1 RPGSRC BIWKLY '\#  
* * * * *  
9
(
{
"
a
x
* * * * *  
< 49. 9((fDZ~3-{"  
<50G9((fDZ}3,K3T>9(}L4(D9(dv#b)dv|((}`  
k4?~zIDLrMD~#>Z44`MV`#*yP`kD CSRC ?~r!;v  
m , * y P ` k D _ - D ~ r ! ; v m , H H # K q = C Z 4 ` M  
RPGSRC"CBLSRC"CSRC"CLESRC"CLDSRC"CMDSRC"DDSSRC(PF"LF"DSPF"  
PRTF M ICFF)"CLPSRC"PNLSRC M BNDSRC#  
5722WDS V5R1M0  
&CLr*"\mw  
- 9(dv 05/08/01  
12:00:00  
3f . . : 0003  
ꢀ13ꢁ  
DDSSRC-PF  
i
ꢀ15ꢁ  
4(D  
D~  
BLDOPT  
?~  
?~  
i
9(-rꢀ18ꢁ  
---------- -------------------- ---------- ---------- -------------------- ----------------------------------------------------  
EMPDTA  
ꢀ14ꢁ  
DEVELOPER1  
EMPDTA  
ꢀ16ꢁ  
QDFT  
ꢀ17ꢁ  
DEVELOPER1  
T049(4?~#  
DDSSRC-LF  
i
4(D  
D~  
BLDOPT  
?~  
?~  
i
9(-r  
---------- -------------------- ---------- ---------- -------------------- ----------------------------------------------------  
EMPID DEVELOPER1 EMPID *DFT *NONE T049(4?~#  
* * * * * * * * * *  
9
(
(
f
a
x
< 50. 9((fDZ}3-9(dv  
ꢀ13ꢁ  
ꢀ14ꢁ  
ꢀ15ꢁ  
ꢀ16ꢁ  
ꢀ17ꢁ  
Q`kD4?~D`MMoT;}g,DDSSRC-PF#  
Q`kD4?~D{FT0ZdPR=C?~Di#  
4(DdvD`M,}g,LrrD~#  
4(Ddv?~D{F#  
9CD BLDOPT ?~(g{PD0)D{FT0ZdPR=C?~Di#g{  
(fPD BLDOPT VNT?~T> *DFT,"TiT> *NONE(Ms<50P  
D(fDZ~PGy),rm>9(}L9CK1!`kw|n#;P9C  
BLDOPT ?~PD`kw|n4`kC?~#  
ꢀ18ꢁ  
"z9(}LD-r#  
136 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
s(Lr  
g{zkC9(}LT`M* MODULE D?~4P04(Lr1(CRTPGM) |n,k  
Z4Ps(=hN}9C1!5 BINDSTEP(*YES)#g{;k4Ps(=h,k8(  
BINDSTEP(*NO)#<51Gy>9((fPD;?V,|T>8( BINDSTEP(*YES) 1  
D9(}LDdv#  
<51T>9CDkZ#i4,9CD BLDOPT ?~(g{PD0)T04P9(}L  
D-r#  
5722WDS  
V5R1M0  
&CLr*"\mw  
4(D  
- 9(dv 05/08/01  
BLDOPT  
i
17:49:11  
3f . . : 0002  
CSRC  
?~  
i
Ts  
?~  
9(-r  
---------- -------------------- ---------- ---------- -------------------- ----------------------------------------------------  
PGM2USRINC USER  
ꢀ1ꢁ  
PGM2USRINC *DFT  
*NONE  
*FORCE hC* *YES#  
MODULE  
4(D  
Lr  
BLDOPT  
?~  
i
?~  
i
9(-r  
---------- -------------------- ---------- ---------- -------------------- ----------------------------------------------------  
PGM2USRINC USER  
PGM2USRINC PGM2USRINC USER  
ꢀ2ꢁ ꢀ3ꢁ  
T0P49(4?~#  
ꢀ4ꢁ  
* * * * *  
9
(
(
f
a
x
* * * * *  
< 51. T>s(=hDdvDy>9((f  
ꢀ1ꢁ  
ꢀ2ꢁ  
ꢀ3ꢁ  
ꢀ4ꢁ  
4?~M4(DTs  
4(D`M* PGM D?~  
9CD9(!n?~D{F  
Z?VivB9(?~D-r  
+?~mSA?~Pm?~  
IT9C PARTL N}4+?~mSANN?~Pm?~#8(?~Pm?~D{Fr  
9C1!5 *NONE#  
g{8(DiG9C PARTLREQ(*YES) (eD,r PARTL N}GXhD#g{8(  
K?~Pm?~,r:  
v |XkfZZ9(?~DiyZDa}76P  
v +9(Zd4(Ddv?~D{FmSA?~Pm?~(g{|G;fZD0)  
9(OY?~  
Z*"n/n1&D1r,zI\kZ@"ZyPd{*"iDi(g/IMbT  
i)P9C SCOPE(*NORMAL) 9(yP?~,RAY?m4P;N#ZG,/IMb  
TiPDyP9(dv?~(g FILE"MODULE M PGM <+GnBD,Ts;h*  
XB9(#Kb,Z*"iP;P\|D0lD?~EaqC}#9(,rxDxK  
BLDPART |nDT\#  
Z11B 9(&CLr 137  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
9C9(!n  
>ZV[BPwb:  
Z4(9(!n?~.0*<GDBn  
4(9(!n?~  
gN&m`M* BLDOPT D?~  
n?cNa9PP`v9(!n?~  
CZomD~M_-D~DXb9(!n|n  
Z4(`M* BLDOPT D?~.0h*<GDBn  
n?\m1h*7(9C`M* BLDOPT D?~D_T#n?\m1&<GBPJb:  
v Z&mLr1,zDi/Gq;9C`kw1!5?  
g{byD0,r^h*&CLr4(`M* BLDOPT D?~,`M* PGM(oT  
* CLE"RPGLE"CBLLE M CLLE)D?~}b#  
v zDi/Gqk7#Zn?cNa9Pg&CLr;BX9C`kw!n?}g,  
zDi/Gq*sZ`k1E/yPLr?  
v zDi/Gqk7#Z?v*"i"Z?vbTiT0ZyiP;BX9C`kw  
!n?  
}g,Z*"iP,zIT:4(`M* BLDOPT D?~T7#+Lr`k*xP  
wTE";zI`kwPm;T0Z`kwPmP|(N6{"D>#ZbTi  
P,IT4(`M* BLDOPT D?~,T7#+Lr`k*;xwTE","zI  
`kwPm#ZyiP,zIT4(`M* BLDOPT D?~T7#+Lr`k*;  
xwTE"r;zI`kwPm,"xPE/#  
v Gq+Xb5 QDFT Cw`M* BLDOPT D?~D{F?  
i4Z1443D:gN&m`M* BLDOPT D?~;,TKbgN9C_PK{FD  
9(!n?~D5w#&1T|,*CzDi/Z1!ivB9CD1!`k!n  
DNN9(!n?~9CK{F#  
4(9(!n?~  
Z&m?~1,BLDPART |n9Ck`kw|nOD?vI!N}`X*DyP1!  
5,+ CRTCMOD M CRTBNDC |nG}b#`kw!nN} (OPTION) hC*5  
*SYSINCPATH,rK,1z9(;v|,?~1,+9(C|,?~Zn?cNa9  
DCX(V'PDnMf>#"b,*SYSINCPATH ;GKN}D1!5#1!5*  
*USRINCPATH#Z1403D<52T>K53a)D9(!n?~#  
g{z;kZ9(?~19C1!5,rXk8(*Z`M* BLDOPT D?~P&m  
D7P|n#}g,zI\kZ CRTRPGPGM |nO8( *NOLIST,Tc;zIP  
m#  
9(!n (BLDOPT) ?~G;v0&CLr*"\mw1?~,|Jmz8(`kwr  
&m|n#4(M\mK?~D==kd{0&CLr*"\mw1?~`F,+;  
\9(C?~#  
*4(9(!n?~,k9C CRTPART |n4s4(4?~Gy4(C?~#1z4  
(9(!n?~1,CRTPART |nT/X+1!9(!n?~Sk0&CLr*"\  
mw1&\?~;p20D QADM b4F=`M* BLDOPT D?~P,T*za)  
;vp<c#  
138 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
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&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  
C CHGPART |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?~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(NN|n#g{R=k}Z9(D?~D?~`M,{Dj  
E,rZCodOKP CL |n,"R;xPNNo(li#ZKPbvxjED CL  
|n.s,;"vNNd{`kw|n#f;d?ZxjED CL |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$&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  
g{Z;P>mOR=jE,r BLDPART |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#  
Z11B 9(&CLr 139  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
/********************************************************************/  
/*  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
/* Application Development Manager  
/* substitution variables in a build options part (part of  
/* type BLDOPT):  
/*  
recognizes following  
/*  
/* &F - Source file name of the part being compiled.  
/*  
/* &L - Library name associated with the group containing  
/*  
/*  
the part being compiled.  
/* &N - Object/member name of the part being compiled.  
/*  
/* &O - Name of the library where the output object of the  
/*  
/*  
BLDPART command is placed.  
/* &ZA - Language attribute of the source part being compiled,  
/*  
/*  
not of the output part.  
/* &ZC - &ZC is replaced with BLDPART.  
/*  
/* &ZD - &ZD is replaced by the type of the output part created  
/*  
/*  
/*  
/*  
by the BLDPART command. If the source part has not  
been previously built, this is the same as the type  
of the source part.  
/* &ZE - &ZE is replaced by the name of the output part being  
/*  
/*  
/*  
/*  
/*  
/*  
/*  
/*  
/*  
created by the BLDPART command. If the source part has  
not been previously built, this is the same as the name  
of the source part.  
For a user-defined type of *NONE, &ZE is set to the  
first output member met by the BLDPART command, or the  
name of the part with the user-defined type of *NONE,  
if the part has not been processed before.  
/* &ZG - Name of the group where the outputs of the BLDPART  
/*  
/*  
command are placed.  
/* &ZN - Name of the part being compiled.  
/*  
/* &ZO - The value of the Build Scope parameter on the BLDPART  
/*  
/*  
/*  
command. The values are *NORMAL, *LIMITED, *DIRCHAIN, and */  
*EXTENDED.  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
*/  
/* &ZP - Name of the project containing the part being compiled.  
/*  
/* &ZS - The value of the Search Path parameter on the BLDPART  
/*  
/*  
command. This value is the name of the search path part.  
/* &ZT - Type of part being compiled.  
/*  
/* &ZY - Name of the part-list part specified on the PARTL  
/*  
/*  
parameter.  
/********************************************************************/  
< 52. 53a)D9(!n?~ (1/4)  
140 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
/*******************************************************/  
/* PGM compilers */  
/*******************************************************/  
/* CRTRPGPGM PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)*/  
/* CRTCBLPGM PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)*/  
/* CRTCLPGM PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
USRPRF(*USER)REPLACE(*YES)AUT(*EXCLUDE)*/  
/*******************************************************/  
/* FILE compilers  
*/  
/*******************************************************/  
/* CRTPF  
FILE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
AUT(*EXCLUDE)*/  
/* CRTLF  
FILE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
AUT(*EXCLUDE)*/  
/* CRTDSPF  
/* CRTPRTF  
/* CRTICFF  
FILE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
AUT(*EXCLUDE)REPLACE(*YES)*/  
FILE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
AUT(*EXCLUDE)REPLACE(*YES)*/  
FILE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
AUT(*EXCLUDE)REPLACE(*YES)*/  
/*******************************************************/  
/* SQL preprocessors */  
/*******************************************************/  
/* CRTSQLRPG PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
OPTION(*GEN)REPLACE(*YES)*/  
/* CRTSQLCBL PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
OPTION(*GEN)REPLACE(*YES)*/  
/*******************************************************/  
/* CLD/CMD compilers  
*/  
/*******************************************************/  
/* CRTCLD  
/* CRTCMD  
CLD(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
AUT(*EXCLUDE)REPLACE(*YES)*/  
CMD(&O/&ZE)PGM(&O/&ZE)SRCFILE(&L/&F)+  
SRCMBR(&ZN)AUT(*EXCLUDE)REPLACE(*YES)*/  
/*******************************************************/  
/* ADDPFM/ADDLFM */  
/*******************************************************/  
/* ADDPFM FILE(&O/&ZE)MBR(MBRNAME)*/  
/* ADDLFM FILE(&O/&ZE)MBR(MBRNAME)*/  
/*******************************************************/  
/* UIM  
*/  
/*******************************************************/  
/* CRTPNLGRP PNLGRP(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
AUT(*EXCLUDE)REPLACE(*YES)*/  
/* CRTMNU  
MENU(&O/&ZE)TYPE(*UIM)SRCFILE(&L/&F)+  
SRCMBR(&ZN)AUT(*EXCLUDE)REPLACE(*YES)*/  
/*******************************************************/  
/* ILE compilers and preprocessors */  
/*******************************************************/  
/* CRTPGM  
PGM(&O/&ZE)MODULE(&L/&ZN)REPLACE(*YES)  
USRPRF(*USER)AUT(*EXCLUDE)*/  
+
/* CRTSRVPGM SRVPGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN) +  
REPLACE(*YES)AUT(*EXCLUDE)*/  
/* CRTCMOD  
MODULE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN) +  
REPLACE(*YES)AUT(*EXCLUDE)  
+
OPTION(*SYSINCPATH)*/  
< 52. 53a)D9(!n?~ (2/4)  
Z11B 9(&CLr 141  
Download from Www.Somanuals.com. All Manuals Search And Download.  
/* CRTSQLCI  
/* CRTBNDC  
OBJ(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
OBJTYPE(*MODULE)OPTION(*GEN)REPLACE(*YES)*/  
PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE) +  
OPTION(*SYSINCPATH)*/  
+
+
/* CRTRPGMOD MODULE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN) +  
REPLACE(*YES)AUT(*EXCLUDE)  
*/  
/* CRTSQLRPGI OBJ(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
OBJTYPE(*MODULE)OPTION(*GEN)REPLACE(*YES)*/  
/* CRTBNDRPG PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
+
+
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE) */  
/* CRTCBLMOD MODULE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN) +  
REPLACE(*YES)AUT(*EXCLUDE)  
*/  
/* CRTSQLCBLI OBJ(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
+
OBJTYPE(*MODULE)OPTION(*GEN)REPLACE(*YES)*/  
/* CRTBNDCBL PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
+
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE) */  
MODULE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN) +  
/* CRTCLMOD  
/* CRTBNDCL  
REPLACE(*YES)AUT(*EXCLUDE)  
*/  
PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
+
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE) */  
/*******************************************************/  
/* CoOperative Development Environment/400 Compilers */  
/*******************************************************/  
/* CRTRPGPGM PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)+  
OPTION(*SRCDBG)*/  
/* CRTSQLRPG PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
OPTION(*GEN *LSTDBG)+  
REPLACE(*YES)*/  
/* CRTCBLPGM PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)+  
OPTION(*SRCDBG)*/  
/* CRTSQLCBL PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
OPTION(*GEN *LSTDBG)REPLACE(*YES)*/  
/* CRTCLPGM  
PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
USRPRF(*USER)REPLACE(*YES)AUT(*EXCLUDE)+  
OPTION(*SRCDBG)*/  
/* CRTCMOD  
MODULE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
OPTION(*SYSINCPATH *EVENTF)+  
REPLACE(*YES)AUT(*EXCLUDE)+  
DBGVIEW(*SOURCE)*/  
/* CRTSQLCI  
/* CRTBNDC  
OBJ(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
OBJTYPE(*MODULE)OPTION(*GEN *EVENTF)+  
REPLACE(*YES)DBGVIEW(*SOURCE)*/  
PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE) +  
OPTION(*SYSINCPATH *EVENTF)DBGVIEW(*SOURCE)*/  
+
+
/* CRTRPGMOD MODULE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN) +  
REPLACE(*YES)AUT(*EXCLUDE)+  
OPTION(*EVENTF)DBGVIEW(*SOURCE)*/  
/* CRTSQLRPGI OBJ(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
OBJTYPE(*MODULE)OPTION(*GEN *EVENTF)+  
+
REPLACE(*YES)DBGVIEW(*SOURCE)*/  
/* CRTBNDRPG PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
+
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)+  
OPTION(*EVENTF)DBGVIEW(*SOURCE)*/  
< 52. 53a)D9(!n?~ (3/4)  
142 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
/* CRTCBLMOD MODULE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN) +  
REPLACE(*YES)AUT(*EXCLUDE)+  
OPTION(*EVENTF)DBGVIEW(*SOURCE)*/  
/* CRTSQLCBLI OBJ(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
OBJTYPE(*MODULE)OPTION(*GEN *EVENTF)+  
+
REPLACE(*YES)DBGVIEW(*SOURCE)*/  
/* CRTBNDCBL PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
+
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)+  
OPTION(*EVENTF)DBGVIEW(*SOURCE)*/  
/* CRTCLMOD MODULE(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN) +  
REPLACE(*YES)AUT(*EXCLUDE)+  
OPTION(*EVENTF)DBGVIEW(*SOURCE)*/  
/* CRTBNDCL PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)  
+
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)+  
OPTION(*EVENTF)DBGVIEW(*SOURCE)*/  
< 52. 53a)D9(!n?~ (4/4)  
": CRTBNDC M CRTCMOD |nOD`kw!nN} (OPTION) hC*5  
*SYSINCPATH,rK,1z9(|,?~1,+9(C|,ZQw76PDnM  
f>#"b, *SYSINCPATH ;GKN}D1!5#1!5* *USRINCPATH#  
9(!n?~PDf;d? bv*BPwn:  
&O  
fE9(}LDdvDbD{F#bG BLDPART |nO8(Dn?MiD  
b#@6;&|D &O#  
&ZE  
}Z4(Ddv?~D{F#g{H049(4,rbGk4?~{`,D{  
F#X*1IT|D &ZE#  
&ZE f;d?Z9(1xPbv#IT+ &ZE d?f;*BPNN;n#  
*PGMID,vCZ COBOL/400  
*CTLSPEC,vCZ RPG/400  
{F  
g{PI\D0,D~"#iM~qLr&1k4(|GD4?~,{#  
g{4?~VZ`k=,;dviP{* CLD B Ddv?~P,r BLDPART  
|naT/>}dv?~ CLD A#  
&L  
|,4?~DiDbD{F#}g,IT"vTB|n:  
BLDPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)  
g{?~ RPGSRC BIWKLY ;Zi DEVELOPER1 P,xZ{* TEST D  
iP,CiZn?cNa9P;Z|_D;6,r &L bv* TEST iDb#  
bk &O(fE9(dvDb)NITU#@6;&|D &L#  
&F  
|,}Z`kD4?~DD~D{F#@6;&|D &F#  
&ZN  
}Z`kD4?~D{F#}KPI\T CRTCMD PD PGM |D &ZN .  
b,@6;&|D|#  
*q!Z0&CLr*"\mw1&\?~PICDf;d?Dj{Pm,N{=<  
Z11B 9(&CLr 143  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
+ BLDOPT ?~CZ CODE/400  
g{Q20 CoOperative Development Environment/400 (CODE/400) z7,9C  
CODE/400 9(0&CLr*"\mw1?~"kZ0&CLr*"\mw19(s+  
ms4!x CODE/400,r4PBP=h:  
1. 4(`M* BLDOPT D0&CLr*"\mw1?~,"9d_PZ1383D:4  
(9(!n?~;PV[DJ1{F#  
2. 7#K?~ZQw76P#  
3. S53a)D BLDOPT ?~D CODE/400 ?VP}%TJ1`kw|nD"M,  
gZ1403D<52y>#  
gN&m`M* BLDOPT D?~  
r*z;PZ BLDPART |nO8(*9CD BLDOPT ?~,yT9(|n9CKh  
CDQwNr#&m BLDOPT ?~DQwNrG:  
1. 9(}LQw BLDOPT part-name(dP,part-name G}Z9(D?~D{F)"  
9CZdPR=D!n#}g,g{}Z9( RPGSRC BIWKLY,r9(}LQw  
BLDOPT BIWKLY#  
2. g{R;= BLDOPT part-name,r9(}LQw BLDOPT compiler-name(dP,  
compiler-name G*C49(}Z9(D?~D1!`kw|nD{F)"9CZd  
PR=D!n#i4Z1223Dm12,TKb1!`kw|nD{F#"b,g{  
P`v`kw|nT}Z9(D?~P',r9(}L;6p_P1!`kw|n  
{D BLDOPT ?~#;x,zITSd{`kw|nP}%"M,T99(}L9  
C|#}g,g{}Z9( RPGLESRC ?~,r CRTBNDRPG M CRTRPGMOD  
`kw|n<P'#;x,9(}L+;6p BLDOPT CRTBNDRPG#zIT4(  
BLDOPT CRTBNDRPG ?~,+SdPD CRTRPGMOD |nP}%"M#  
3. g{R;= BLDOPT compiler-name,r9(}LQw?~ BLDOPT QDFT#K?  
~cG1!D9(!n?~#  
4. g{R;= BLDOPT QDFT,r9(}LT}Z9CD`kw|n9C1!`kw  
!n#}g,g{}Z`kD4?~`MG DDSSRC-PF,r BLDPART |n4T  
OPmPhvDNrZ BLDOPT ?~PiR CRTPF |n#g{R;=,r9C1  
!`k|n#g{ BLDOPT ?~PPm` CRTPF |n,r9CZ;v#  
bm>(e9(&mDK1XkKbn?cNa9PfZD9(!n?~,"7#4  
P}7D9(&m#h*G!DXZ BLDOPT ?~Dd{;)*c|(:  
v Qw76PD2mn?PD BLDOPT ?~;vT#  
v Z CRTPGM |nD ENTMOD N}O8(D#iXkkZ CRTxxxMOD(dP,  
xxx G`kwoT,g C"CL"CBL M RPG)|nO8(D#i`,#  
g{}Z9Ck MODULE ?~,{D BLDOPT ?~,rXkZ CRTPGM |nD  
ENTMOD N}O8(C{F#  
v Z CRTPGM M CRTSRVPGM |nOD MODULE N}O,;Jm5 *ALL r  
generic*#  
v g{S?~ BLDOPT QDFT P9CK`v`kw|n,RK?~Q|D,b+<B  
XB9(T09C BLDOPT QDFT ?~PDNN|n9(DyP?~#v1*|D  
BLDPART |ny9CD1!`kw|n1,E9C?~ BLDOPT QDFT#zI\k  
9C BLDOPT compiler-name#  
144 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
v Z&m BLDOPT ?~1,}GZ BLDOPT ?~PDNNX=R=_Pkd?~`  
M`,DjED|n,qr BLDPART |naT|}Z&mD?~D`MKP|R=  
DZ;u|n#}g,1&m BLDOPT ?~49( CSRC ?~1,BLDPART |  
nKP|R=DZ;u CRTBNDC r CRTCMOD |n#g{ CRTBNDC M  
CRTCMOD |n<R;=,r+1!D`k|n CRTCMOD CZ`M* CSRC D  
?~#  
BLDPART |n;9C`M* BLDOPT,F* QDFT,r_P1!`kw|nD{F,  
rk3?~,{D?~#}g,g{4(?~ BLDOPT MASTER,"Rn?cNa9  
P;P{* MASTER D4?~,r@6;a9CK9(!n?~#  
g{}Z9(`M* MENU D?~,r BLDPART |nZ9(!n?~PQw  
CRTMNU |n#Xk+C?~(e* CRTMNU TYPE(*UIM)#  
n?cNa9PP`v9(!n?~  
<53PT>Dn?cNa9xP=v`M* RPGSRC D?~M}v`M* BLDOPT D  
?~#?v4?~<Pkd`X*D9(!n?~#}KX(Z?~D9(!n?~  
.b,P;v{* QDFT D1!9(!n?~#  
MASTER  
MASTER  
RPGSRC BIWKLY  
RPGSRC MNTHLY  
BLDOPT QDFT  
MASTER  
TEST  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
RPGSRC BIWKLY  
BLDOPT BIWKLY  
RPGSRC MNTHLY  
BLDOPT QDFT  
< 53. xP`M* BLDOPT D?~D Payroll n?  
n?\m1Z?viP9CTB BLDPART |n#  
BLDPART PRJ(PAYROLL)GRP( group-name)TYPE(RPGSRC)PART(*ALL)  
m13j6C4&m=v RPGSRC ?~D9(!n?~#  
m 13. C4&m=v RPGSRC ?~D9(!n?~  
i
?~  
9CD BLDOPT ?~  
MASTER  
RPGSRC BIWKLY  
PAYROLL MASTER BLDOPT QDFT  
Z11B 9(&CLr 145  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
m 13. C4&m=v RPGSRC ?~D9(!n?~ (x)  
i
?~  
9CD BLDOPT ?~  
MASTER  
TEST  
RPGSRC MNTHLY  
RPGSRC BIWKLY  
RPGSRC MNTHLY  
RPGSRC BIWKLY  
RPGSRC MNTHLY  
RPGSRC BIWKLY  
RPGSRC MNTHLY  
PAYROLL MASTER BLDOPT QDFT  
PAYROLL MASTER BLDOPT QDFT  
PAYROLL MASTER BLDOPT QDFT  
PAYROLL DEVELOPER1 BLDOPT BIWKLY  
PAYROLL MASTER BLDOPT QDFT  
PAYROLL DEVELOPER2 BLDOPT QDFT  
PAYROLL DEVELOPER2 BLDOPT QDFT  
TEST  
DEVELOPER1  
DEVELOPER1  
DEVELOPER2  
DEVELOPER2  
"b,Z?v`M* BLDOPT D?~P,PXgN&m CRTRPGPGM |nDf6a  
Py;,#Qw76TzZdP4P9(Di*<#g{ZGoR=k}Z9(D?  
~`%dD`M* BLDOPT D?~,r9CGv BLDOPT ?~#  
*7#wv*"iD;BT,n?\m1ITZ?v*"iP4(;vxPa}k  
*NONE D BLDOPT QDFT ?~#,y,ITC BLDOPT QDFT D;,f>$tZ  
TEST M MASTER iP,T7#wvbTrwX6pPD9(Yw;B#<54a)K  
KYwD>}#  
MASTER  
MASTER  
RPGSRC BIWKLY  
RPGSRC MNTHLY  
BLDOPT QDFT  
MASTER  
TEST  
BLDOPT QDFT  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
RPGSRC BIWKLY  
BLDOPT BIWKLY  
RPGSRC MNTHLY  
BLDOPT QDFT  
< 54. xP`M* BLDOPT D?~D Payroll n?  
ZK<P,2P}vf>D BLDOPT QDFT ?~,?;v<8>Zn?cNa9PD  
?v6pyXhD&mE"#  
g{*"_h*|D&mE",{r}&4(;vX(Z?~D BLDOPT ?~r|D  
{r}D QDFT 9(!n?~1>#;&+Q|DD QDFT ?~r part-name BLDOPT  
?~a}A TEST i#  
146 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
CZomM_-D~DXb9(!n|n  
(}9C04(_-D~1(CRTLF) M04(omD~1(CRTPF) |n,r(}0mS  
_-D~I11(ADDLFM) M0mSomD~I11(ADDPFM) |n,ITromM  
_-D~mS;vr`vI1#9(}LZ BLDOPT ?~PQwb)|n,"ZI&  
X`komr_-D~sKP ADDPFM r ADDLFM |n#}g,*C9(}L4(  
xP}vI1DomD~(b}vI1r%X{* A"B M C),rIT4( BLDOPT  
?~4|,BP|n:  
CRTPF FILE(&O/&ZE)SRCMBR(&ZN)MBR(A)MAXMBRS(3)ADDPFM FILE(&O/&ZE)MBR(B)  
ADDPFM FILE(&O/&ZE)MBR(C)  
2PeVI\D=(4Z BLDOPT ?~P(eb)0l BLDOPT ?~D&m==D  
|n,ggN&m`M* BLDOPT D?~yv#TBPmhv8( CRTPF M  
ADDPFM |nD=(#T`,D==8( CRTLF M ADDLFM |n:  
1. ;Z BLDOPT ?~P(e ADDPFM |n#;Z BLDOPT ?~P(e CRTPF |  
n#  
9C CRTPF |nD1!`k!n#  
2. ;(e ADDPFM |n#(e CRTPF |n#  
;9C CRTPF |n#  
3. (e;vr`v ADDPFM |n#;(e CRTPF |n#  
9(}L9C CRTPF |nD1!`k!n,"Rg{?~`kI&,rZ4P  
CRTPF |ns4P ADDPFM |n#  
4. (e;vr`v ADDPFM |n#(e CRTPF |n#  
9(}L9C CRTPF |n,"Rg{?~`kI&,rZ4P CRTPF |ns4  
P ADDPFM |n#g{ CRTPF M ADDPFM |n<Q(e,r|GXkfZZ  
,;v BLDOPT ?~P#  
5. +|n(e*xPjE DDSSRC#  
8( OVRDBF M DLTOVR |n  
Z BLDOPT ?~P,IT8(*Z9(}LZd"vD;vr`v02G}]bD~1  
(OVRDBF) |nM;vr`v0>}2G1(DLTOVR) |n#b)|nJmzhCX(  
73rZ`k?~.0M.s4PX(&\#  
zkC BLDPART |nKPD OVRDBF M DLTOVR |nXkk`k|nZ,;v  
BLDOPT ?~P#Z`k4?~.0,a"4KP?~PDyP OVRDBF |n,"Z  
`k4?~.s"4KPyP DLTOVR |n#DLTOVR |nZKP ADDPFM M  
ADDLFM |n.0KP(g{8(K ADDPFM M ADDLFM D0)#  
DLTOVR |nC4XU OVRDBF |n#g{|n;%d,rd{?~D9(I\a\  
=0l#  
b)|nIT|,f;d?#9(}LZKP|n.0bvd?#N<=<D. f;d?  
Tq!f;d?DPm#  
g{NN OVRDBF |n'\,r;KPd`P4KPD OVRDBF |n#C?~;O  
*Q'\#^[GqPNN OVRDBF |n'\r4?~Gq`k'\,<aKP  
DLTOVR |n#  
Z11B 9(&CLr 147  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
CZX(?~`MDXb9(&m  
BPwZhvPX9C?~Pm?~49(omM_-D~"MODULE"MENU M DB2  
OS/400 f?~DXb"bBn#  
9C?~Pm?~9(?~  
Z+?~Pm?~k BLDPART |ndO9C1,TgB==&mC?~Pm?~:  
1. 9C BLDPART |nO8(DQw764QwC?~Pm?~#  
2. y]zZ SCOPE N}O8(D549(CPmPD?v?~MNNd{?~#g{  
R;=C?~Pm?~,r BLDPART |n'\#  
9(omM_-D~  
1z9(_-D~1,C_-D~yyZDomD~XkfZZ,;iP#g{Co  
mD~;Z,;iPxZQw76P,r BLDPART |naZ`kC_-D~.0+C  
omD~4F=9(dviP#g{ComD~;ZQw76P,r^(9(_-D  
~#  
1*9(omD~1,`X*D_-D~XkZ9(6'P,qr;a9(ComD  
~#  
ZwC`kw.0,BLDPART |nT/>}omr_-D~DTs#g{`k4\X  
B4(Ts,r9a>}dv?~#  
#fomD~}]  
g{04(n?1(CRTPRJ) |nOD SAVDTA N}hC* *YES,rZXB4(o  
mD~.0,a#fdPD}]#Z`kjI.s,^[`kI&kq,<a5Xb  
)}]#b7#49omD~D`k4\I&XjI,2;a*'}]#  
g{;\+}]4FXD~P,z2ITR=T0|,ZomD~PD}]"+d4  
FXomD~P#ITZdviPD{* QDTAxxxxxx(dP,xxxxxx ;f;*;.  
}V)D?~PR=omD~PD}]#z&1+ QDTAxxxxxx *FILE 4FXCom  
D~?~P"XB9(ComD~?~#QDTAxxxxxx ?~DD>hvVN|,T0#  
fDomD~D?~{#  
`M* MODULE D?~M9(}L  
v19( MODULE ?~I&,RkC MODULE ?~,{D BLDOPT ?~|,  
CRTPGM |n1,9(}LEa4P CRTPGM |n#BINDSTEP N}O8(D5X  
kG *YES#  
g{}Z9(;v#i,rXk*Pk#i?~,{D BLDOPT ?~,RXk8(  
BINDSTEP(*YES),r9C CRTBNDxxx(dP,xxx GoT,g C"CL"CBL M  
RPG)#*+8v#is(Z;p,XkfZkw*kZc#iD#i?~,{D,|  
, CRTPGM D BLDOPT ?~#  
g{}Z+8v?~;ps(= PGM r SRVPGM P,rP8V;,D=(I}C#  
i:  
1. Z BLDOPT ?~PD CRTPGM r CRTSRVPGM |nD MODULE N}O8(  
#i#  
148 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
2. }C|,;}C#iD~qLr(`M* SRVPGM D?~)#  
3. (}`M* BNDDIR Ds(?<?~}C#i#  
g{*9( PGM k MODULE ?~.dDX5,r(iz9COfa=D=( 1 M  
2#b)=(a)K}7D9(X5E","R,g{NN#i"zK|D,aXB9  
( PGM r SRVPGM#  
TZ~qLr:  
1. 4(k~qLrM BLDOPT ?~,{Ds(4 (BNDSRC) ?~#IT9C  
RTVBNDSRC |n4zIs(LroT,;s+K4<k= ADM n?P#  
2. !{ BLDOPT ?~PT CRTSRVPGM |nD"M#&+ CRTSRVPGM |nD<  
vN}hC* *SRCFILE(1!5)#  
g{9C BINDSTEP(*YES) I&X`kK ILE ?~,ra4(`M* MODULE M  
PGM D?~#VZ,g{z|D BLDOPT ?~T|D MODULE ?~D{F"XB  
9( ILE 4?~,ra4(;vBD`M* MODULE D?~#-<D MODULE ?  
~;O*GB"DTs,+;>}#"b,*+BD MODULE ?~9(= PGM P,  
Xk*Pk|, CRTPGM |nDB MODULE ?~,{D BLDOPT ?~#  
`M* CSRC"CINC M PGM RoT* C M SQLC D?~M9  
(}L  
9(?~;a9(`M* CSRC"CINC M PGM "xP C M SQLC oTD?~#  
*K#V}]j{T,;a+b)?~T/*;*oT CLE r SQLCLE#*K+oT  
|D* CLE r SQLCLE,zIT9C CHGPARTINF |n#  
`M* MENU D?~M9(}L  
1z9C CRTMNU |n9(`M* PNLSRC(oT* MENU)D?~1,a4(`  
M* MENU D?~#g{z9C9(!n?~,rXk7#||, CRTMNU |n,  
R CRTMNU |nOD TYPE N}|,5 *UIM#  
DB2 OS/400 f?~M9(}L  
DB2 OS/400 f?~G4?~,|G|, DB2 OS/400 fod"_P DB2 oTtT;  
}g,_PoTtT SQLRPG D RPGSRC ?~#BP4?~_P SQL oTtT:  
m 14. &CLr*"\mw4`MMoT  
4`M  
oT  
CBLINC"CBLSRC  
CBLLEINC"CBLLESRC  
CINC"CSRC  
SQLCBL  
SQLCBLLE  
SQLC¹"SQLCLE  
SQLRPG  
RPGINC"RPGSRC  
RPGLEINC"RPGLESRC  
"b:  
SQLRPGLE  
1. xP SQLC oTD`M* CSRC M CINC D4?~G;I9(D#  
Z11B 9(&CLr 149  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
CRTSQLRPG"CRTSQLCBL"CRTSQLCI"CRTSQLRPGI M CRTSQLCBLI |nD  
OPTIONS N}IThC* *GEN(1!5)r *NOGEN#0&CLr*"\mw1&  
\?~;'V *GEN !n#1z8( *GEN 1,+4( DB2 OS/400 fY14D~  
I 1 , $ & m w a w C  
CRTRPGPGM"CRTCBLPGM"CRTBNDC"CRTCMOD"CRTBNDRPG"CRTRPGMOD"CRTBNDCBL"  
CRTCBLMOD M CRTSRVPGM |n44(Lr#  
g{3v DB2 OS/400 fY14D~I1Gw*9C *NOGEN !nDa{x4(D(  
;Ts,r9(}La<G9(?~(g{C?~D`kI&D0)#g{z9C DB2  
OS/400 fod}CD~,r BLDPART |n;\T/X9(b)D~,bGr* DB2  
OS/400 foT;h*b)D~M\I&XT4zkxP$&m#  
g{3v DB2 OS/400 f|,?~}CD~,r9CC|,?~D4?~2IT}CC  
D~#ZbVivB,cfZSC|,?~=CD~T0S4?~=CD~Db?}  
CX5#  
T?;v}Z`kD?~T>D{"  
>Z5wZKP BLDPART |n1,,;{"*NaT>`N#v1;GTz&m==  
KPC|n1,EaT>b){"#  
pvX9(?~,1=9(jyP?~*9#A;;OX|B,T>k}Z`kD?  
v?~`T&D{"#;){"D>}G:  
}Z`k CSRC BIWKLY...  
}Zs( BIWKLY...  
19(}LS`kwKb=B?~X51,|I\Xk*rszYT9(`XT"Y  
NXB`k?~#rK,,;{"I\aT>`N#1;v?~|D*f0=gHZ  
9(}LP4f0Dm;?~1,XkxPrszY#  
9(y>&CLr  
>Zhv;5PCZm15PD{* SAMPLE Di9&CLrD9(Ma}|n#  
m 15. SAMPLE &CLrD?~  
i
?~  
?~`M  
DDSSRC  
DDSSRC  
DDSSRC  
DDSSRC  
DDSSRC  
DDSSRC  
DDSSRC  
MSGF  
MASTER  
MASTER  
MASTER  
MASTER  
MASTER  
MASTER  
MASTER  
MASTER  
TEST  
REFMST  
CTLFIL  
EMPMST  
RSNMST  
TRWEEK  
TRWEEKL  
PRG06RP  
MSGS  
PRG03FM  
PROC3  
DDSSRC  
CLPSRC  
RPGSRC  
RPGINC  
TEST  
TEST  
PRG03  
TEST  
PRG03A  
150 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
&CLrD?~$tZiP,g<55yv#  
MASTER  
MASTER  
DDSSRC REFMST  
DDSSRC CTLFIL  
DDSSRC EMPMST  
DDSSRC RSNMST  
DDSSRC TRWEEK  
DDSSRC TRWEEKL  
DDSSRC PRG06RP  
MSGF MSGS  
MASTER  
SYSTEST  
MASTER  
TEST  
DDSSRC PRG03FM  
CLPSRC PROC3  
RPGSRC PRG03  
RPGINC PRG03A  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
< 55. y>&CLrPD?~  
B}j6a}M9(y>&CLrPD?~h*4PD=h:  
1. +yP?~S TEST ia}A SYSTEST i#  
2. Zi SYSTEST P9(yP`MDyP?~#  
BLDPART PRJ(SAMPLE)GRP(SYSTEST)TYPE(*ALL)PART(*ALL)  
K9(|n9C}#9(6'Tu~9(==&m SYSTEST PDyP?~,";  
?F&m10?~#  
3. liKw5DYQzAdvSPD9((f"7#&m?~1;Pvm#g{"  
zKms,r&(*TC?~:pD*"_"ks{G#}PmsD?~#I9  
C0r!n?G<1(PRTPRJLOG) |n47(ON|DC?~DK1#PXgN9  
YN9(C?~,"i$|DGqpwC#  
4. KP&CLr,Ti4wv?~Gq\;s$ZDGyOw#PXgN4PKY  
wDji,N{Z12B bTMKP&CLr#  
5. li9((f,T7#&m?~1;Pvm#  
Z11B 9(&CLr 151  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
6. KP&CLr,Ti$wv?~Gq\;s$ZDGyOw#  
7. +yP?~a}Ai MASTER#  
PRMPART PRJ(SAMPLE)GRP(SYSTEST)TYPE(*ALL)PART(*ALL)  
8. Zi MASTER P9(yP?~#  
BLDPART PRJ(SAMPLE)GRP(MASTER)TYPE(*ALL)PART(*ALL)  
9. li9((f,T7#&m?~1;Pvm#  
10. KP&CLr,"i$|Gq\;s$ZDGy$w#g{GD0,rVZQ-  
\;+C&CLr<vAzz73K#PXgN4PKYwDji,N{Z13B <  
v&CLr#  
9(}LMC'(e`M  
g{zQ-4(ikBP=v`p.;PDC'(e`M,z+k*Kb9(}Lg  
N&mB`MD?~:  
1. w*dO;'V0&CLr*"\mw1&\?~D`kw9CD4I1DC'(  
e`M#  
2. 4w* OS/400 Tsr4D~I1f""Z&m1zI;vr`v4D~I1D?~  
DC'(e`M#  
>Zhv:  
v *7#9(}LKb?~X5,zh*4PD)Yw  
v 9(4f"ZTsrI1PD?~  
v 9(f"Z4D~I1PD?~  
v gN+9(!n?~kz(eDB?~`MdO9C  
7#9(}LKb?~.dDX5  
*C`kw'V0&CLr*"\mw1&\?~,r_,g{z*`kw(eDB  
?~`MZzKP BLDPART |n1zITsr4D~I1,r`kwh*Z  
BLDPART |nO8(DdviDbP4(TsrI1#(ITZ ADDADMLANG |  
nD BLDCMD N}O8( &L f;d?T+K5+MA`kw#)Xk9C System  
API Programming PhvDBP&CLr`LSZ (API):  
v q!Ud4, (QLYGETS)  
v A!9(E" (QLYRDBI)  
v hCUd4, (QLYSETS)  
v `49(E" (QLYWRTBI)  
b)API\90&CLr*"\mw1&\?~Kb?~.dDX5,Tc BLDPART  
|nIT}7X("b)X5#  
9(4f"ZTsrI1PD?~  
1z9C ADDADMTYPE |nmSC'(e`M1,I(e*+B`MD?~w*  
SYSTYPE(*NONE) f"DTs`M#bm>B`MD?~;f"Z0&CLr*"\  
mw1n?PD OS/400 Tsr4D~I1P#1 BLDPART |nKP1,aWH&  
m4f"Z OS/400 TsrI1PD?~#b)?~DdvG4D~I1#g{IT9  
(|G,r BLDPART |naZ&mj4f"Z OS/400 TsrI1PD?~.s&  
m|G#  
152 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
9(}L4(D4D~I1?~D`MMoTI0&CLr*"\mwAPI1PDx(  
|n8(#  
"
BLDPART ;>}B"I1#*5w,Y( BLDPART 9(K;v4f"ZTs  
rI1PD?~,"R9(dvGI1#g{YNwC BLDPART T9(,;?  
~,x9(dvGm;vI1,r-<9(dvd*B"I1#BLDPART ;a}  
%KB"I1#  
9(f"Z4D~I1PD?~  
9(}LQwT53a)D`M(g MSGF)Db?}C#;x,|;aQwm>Ts  
`M(g *MSGF)DC'(e`M#g{Tb?==}CDTs;G53a)D?~`  
M,rzI\aZ9((fPSU=;u/f{"#  
g{(eK*+C'(e`MD?~w* SYSTYPE(*MBR) f"DTs`M,bm>  
?~f"Z OS/400 4D~I1P#g{b)?~G4?~,r|GI BLDPART |  
n9(,"R;\zI *PGM Ts#g{b)?~G|,?~,r;9(|G,bGr  
*;\T|G(e9(|n#  
g{4(D *PGM Ts;_PZ393Dm2PP>DdP;V`XoT,rh**  
*PGM TsmSB`M,"*C`MmSBoT#  
": g{LrTsITP=vr`vkd`X*D?~,rZ~vTsI\a2GZ  
;vTs#  
+9(!n?~kC'(e`MdO9C  
1 BLDPART |n9(_PC'(e`MD?~1,9(}L4TBNrLQwCZ9  
(?~D|n:  
1. Z9(!n?~PQwTZ ADDADMLANG |nD BLDCMD N}OdkDZ;  
vV{.GE*7D|n#  
2. g{Z9(!n?~PR=`%dD|n,r9CC|n49(?~#(9(!n  
?~PD|nV{.|,DN}IT`ZzZ ADDADMLANG |nD BLDCMD N  
}O8(D|nV{.y|,DN}#)  
3. g{R;=`%dD|n,r9CzZ ADDADMLANG |nO8(D|nV{.  
9(C?~#  
>}  
BP|nTOv5wxP5w#Y(zZ ADDADMLANG |nD BLDCMD N}O8  
(KBP5#  
BLDCMD('CRTPASPGM PGM(&L/&ZN)SRCFILE(&L/&F)SRCMBR(&ZN)')  
;x,Z9(!n?~PR=TB|nV{.#  
CRTPASPGM PGM(&L/&ZN)SRCFILE(&L/&F)SRCMBR(&ZN)  
program')  
TEXT('A sample Pascal  
Z11B 9(&CLr 153  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
+9CZ9(!n?~PR=D|nV{.,bGr*|T ADDLANG |nD  
BLDCMD N}O8(DV{.*7#  
(FD|,D~M BLDPART |n  
g{}Z9C(FD|,4D~R;kZ9(Zd*b)D~#f9(E"(X  
5),rIT+|G#fZG){FT Qr #*7D53bP#9(C?~1,;  
a#fbyD|,D~T0|,|GDNN?~D|,X5#}g,g{|,D~$  
tZ QGPL P,r;a#fkC|,D~DX5#  
154 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z12B bTMKP&CLr  
>BhvgN:  
v TbT_DGH4(n?cNa9  
v Z0&CLr*"\mw1&\?~PbT&CLr  
*KxPbTxrbPmmSn?b  
ZxPbT.sSbPmP}%n?b  
g{;\Z0&CLr*"\mw1&\?~PbT&CLr,rIT+C&CLr  
rdi~<vAb#PXgNZ0&CLr*"\mw1&\?~DXF6'.bb  
TbT_(exPiDn?cNa9  
&CLrbT_G;vK,dw*DG+GKP&CLr"i$|D}7T#zDi  
/I\P(Eg]KG+DvK,2ITI&CLr*"_Z&CLr*"\ZPD  
X(c4PbT_Dn/#  
(#,bT_;4P?~*"n/#(#ZhbT_Tn?cNa9DACJ(,r  
8(x_P|BCJ(D*"i#BfVphvKb=Viv#  
_PACJ(DbT_  
ZhbT_T{vn?cNa9DACJ(,+;ZhTNNiD|BCJ(#TB  
|nZhbT_Tn? PAYROLL D(^#  
ADDPRJUSR PRJ(PAYROLL)USRPRF(JONES)USRTYPE(*DEVELOPER)ACCESS(*READ)  
ZbVivB,g{&CLrZKP1*|BD~,rbT_XkZn?cNa9b  
$wE\|BD~rTs#TZ*Z0&CLr*"\mw1XF6'.bbTD&  
CLr,Xk+d<v#PXgN4PKYwDji,N{Z1613D:<v&CLr  
_P|BCJ(DbT_  
ZhbT_T{vn?cNa9DACJ(,"rda);v*"i4ZdP$w#  
bT_D*"i&Ck*"_D*"iPyxp,4bT_;&C\;a}?~#B  
P|nZn? PAYROLL P4(i TESTER1,"+ JONES GGABDbTi#  
CRTGRP PRJ(PAYROLL)GRP(TESTER1)SHORTGRP(TST1)PARENT(TEST)PRMCODE(*NONE)  
CCSID(*PARENT)TEXT('JONES DEVELOPMENT GROUP - TESTER1')  
ADDPRJUSR PRJ(PAYROLL)USRPRF(JONES)USRTYPE(*DEVELOPER)  
ACCESS(*UPDATE)DEVELOPGRP(TESTER1)  
i TESTER1 G9Ca}k *NONE 4(D,bb6E;\+dPD?~a}Am;v  
i#;x,JONES ITlv?~"|D?~"4F?~M9Ca}k *NONE 4(B  
?~,"ITSKiP9(&CLr#  
(#,bT_a4(4PbT1&CLr|ByhDD~#(#,;4("4Fr|  
D|,_6oT`LodD?~#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
155  
 
<56PDn?cNa95w(exPbT_D*"iDn?cNa9D;V=(#  
MASTER  
MASTER  
MASTER  
TEST  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
NONE  
TESTER1  
< 56. _PbT_iD Payroll n?  
bT_\;bTIZi DEVELOPER1 M DEVELOPER2 P$wD*"_a}Ai  
TEST D?~#  
"b,4(D"C4Zi TESTER1 PbT&CLrD}]D~TZ,1}ZxPD?  
~*"n/xT&CGnBD#g{Zi DEVELOPER1 P$wD*"_|DK?~P  
DG<q=,;s+?~a}Ai TEST,rI\a"zms#9Xk|B4(DCZ  
bTKG<q=D}]D~#  
*\bngOv.`Div,\m1IT4(;vVWNxP?~*"n/Dn?c  
Na9,"rbT_a);v|H(D&CLrf>4){G9C#Z1573D<57T  
>KbyDn?cNa9#  
156 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
MASTER  
MASTER  
MASTER  
SYSTEST  
MASTER  
TEST  
MASTER  
TESTER1  
NONE  
TESTER2  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
< 57. _PbTWND Payroll n?  
ZKn?cNa9P,bT_Zn?cNa9PDO_c$w#Xk+?~S*"i  
a}Ai TEST#;s,\m1+?~a}Ai SYSTEST,"ZCiP9(?~#b  
y,MITZ;BD&CLrf>P4PbT#  
Zn?cNa9PbT?~r&CLr  
*9C0&CLr*"\mw1&\?~I&XbT?~r&CLr,Xky]?~  
r&CLrZzz73PD$w==hCy>bPm#i4Z993D:i0dkbP  
mDX5;,Tq!igNkbPm`T&D5w#  
}G*bT?~r&CLr,qr,z;h*9CbPm#*K,zh*9C0mS  
n?bPm1(ADDPRJLIBL) |n4mSyPm>8rbPmDC'?VDQw76D  
n?b#  
+n?bmSAbPm  
9C0mSn?bPm1(ADDPRJLIBL) |n4+n?DQw76DyPn?bmSA  
bPm#k|nO8>DQw76`X*DyPb<;mSAbPmDC'?V#*  
"_M\m1<IT9CK|n#  
XkZ PRJ N}O8(n?{#9XkZ GRP N}O8(i{#  
Z12B bTMKP&CLr 157  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
SCAN N}1!*9Cn?cNa9(eDQw76iR SCHPTH ?~#K|nS  
GRP N}O8(Di*<,3E1!Qw76QwAyi#g{z!q SCAN(*NO),  
r ADDPRJLIBL |n;* GRP N}O8(DimSb#  
SCHPTH N}1!* *DFT#g{1!Qw76PfZ;v{* SCHPTH QDFT D?  
~,r9CC?~#g{ SCHPTH QDFT ;fZ,r9C1!Qw7647(*mS  
AbPmDn?b#z9ITZ SCHPTH N}O8(X(Qw76?~D{F#}g,  
IT4("9C{* COMMON D SCHPTH ?~48>*mSm>8rbPmD;f  
n?Qw76Dn?b#  
g{Z SCHPTH N}OdkQw76?~D{F,+8( SCAN(*NO),rQw76?  
~{;vT#  
>}  
<GZ1573D<57P5wDn?cNa9#TB ADDPRJLIBL |nT?~ SCHPTH  
QDFT P(eDQw76mSn?b#  
9C ADDPRJLIBL |n  
ADDPRJLIBL PRJ(PAYROLL)GRP(TESTER1)SCAN(*YES)SCHPTH(*DFT)  
9C0`L*"\mw15CLr  
Z0C PDM 49Ci1A;P!q!n 45(mSn?bPm)r9CC'(e!n  
AP#  
?~ SCHPTH QDFT |,BPn?MiDiO:  
PAYROLL TESTER1  
PAYROLL TEST  
PAYROLL SYSTEST  
PAYROLL MASTER  
bPm|D*|(m> SCHPTH QDFT ?~P(eDiDn?b,<58hvKBDb  
Pm#  
< 58. BDbPm  
1z9C ADDPRJLIBL |n1,;|DbPmD53?V#C'?V|D*|(0&  
CLr*"\mw1n?b#10b(g{QhCD0)TG10b#;}%QmS  
AbPmDd{b#;x,+n?bmSAKPmD%?#N<B;y<,Ti4Z  
KP ADDPRJLIBL |n.0M.sbPmDb[D>}#  
158 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
< 59. ZKP ADDPRJLIBL |n.0M.sDbPm  
ZK<P,10bG MYLIB#Zdk ADDPRJLIBL |n.s,|TG10b#b  
TESTR1 M PRODV1 ;FAbPmDW?#  
1zh*bT0&CLr*"\mw1&\?~;'VDTs`M1,ADDPRJLIBL |  
nG#PC#}g,Z<59P,TESTR1 bPfZ;\'VDTs`M#1z9(rK  
P?~1,?~h*CJCTs#ADDPRJLIBL |n+n?bmSAbPm,"+C'  
?VPDbFAPmW?#1z9(rKP?~1,Z TESTR1 bPR=CTs#  
mSn?bPm&\9aw*0!n 451(mSn?bPm)vVZ0C PDM 49  
C?~1A;O,rw*53a)DC'(e!n AP#PXji,N{Z2083D:m  
+b?bmSAbPm  
I9C0mSn?bPm1(ADDPRJLIBL) |n(}|B SCHPTH QDFT +;vr`  
vb?bmSAbPm,gBy>#*K,Xk8(|,b?bD{FDQw76?  
~#  
ZBfD>}P,+Qb?bmSAbPm#Qw76?~|,BPE":  
PAYROLL TESTER1  
PAYROLL TEST  
PAYROLL SYSTEST  
PAYROLL MASTER  
*USRLIB SOFTLIB1  
*USRLIB SOFTLIB2  
1zTKQw76?~9C ADDPRJLIBL |n1,;a|DbPmDC'?V#  
< 60. ZKP ADDPRJLIBL |n.0M.sDbPm#  
Z12B bTMKP&CLr 159  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z1593D<60T>Z"v ADDPRJLIBL |n.s,SOFTLIB1 M SOFTLIB2 b;m  
SAbPmDC'?V#|;mSA0&CLr*"\mw1n?.s,T7#9(  
HZ0&CLr*"\mw1n?PQwTs,;sYQwC'b#  
SbPmP}%n?b  
9C0}%n?bPm1(RMVPRJLIBL) |n4}%yPQ9CADDPRJLIBL |nm  
SAbPmDn?b#  
RMVPRJLIBL |nO;PNNN}#;h*dkK|nD{FcISbPmP}%yP  
n?b#r* RMVPRJLIBL |nO;PNNN},yT;a}%b?b(b)bI\  
GI ADDPRJLIBL |nmSD)#  
2ITSBPA;P9C}%n?bPm&\:  
v Z0C PDM 49Ci1A;P,w*&\|0F20=}%n?bPm1  
v Z0C PDM 49C?~1A;P,w*!n 45  
160 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z13B <v&CLr  
K&\?~(} EXPPART |na)<v&\#1z<v1,&CLrD;vr`v?  
~+S0&CLr*"\mw1n?cNa94F=x(bP#  
": ;*{vn?$tZ,;8CQw76P,MI+0&CLr*"\mw1n?  
bMi5bFA8CQw76#  
I<v&CLrD%v?~r{vf>#(#,*KX|DbT?D,*"_+<v  
&CLrD?~ri~,x\m1r!i$*KX|DbT?D<v{v&CLr,  
r+{v&CLr4F*z7#  
>Bhv:  
v *xPbTx<v&CLr  
v 9C0<v?~1(EXPPART) |n  
v <v&CLrsxPb0  
mb,9C EXPPART |n4+?~<vAz7br*KxPbT,2I9C|4+?  
~4FAzF.C4Zm;53OxPV4Db#PXgN9C EXPPART M  
IMPPART |n44PKYwDji,N{Z1803D:+E"4FAm;v AS/400 5  
z&C(;)1d4DA ADTS/400: Application Development Manager Introduction and  
Planning Guide PP>ZFAzz73.0h*<GDBnDBZ#  
<v&CLrTT|xPbT  
TZ&CLr45,g{vVBPNN;Viv,rI\Xk+|r|Di~<vA  
bTbTT|xPbT:  
v g{&CLrXk2GD~#  
v g{h*bT3vC'GqTD~"|nrLr_PJ1DCJ(#  
v g{&CLrh*U>G<rg{}Zb=8]}L#(U>MU>SU=G0&C  
Lr*"\mw1&\?~;1S'VD OS/400 Ts#)  
v g{&CLrD?~h*(;DbPm,rg{||DbPm,rI\h*Zn?  
cNa9.bbT#}g,g{|9C8(z7bD|n,r;\ZKz7ZbT  
|#Xk<v|#  
v g{&m1,&CLr+w5a;Az&mS53,rISw5hvx;GSn?  
cNa9PC=b)w5DbPm#  
9C<v?~|n  
": ;fn?53Pm(|,$tZ`vn?PD?~)XkC CROSSPRJ(*YES) M  
SCAN(*YES) N}<v#xR,53PmMQw76XkfZZ EXPPART |n8  
(Dn?P#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
161  
 
9C0<v?~1(EXPPART) |n4+&CLrD?~ri~S0&CLr*"\m  
w1i4FAb#1z<v?~1,+ZbP4(C?~D1>#9C10(^49  
CK|n#EXPPART |n;aZhz=S(^#  
Zz<vADbP,y]?~`M+?~4F*4D~I1rTs#}g,1}Z<  
v`M* RPGSRC D?~1,g{bP;fZ4omD~,r+4(|,,19+4  
(C4omD~ZDI1#g{4omD~QfZ,r+I1mSAdP#;f;4  
D~#g{om}]D~QfZZbP,r;\f;|#If;QfZZbPDI1  
Md{Ts#  
TZ IMPPART |n,1z<vE"1,zh*8(4M?jj<#4j<8>*Sn  
?cNa9P4F24E"#?jj<8>z*+0&CLr*"\mw1E"4F  
AN&#  
9C EXPPART |n4<vX(oTD?~#1!5G LANG(*ALL)#  
EXPPART |nD CHGDATE N}Jmz;<vTX(UZ.s|DD?~#  
CHGDATE(*BEGIN) G1!5,+<vyP?~,;\|Gns|DDUZgN#g{  
*<vql|DDyP?~,8( CHGDATE(*CURRENT)#  
2I9C CROSSPRJ N}<v;fn??~#g{8(K SCAN(*NO) rg{;fn  
?iZQw76P,rvTKN}#PXji,N{Z1013D:4(;fn?Qw7  
6;#*K\;S;fn?P<v?~,zAYh*TC;fn?_P *READ n?C  
J6p#  
*<vD?~  
XkZ EXPPART |nP8(n?"i"`MM?~{#TZ TYPE M PART N},  
a)K;)Xb5#PX EXPPART |nJmD?~`MDPm,N{Z2273D:=  
Z TYPE N}O,IdkX(?~`M#}g,TYPE(RPGSRC) +<v`M* RPGSRC  
D?~#I(}9CXb5 *ALL rI9C`t{48(*<vyP`MD?~#ZZ  
333D:XhN};PhvK`tDC(#zIT9CXb5 *NONSRC 48(*<v  
yP;2+D?~#g{8( TYPE(*NONSRC),r;<vf"ZTsPD?~`M,  
gZ523Dm5PP>DG)`M#;\<vdC'(e`MG9C ADDADMLANG |  
nD SYSTYPE N}D *NONE 5(eD?~#K`MD?~QfZZ0&CLr*  
"\mw1n?b?DbP#  
Z PART N}O,IdkX(?~{#}g,PART(BIWKLY) <v?~ BIWKLY#  
8(Xb5 *ALL T8>*<vyP?~,2I9C`t{F#Z333D:XhN};  
hvK`tD9C#  
>}  
>>}5wgN+yP`MDyP?~S PAYROLL n?PD TEST i<vA10b#  
9C EXPPART |n  
EXPPART PRJ(PAYROLL)GRP(TEST)TYPE(*ALL)PART(*ALL)  
9C0`L*"\mw15CLr  
Z0C PDM 49C?~1A;O!q!n 39(<v)#  
162 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
>}  
TB|n+{* BIWKLY D CSRC ?~S Payroll n?PDi DEVELOPER1 <v  
A10b#  
EXPPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(CSRC)PART(BIWKLY)  
*4(DTsrD~  
IMPPART k EXPPART |n.dD;vnpG,Z<vYwO,?jj<_P1!  
5#zXkZ TOLIB M SRCFILE N}O8>k*fE;<v?~D;C,qr,+  
Q|4FA1!bMD~#g{CbP;fZD~,ra4(;v#  
bD1!5G10b#g{;k9C1!5,kZ TOLIB N}O8>X(b#}g,  
TOLIB(TESTLIB) 9C TESTLIB b4f"yPQ4FD?~#  
bPD~{D1!5IZn?cNa9P|,5J?~D4D~D{F7(#*9C  
1!5,k8( SRCFILE(*FROMFILE)#  
1z9C CRTPART"CPYPART r IMPPART 4(?~1,IT8(4D~{#g{  
;8(4D~{,raZ53a)Dk?~`M`%dD4D~P4(C?~#  
SRCFILE N}JCZ_PZ503Dm4PP>DdP;V?~`MrC'(e`MD?  
~#  
>}  
TB|n4(?~ BIWKLY w*4omD~ QRPGSRC PD4I1#  
CRTPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY)LANG(RPG)  
SRCFILE(*TYPE)  
g{zZ4(?~18(K4D~{,r<vC?~1,aZ,{DD~P4(|#  
>}  
TB|n4(?~ BIWKLY w*4omD~ PAYSRC PD4I1#  
CRTPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(MTHLY)LANG(RPG)  
SRCFILE(PAYSRC)  
Z<v?~ BIWKLY 1,|a4FC?~Tw*10bPD4omD~ PAYSRC P  
D4I1#  
EXPPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(BIWKLY) TOLIB(PAY1)  
SRCFILE(*FROMFILE)  
g{;8(*+?~<v=,{D4D~P,IT8>*9C SRCFILE(*TYPE)#K5  
ZC`MDI53a)D1!4D~P4(C?~,49n?cNa9ZD?~f"  
Z_Pm;{FDD~P`gK#i4Z433Dm3,Tq!1!4D~DPm#2I  
TZ SRCFILE N}OdkX(D4D~{#  
>}  
TB|n+ BIWKLY ?~<vAD~ PAYSRC PD PAY1 b#  
EXPPART PRJ(PAYROLL)GRP(TEST)TYPE(RPGSRC)PART(BIWKLY)TOLIB(PAY1)  
SRCFILE(PAYSRC)  
Z13B <v&CLr 163  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
"b,g{Z8(K REPLACE(*YES) DivB<vQfZZ?jbPD_-D~,"  
RQ+_-D~D;Z0&CLr*"\mw173b?DCJ76GkU>,ra  
Z?jbPXBt/U>G<#  
PX SCAN M SCHPTH N}Dhv,N{Z1033D:gN&mQw76?~;#"  
b,g{`M* SCHPTH D?~j6K;fn?Qw76,2;a<vd{n?PD  
?~#?N;\S;vn?<v#g{zkS2mn?<v?~,rXkdkm;v  
EXPPART |n"8(Cn?#  
f?~;p<v}]  
EXPPART |nJmzZ<v&CLr14Fkom}]D~`X*D}]#DATA N  
}D1!5G;4F}]#g{*4F}],r8( DATA(*YES)#  
g{8(k*Z<vYw14F}],Rom}]D~QfZZw*<v?jDb  
P,r;f;D~#bG*K\bmsXf;z7bPDy>}]rzz}]#  
g{*f;w*<v?jDbPDom}]D~,rh*xPK$ik,bGr*  
EXPPART |n;f;om}]D~#z&`4;v CL Lr,KLr#fomD~D  
zz1>PD}]">}CD~,;swC EXPPART |n4<vComD~#w*n  
UD=h,zD CL Lr&+#fD}]V4ABDomD~#  
g{G*KxPbTx<v,zI\kSn?cNa9P<vbT}]TLxbT#  
g{G<vAz773,s`}ivBz;ak4FbT}]#  
>}  
TB|n+ PAYROLL n?PDyP?~<vAb TESTLIB#9a4Fkom}]D  
~`X*D}]#  
EXPPART PRJ(PAYROLL)GRP(TEST)TYPE(*ALL)PART(*ALL)SCAN(*YES)  
SCHPTH(*DFT)TOLIB(TESTLIB)SRCFILE(*FROMFILE)DATA(*YES)  
REPLACE(*YES)  
<v?~1XhDZ(  
r*TsGZbP4(D,yT<vTsh*X(D(^#zXk_PXhD(^E  
\Z TOLIB N}O8(DbP4(M>}TsM4D~I1#g{CTsr4D~I  
1QfZZ8(DbP,xz8(K REPLACE(*YES),rzXk_PXhD(^E\  
4(M>}CTsr4D~I1#"b,;\f;om}]D~#  
}KTCbT0CbPDTsyXhD(^.b,EXPPART |n9T4(rf;DT  
s8(yP_#yP_I OWNER N}O8(D57(#1!5 *TOOBJ <BC|n  
9Cz}Zf;DTsDyP_#g{4(KCTs,r8(dk EXPPART |nDK  
1w*yP_#  
Z<v4I11,Vf4D~DyP(;a|D#g{ EXPPART |nT/4(KBD  
4D~,rC4D~DyP_+G OWNER N}O8(DyP_#TK4D~DsxI  
1<v;a|DK4D~DyP(#  
g{"T|DVfTsDyP(,rXk_P4PKYwD(^#  
(#,g{G*KxPbTx<v,ra<vAz5PDbTb#ZCbP,z&T  
bMTs_PyPXhD(^,"R&CQ+zT:8(*yP_#  
164 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z+?~r&CLr<vAzz731,{OyP(^hsGG#X*D;c#g{  
zTh*DyPTs;_PJ1D(^,r<vYwI\^(jI#  
>}  
TB|n+ PAYROLL n?PDyP?~<vAbTb TESTLIB#  
EXPPART PRJ(PAYROLL)GRP(TEST)TYPE(*ALL)PART(*ALL)SCAN(*YES)  
SCHPTH(*DFT)TOLIB(TESTLIB)SRCFILE(*FROMFILE)DATA(*YES)  
REPLACE(*YES)OWNER(*TOOBJ)AUT(*TOOBJ)  
Y(bGzZ;N<vK&CLr#zG TESTLIB P4(DTsDyP_#TESTLIB  
PDTsD+2(^GI AUT N}57(D#  
>}  
TB|n+i DEVELOPER1 PDyP RPGSRC ?~<vA TESTLIB#  
EXPPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(RPGSRC)PART(*ALL)SCAN(*YES)  
SCHPTH(*DFT)TOLIB(TESTLIB)SRCFILE(*FROMFILE)DATA(*NO)  
OWNER(*TOOBJ)AUT(*TOOBJ)  
REPLACE(*YES)  
E(X5,EXPPART |n;JmzT0&CLr*"\mw173b?z;_P(^  
D OS/400 Ts4PNNYw#PXTsM(^Dji,N<iSeries Security Reference#  
<v?~Pm?~  
g{}Z<v?~Pm?~,r EXPPART |nJmz8(<v|D==#1!5  
PARTLOPT(*LIST) 8>?~Pm?~PP>D?~MG*<vD?~:;<v?~P  
m?~>m#g{8( PARTLOPT(*PART),r;<v?~Pm?~>m:;<v?~  
Pm?~PP>D?~#g{8( PARTLOPT(*BOTH),r,1<vC?~Pm?~T  
0dPP>D?~#  
EXPPART |n4TBNrQw*<vD?~Pm?~:  
1. 9C EXPPART |nO8(DQw764Qw?~Pm?~#  
2. g{Z EXPPART |nO8(K PARTLOPT(*LIST),ry]zZ GRP"SCAN M  
SCHPTH N}O8(D5Qw"<v?v?~#g{R;=?~Pm?~,r  
EXPPART |n'\#g{8(K PARTLOPT(*PART),rT<vNNd{?~D  
==<v?~Pm?~>m#g{8( PARTLOPT(*BOTH),r,1<vC?~P  
m?~T0dPP>D?~#  
3. g{Z?~Pm?~PR= PRDDFN M PRDLOD ?~,r EXPPART |na4  
P;)nbD&m#PX PRDDFN M PRDLOD ?~DE",N{Z1663D:<  
9C53Pm?~<v  
zIT9C EXPPART |n4+&CLr"&CLr^}r&CLrv?V<r"MA  
;vr`v6L53#  
53Pm?~G?~`M* SYSTEML D?~,||,53X7DPm,(}&mb)  
X7,IT+0&CLr*"\mw1?~"MA;vr`v6L53#g{Z  
SYSTEML N}O8( *NONE,r EXPPART |na+?~<vA,;53OD8(  
b#  
Z13B <v&CLr 165  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
18(53Pm?~{1,EXPPART |na+?~<vA53Pm?~P8(D6L  
53#  
*KbgN+&CLrV<A;vr`v6L53,N{Z1693D:Z14B +&CL  
rV<A6L53;Tq!|j8DE"#  
1 SYSTEML N}O8(K53Pm?~1,g{ QTEMP bPPTs,r9C  
EXPPART |nxPD"MrV"Yw+'\#  
<vMb0&CLr  
0&CLr*"\mw1&\?~a)K=V?~`MT9z\;9C SystemView  
System Manager/400 z7b0&CLr#b=v?~`MF*z7(e (PRDDFN) M  
z70k (PRDLOD)#z7(e|,XZz7D;cE"#z70k|,XZX(z7  
!~0kDE"#  
RGZ{zQ-Kb9C SystemView® System Manager/400 z7b0&CLryf0  
D=h#N{ System Manager Use ;i#  
*Z<vYwZdxPb0,Xk\;Z`M* PARTL D?~PR=`M* PRDLOD  
D?~#g{R=z70k?~,r+?~Pm?~PP>D?~b0*`M*  
PRDLOD D?~P8(D04(z70k1(CRTPRDLOD) |nD0z7j61N}O  
j6Dz7#System Manager Use ;iPhvK CRTPRDLOD |n#  
I+`M* PRDDFN M`M* PRDLOD D?~EZ}Z<vD?~Pm?~P#`  
M* PRDDFN D?~Xk|,P'D04(z7(e1(CRTPRDDFN) |n#`M*  
PRDLOD D?~Xk}CZ`M* PRDDFN D?~P8(D04(z7(e1  
(CRTPRDDFN) |nD0z7j61N}Oj6Dz7#CRTPRDDFN |n2Z System  
Manager Use ;iPwKhv#  
4(z7(eMz70k?~  
*4(z70k?~,k4PBPYw:  
1. 9C CRTPART |n44(C?~#Z TYPE N}O8( PRDLOD#  
2. 9C CHGPART |n+ CRTPRDLOD |n0dyPN}M5mSA PRDLOD ?  
~#(}Z}Z|DD?~PdkK|nD{F"40F4=a>1,IT\]WX  
jIKYw#vVD CRTPRDLOD |nN}Q$Hn4K1!5#  
*4(z7(e?~,k4PBPYw:  
1. 9C CRTPART |n44(C?~#Z TYPE N}O8( PRDDFN#  
2. 9C CHGPART |n+ CRTPRDDFN |n0dyPN}M5mSA PRDDFN ?  
~#(}Z}Z|DD?~Pdk|nD{F"40F4=a>1,IT\]WXj  
IKYw#vVD CRTPRDDFN |nN}Q$Hn4K1!5#  
PX CRTPRDLOD M CRTPRDDFN |nDhv,N{ System Manager Use ;i#  
*i4b)|nDoz,kZ|nPOdk|n,40F4=a>1Ta>C|n,;s  
40F1=oz1#  
166 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
4(?~Pm?~T|,*b0D?~  
zXk4(;v?~Pm?~T|,&CLrPDyP?~DPm(*KI&Xb0  
&CLr,h*|(b)?~)#PXgN4(M9C?~Pm?~D5w,N{Z91  
3D:Z8B ?~Pm?~"-rXFM|DzY;#zXk7#?~Pm?~|,`  
M* PRDLOD D?~#|9IT|,`M* PRDDFN D?~#  
*b0&CLrx<v?~Pm?~  
9C EXPPART |n4<vz4(D|,z70k?~D?~Pm?~#Z EXPPART  
|nD PARTLOPT N}O8( *LIST Tv<vC?~Pm?~PP>D?~#  
EXPPART |nO6=|Q<v|,`M* PRDLOD D?~D?~Pm#|S`M*  
PRDLOD D?~Pi!E""9CCE"ZyPd{Q<vD?~PhCb0E"#g  
{fZ`M* PRDDFN D?~,r|aSC?~Pi!E""9CCE"hCz7(  
eE"#  
": g{?~Pm?~PP>K`v`M* PRDLOD D?~,r EXPPART |na9  
C|R=DZ;vK`MD?~#g{C?~Pm?~;|,`M* PRDDFN M  
PRDLOD D?~,rb0a{G;I$bD#z&14(;v;x PRDDFN M  
PRDLOD ?~D?~Pm?~,T9 EXPPART |nMb0\;I&jI#  
Z<vyP?~.s,g{Z?~Pm?~P"V|,C|nD`M* PRDDFN D?  
~,r EXPPART |naKP CRTPRDDFN |n#49 CRTPRDDFN |nr*  
*PRDDFN TsQfZx'\,EXPPART |nTaI&#  
CRTPRDDFN |nZz7(e?~P8(D CRTPRDDFN |nD0b1N}O8(D  
bP4(`M* *PRDDFN DTs#z&CZ CRTPRDDFN |nD0b1N}O8(  
wz7b#  
g{ CRTPRDDFN |n^',R4(eNNz7,r;4Pb0#EXPPART |nS  
EKP|Zz70k?~P"VD CRTPRDLOD |n#49 CRTPRDLOD |nr*  
*PRDLOD TsQfZx'\,EXPPART |nTaI&#  
CRTPRDLOD |nZz70k?~P8(D CRTPRDLOD |nD0b1N}O8(D  
bP4(`M* *PRDLOD DTs#  
VZ,Z EXPPART |nD TOLIB N}O8(Db|,?~Pm?~PP>DyP?  
~D1>#  
hCb0E"  
EXPPART |n4TB==hCb0E":  
1 . T ? ~ P m ? ~ P P > D ? ; v Q < v T s K P 0 | D z 7 T s h v 1  
(CHGPRDOBJD) |n,T|BTshvPDz7E"#g{}Z<v4D~I1P  
f"D?~,rT4D~KP CHGPRDOBJD |n#  
2. 9Cz70k?~P8(DE"T/KP0b0z7!~1(PKGPRDOPT) |n#K  
|n*8(z7!~b0;vr`vz70k,SxJm9C0#fXmLr1  
(SAVLICPGM) |n#f0k#  
K1,9C SAVLICPGM |n#f9IXmLrDyPTsD1>#K|nTI9C  
0V4XmLr1(RSTLICPGM) |nxPV4DN=#fXmLr#Z9C  
Z13B <v&CLr 167  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
SAVLICPGM |n.0,&i$z7bPGqP>K9Iz7DyPTs#System  
Manager Use ;ihvK*Cb0=hI&jIyXk{ODu~#&7#{Ob)u  
~,E\KP SAVLICPGM |n#  
g{z7I`vbiI,zI\h*`N9C EXPPART |n#XkTKPD?v=S  
EXPPART |n4(;v?~Pm?~#TZ?v?~Pm?~,9Xk4(;vz7  
0k?~#System Manager Use ;ia)K CRTPRDLOD |nD CL |n>},b  
)>}Pa=K;vz7ITfZZ`vbPDiv#  
168 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Z14B +&CLrV<A6L53  
53Pm?~G?~`M* SYSTEML D?~,||,53X7DPm,(}&mb)  
X7,IT+0&CLr*"\mw1V""MA;vr`v6L53#V"GQ<  
vA6L53D0&CLr*"\mw1?~#IT9C53Pm?~4+&CL  
r"&CLr^}M&CLrv?V<A6L53#  
>Ba)PXBPwbDE":  
v V<SULr  
v 9(0"Pf&CLr  
v 4(53Pm?~  
v +&CLrV<A6L53  
v S6L53SUTs  
V<SULr  
|
|
|
*9C0SU?~1(RCVPART) |nS6L53SUV",XkWHZ6L53O2  
0'VK|nD0&CLr*"\mw1LrDS/#6L53DYw539XkG  
10r0"Pf6p#  
|
|
g{6L53DYw53*10"Pf6p"20P0&CLr*"\mw1&\?  
~,kx}>Z#  
BPwZhv*SUV"x<86L53(4200&CLr*"\mw1)D}  
L#  
;x&CLr*"\mwD1053  
*+'V0SU?~1(RCVPART) |nDSULrV<A4200&CLr*"\m  
w1&\?~D1053,Xk4PBPYw:  
|
|
|
|
1. Z"M53(Q20100&CLr*"\mw1&\?~D53)O,(}dk  
TB|nTZ QADM bP4(#fD~ QADMDIST:  
|
CALL QADM/QLYSAVDST  
|
": *I&9CK|n,zh*_P *SECADM M *ALLOBJ (^#  
|
|
;s,QLYSAVDST Lr+jIBPNq:  
a. 4( QADMDIST b  
|
|
b. +m16P8(DTsPmS QADM 4F= QADMDIST bP#m1698>KT  
sG0zwIAE"1(MRI) 9G0zwIADO1(MRM)#  
|
|
|
|
|
m 16. S QADM 4F= RISC 53D QADMDIST bPD MRI M MRM Ts  
Ts  
Ts`M  
*MSGF  
zwIA`M  
QADMMSG  
QHLYCMD  
RCVPART  
MRI  
*PNLGRP  
*CMD  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
169  
 
|
m 16. S QADM 4F= RISC 53D QADMDIST bPD MRI M MRM Ts (x)  
|
|
|
|
|
|
|
|
|
|
|
|
QLYCHKQT  
QLYCPP  
*PGM  
MRM  
QLYCPYAA  
QLYDSFIL  
QLYDSTYP  
QLYEXEAA  
QLYIEXIT  
QLYINIT  
QLYMOVAA  
QLYRCVP  
QLYVRFY  
|
c. Z QADM bP4({* QADMDIST D#fD~  
|
|
d. Z0#fb1(SAVLIB) |nD?j"PfN}O9C *CURRENT 5,+  
QADMDIST b#f=#fD~P#  
|
e. >} QADMDIST b  
|
|
|
|
|
|
|
|
": r*yPb)Ts<GS QADM b4FD,yTzwIAE" (MRI) Ts9  
CD+G4(#fD~D>X53DwoT#g{k*4(|,9CNNd{  
oTD MRI TsD#fD~,rZ>X53O,zXkWH209CCoTD  
0&CLr*"\mw1&\?~w*(zoT"TK$==4POv=h#  
S(zoTb QSYS29xx(dP,xx GoTj6{)4F0SU?~1  
(RCVPART) |n"{"D~MAfiTs#;s,+Z1693Dm16PP>Dy  
PLrTs(rzwIADO,4 MRM)S QADM b4F= QADMDIST b  
P#;s4POv=h1cA1e#  
|
|
2. +#fD~"MAC'k*9C0SU?~1(RCVPART) |nD?v6L RISC 5  
3#  
|
3. ZSU53OSU#fD~#  
|
|
4. ZSU53O,9C0V4b1(RSTLIB) |n+#fD~V4= QADMDIST b  
P#  
|
xPr;x&CLr*"\mwD053  
|
|
*+'V0SU?~1(RCVPART) |nDXhLrV<AYw53D0"Pf(Q2  
0r4200&CLr*"\mw1&\?~),Xk4PBP=h:  
|
|
1. Z"M53(&Z10"Pf"Q200&CLr*"\mw1&\?~D53)  
O,(}dkTB|nZ QADM bP4(#fD~ QADMDISTP:  
|
CALL QADM/QLYSAVDSTP  
|
": *I&X9CK|n,zh*_P *SECADM M *ALLOBJ (^#  
|
|
;s,QLYSAVDSTP Lr+jIBPNq:  
a. Z QADM bP4({* QADMDISTP D#fD~  
|
|
|
b. (}9C0#fTs1(SAVOBJ) |nD?j"PfN}OD5(}g,  
V4R4M0),+Z1713Dm17P8(DTsPmS QADMDISTP b4F=#f  
D~ QADMDISTP P  
170 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
|
|
|
|
m 17. S QADM 4F= RISC 53D QADMDISTP bPD MRI M MRM Ts  
Ts  
Ts`M  
*MSGF  
zwIA`M  
QADMMSG  
QHLYCMD  
RCVPART  
MRI  
*PNLGRP  
*CMD  
|
|
|
|
|
|
": r*;) MRI TsGS QADM bP4FD,yT|G+9C4(#fD~D  
>X53DwoT#g{*4(|,9Cm;oTD MRI TsD#fD~,r  
Z>X53O,zXkWH20CoTD0&CLr*"\mw1&\?~w  
*(zoT"TK$==4POv=h#  
|
|
|
|
|
|
|
;*f; QADMDISTP bPD0SU?~1(RCVPART) |n#+{"D~M  
AfiTsS(zoTb QSYS29xx(dP,xx GoTj6{)4F=  
QADMDISTP bP#;s,jI=hZ1703D1aMZ1703D1b#Z4(#fD  
~.s,zI\kS QADMDISTP bP>}{"D~MAfiTs#d;+a  
9C>X53DwoT#f0SU?~1(RCVPART) |n,+|;&PNNT  
x0l,bGr*|;|,NNN}#Z6L53O,*zozT00SU?  
~1(RCVPART) |n"vD{"+9C(zoT#  
|
|
zI\k*#f QADMDISTP DwoTf>D1>,;sZ4( QADMDISTP #  
fD~.sV4|#  
|
|
2. + QADMDISTP #fD~S QADM b"MAC'k*ZdP9C0SU?~1  
(RCVPART) |nD?;v6L RISC 53#  
|
|
3. + QADMPGM #fD~S QADMDISTP b"MAC'k*ZdP9C0SU?  
~1(RCVPART) ?~D?;v6L RISC 53#  
|
|
4. ZSU53O,SUb)#fD~#  
5. ZSU53O,4( QADMDISTP b#  
|
|
6. 9C0V4Ts1(RSTOBJ) |n,+#fD~ QADMDISTP V4= QADMDISTP  
bP#  
|
|
7. 9C0V4Ts1(RSTOBJ) |n,+#fD~ QADMPGM V4= QADMDISTP  
bP#  
9(0"Pf&CLr  
|
|
g{kV<&CLr,TcZ\`kw'VD0"PfD OS/400 Yw53OKP|G,  
rXkWHZ`kw|nD?j"PfO9CJ1D549(&CLr#  
TZj6D?v?j"Pf:  
1. 4(;v@"Di,9|,z7f>zkDi*d8i#  
2. Z?;vbyDiP4({* QDFT RxPa}k *NONE D9(!n?~#  
3. !{TyPXh`kw|nD"M#  
4. Z?j"PfN}PmSJ1D"Pf5#  
5. ZKiP9C0"Pf`kw9({v&CLr#  
g{z9CDGNNd{_PX({FD BLDOPT ?~r BLDOPT compiler-names,  
rXkT?vvpD?~X4Ov=h#  
Z14B +&CLrV<A6L53 171  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
PX9(!n?~Dji,N{Z1383D:9C9(!n;#  
4(53Pm?~  
IT9C53Pm?~4+&CLr"&CLr^}M&CLrv?V<A;vr`  
v6L53#*4(53Pm?~,9C04(?~1(CRTPART) |n#  
>}  
TB|nZn? PAYROLL PDi DEVELOPER1 P4(53Pm?~#C?~+{  
* TESTSYS#  
CRTPART PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(SYSTEML)PART(TESTSYS)TEXT('Test  
systems used for product A')  
CZ53Pm?~D1!4D~G QSYSTEMSRC#  
9C0|D?~1(CHGPART) |n4+6L53X7mSA53Pm?~#}g,T  
ZTO53Pm?~,ITmSBPu?:  
TESTAS01  
TESTAS02  
TESTAS03  
bTzw 001  
bTzw 002  
bTzw 003  
zIT+V""MANN6L iSeries 400 53,49|G;_PSU\&#g{6L  
53;_PSU\&,bm>C'XkTK$==SUb)V"#  
SYSTEML ?~PD?vG<D7 8 vV{<XkG>X53?<P(eD53X7#  
?vG<Dd`?VITnkzO*PCDNNE"#ZOfD>}P,xvK?v  
zwDr*hv#  
?v0&CLr*"\mw1n?<I\4(`v53Pm?~#}g,TZn?P  
f"D&CLrD?v"Pf,I\<aP;v53Pm?~#IT+;v53Pm  
?~CZ10"Pf(|,10"PfOD53DPm),"T0"Pf9Cm;v  
53Pm?~#vp*"_I\9khC;v53Pm?~,Tc;|,{Gk+{  
GD^}V<AD53D{F#  
+&CLrV<A6L53  
Z0<v?~1(EXPPART) |nD SYSTEML N}O8(53Pm?~D{Fa<B  
|+?~<vA53Pm?~PP>DyP53#7(zDC'r*m,"S53?  
<q!`&DC'j6#V";"MA53Pm?~PP>D?v53X7ODCC  
'j6#  
Z0<v?~1(EXPPART) |nD SYSTEML N}O8( SYSTEML {F+QV"  
<vA SYSTEML ?~PP>DyP6L iSeries 400 53#;a+?~<vA>X  
iSeries 400 53#b)?~XkfZZS8(i=yiD1!Qw76P#  
172 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
; Z > X 5 3 O & m 0 < v ? ~ 1 ( E X P P A R T )  
| n O 8 ( D  
TOLIB"SRCFILE"DATA"REPLACE"OWNER M AUT N}#xG+b)5kV"  
;p"MA53Pm?~PP>D?v6L53X7,"ZGoI0SU?~1  
(RCVPART) |n&m#  
g{z;Z>X53D?<PGG,r0<v?~1(EXPPART) |n+'\#g{"M  
ADC'j6;PZ6L53D?<PGG,rV"+a'\#IT9C0mS?<  
u?1(ADDDIRE) |n4Z53OGGCC'j6#  
I9C TGTRLS N}48(*+V""MADYw53"Pf#g{8(K  
SYSTEML(*NONE),rKN};vT#ITT TGTRLS N}9C1!5  
*CURRENT"*PRV rOBDozPra>A;OP>DNN!n#  
S6L53SUTs (RCVPART)  
9C0SU?~1(RCVPART) |n4S;vr`v6L iSeries 400 53SUkV0&  
CLr*"\mw1V"#kVV"G9C0<v?~1(EXPPART) |nS6L iSeries  
400 53"MD?~#0SU?~1(RCVPART) |n;&mG)k10C'_P`,  
C'j6DC'"MDV"#  
0SU?~1(RCVPART) |nO;PNNN}#  
TZ?vV",0SU?~1(RCVPART) |n+kV?~F=Z6L53O"vD0<  
v?~1(EXPPART) |nO8(DbP#mb,&m0<v?~1(EXPPART) |nO  
8(D SRCFILE"DATA"REPLACE"OWNER M AUT N}D==MsG}ZS>  
X53<v?~;y#  
g{*TL(D1ddtSUV"TSU^},zI\khCz&mw54ZX(D  
1dKP0SU?~1(RCVPART) |n#  
xP&CLr*"\mwD10"Pf53  
*S;vr`vQ2010"PfD Operating System/400 D6L iSeries 400 53S  
UkV0&CLr*"\mw1V",9C0SU?~1(RCVPART) |n#  
;x&CLr*"\mwD10"Pf53  
*S;vr`vQ2010"PfD Operating System/400 D6L iSeries 400 53S  
UkV0&CLr*"\mw1V":  
1. (}ZNN OS/400 |nPOdk ADDLIBLE QADMDIST 4+ QADMDIST mSAb  
PmDC'?V#  
2. KP0SU?~1(RCVPART) |n#  
;x&CLr*"\mwD0"Pf53  
*S;vr`v'V0&CLr*"\mw1V"D6L iSeries 400 53SUkV0&  
CLr*"\mw1V":  
1. (}ZNN OS/400 |nPOdk ADDLIBLE QADMDISTP 4+ QADMDISTP mSA  
bPmDC'?V#  
2. KP0SU?~1(RCVPART) |n#  
Z14B +&CLrV<A6L53 173  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
xP&CLr*"\mwD0"Pf53  
*S;vr`v'V0&CLr*"\mw1V"D6L iSeries 400 53SUkV0&  
CLr*"\mw1V":  
1. Kv PDM(g{z}Z9C|D0)#  
2. (}ZNN OS/400 |nPOdk CHGSYSLIBL QADMDISTP 4+ QADMDISTP mS  
AbPmD53?V#  
3. 9C0XUJ41(RCLRSC) |nXUJ4#  
4. KP0SU?~1(RCVPART) |n#  
5. (}ZNN OS/400 |nPOdk CHGSYSLIBL QADMDISTP REMOVE(*YES),SbP  
mD53?VP}% QADMDISTP#  
6. 9C0XUJ41(RCLRSC) |nXUJ4#  
NNd{ iSeries 400 53  
Z;x0SU?~1(RCVPART) |nD53O,ITK$XS;vr`v6L iSeries  
400 53SUkV0&CLr*"\mw1V"#  
*K$XSUkV0&CLr*"\mw1V":  
1. 9CSU53OD"M=DC'j6"a#  
2. ZNN OS/400 |nPO,dk WRKNETF#kVV"D{F+G QADMSAVF#  
3. +b)#fD~SU=bP#  
4. 9C0V4Ts1(RSTOBJ) |nV4#fD~PDyPTs#  
"b,?vV"<+|,=vnbD}]x(QADMDATA M QADMTOLIB),|  
G;GV"D;?V,&>}|G#  
^F  
1. r*V"c(9Cb QTEMP,yT;I\+?~"MA6L53ODb QTEMP#  
4,1Z SYSTEML N}O8(53Pm?~1,;Jm9C TOLIB(QTEMP)#  
2. 1 QTEMP bPQPTs1,;I\"MrSUV"#0SU?~1(RCVPART) r  
0<v?~1(EXPPART) |n+'\#e} QTEMP b"XB"vC|n#  
3. zXkZ53?<PGGE\"MrSU0&CLr*"\mw1V"#  
174 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z15B #$&CLr*"\mwE"  
>Bhv:  
v 0&CLr*"\mw1&\?~PD2+T  
d{n?2+T"bBn  
v 8]MV4_T  
53VQV4  
l#ax0&CLr*"\mw1|n&m  
+n?E"FAm;v iSeries 400 53  
v 9Cn?G<  
v ZC'k*1,$n?cNa9  
v 1\m1w**"_$w1D"bBn  
"
r*0&CLr*"\mw1&\?~a)D2+TT OS/400 53a)D2+T  
*y!,yT,(i+0&CLr*"\mw1&\?~20Z2+6p* 30 r  
|_D53O#  
&CLr*"\mw&\?~PD2+T  
Z20K&\?~.s,+4(;v{* QPRJOWN DC'r*m,KC'r*m_  
P *USER 6pD(^,;PZn#KC'r*mG ADM 4(DyPTs(Lr}  
b)DyP_#  
": z*Kb,g{|Db QSYS P`M* *USRPRF D QPRJOWN TsDTs(^,  
rI\a"z;I$bDa{#(#,ZC'KPdP;v0&CLr*"\m  
w1|n14(DTsiKr*myP#+2(^;hC* *EXCLUDE,yP(C  
(^<;!{#}g,1KP CRTGRP |n44(i0d`XDb1,CbiC  
'r*m QPRJOWN yP,"R;ZhNNC'TCbD(C(^#rK,g{C  
'"TZ0&CLr*"\mw1XF.BICT;vTsDyP_(^,{G  
a\=\sD^F#  
\m1M*"_T QPRJOWN 5PDTsDCJG9C(^PmxPXFD#TZZ  
n?cNa9P4(D?vi,+9C=v(^Pm:;vC4#$kCi`T&D  
b,m;vC4#$kCiPD?~`T&D OS/400 Ts#?v(^PmD{F<G  
n?rFkrLi{DiO#  
?;v(^Pmnu<;|,;vu?,Ku?T *PUBLIC 8( *EXCLUDE (^#  
1?vC'rn?GG1,r?v(^PmmS;v_PCC'D}7(^Du?#  
C'_PDCJ?~D(^!vZ{r}gNZn?PxPGG#\m1Tn?PD  
yPi5P *ALL (^,x*"_TyPG*"i5P *USE (^#*"_;P(Z  
G){GTd_P *UPDATE CJ(D*"iP4P?~*"$w#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
175  
 
w*ir*mI1DC'(#ZhCiPDd{C'T{G4(DTsD=S(^#  
0&CLr*"\mw1&\?~;Jm"zbViv#  
mb,53\m1(#Zir*mPGGC',T+G)C'w*;vi4\md(  
^#d;0&CLr*"\mw1&\?~Jmzrn?GGir*m,+|;\I  
*Cr*mPDI1#rK,;(i+ir*mGG=n?P#C'XkT=XGG  
=n?PE\TCn?PD?~4P0&CLr*"\mw1|n#  
d{n?2+T"bBn  
0&CLr*"\mw1&\?~}kK8VXF&CLr*"}LD=(#lv?  
~DYw7#?N;P;v*"_TC?~_PCJ(#KXFGZ9C0&CLr  
*"\mw1SZ4T0&CLr*"\mw1E"4PYw1?SD#z&19C  
0&CLr*"\mw CL1|nr0`L*"\mw15CLr44PyPn/#  
g{zv(9CG0&CLr*"\mw1SZ4|D?~,rI\a"z;I$b  
Da{#}g,BLDPART |nI\;6p?~Q|D,rK;XB9(C?~#bI  
\a<B4?~kdv?~;;B#  
mb,z;&CZ0&CLr*"\mw1n?bP4(TsrD~#n?bPDy  
PE"<&C(}0&CLr*"\mw1&\?~4w*vp?~4(#g{*+  
D~rTsS;vb4F=n?cNa9P,9C IMPPART |n#  
g{;WH9C&CLr*"\mw|n4(TsrD~,M;&C+G)TsrD  
~E=n?bP#qr,;a+b)TsrD~6p*0&CLr*"\mw1E  
"#  
8]MV4&CLr*"\mwE"  
53\m1&(Z8]{v53T7#i/ITZ"z53JO1V4#0&CLr  
*"\mw1E"h*w*zDi/D#f8]MV4}LD;?VxP8]#  
}K4P#f538]MV4(g{PX*D0).b,P1,vp|n4jI&  
m,2h*V4#|n&mI\ar*53\m1!{Kw5""zg4JOrC'  
S53ksK%P!q!n 2 TaxH0ksx;PO#TZ3)0&CLr*"\m  
w1|n,g{|n4}#XjId&m,rE"I\a&Z;;B4,#PXgN  
S`FZbyDivxPV4DE",N{Z1793D:S|n&mJOV4;#  
8]MV4_T  
|
|
|
9 C : i S e r i e s  
E " P D 8 ] " V 4 M I C T ; ( Z  
U R L  
http://www.ibm.com/eserver/iseries/infocenter P);ZPhvD;V_T#Xk  
#fBPwiTs:  
v (^Pm,IC SAVSYS r SAVSECDTA |n#f  
v ADM 4(DM IBM a)DC'b,IC SAVLIB *ALLUSR |n"SAVLIB  
*NONSYS |nr SAVE K%D!n 23 4#f##fb)TsDnQ=(!vZ  
zh*#f`Y}]MzP`Y1d#  
|
|
PX#fTsDj8E",N{0 iSeries E"PD1M Backup and Recovery,  
SC41-5304-05#IS Infocenter Dw3P4SAKVaD*zf>#  
176 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
g{C'r*mw*V4}LD;?VxPV4rXB4(,r1z"T9CNN  
0&CLr*"\mw1|n1,I\SU={" ADM1804#*#}Kiv,kw*  
QSECOFR "a#9C RMVPRJUSR |n}%yPn?C',;s9C ADDPRJUSR  
|n+C'mSX={GwTDn?P#  
}KBP#f538]MV4}L.b,Z"z53JO1,n?D\m1Xk9C  
0XUn?1(RCLPRJ) |n47#ZV4bMTs.s}7XV4yP0&CLr*"  
\mw1E"#r* OS/400 53|nV4DE";|(XZQ>}rQF/DTsD  
E",yTK=SD=hGXhD#mb,;a#f0&CLr*"\mw1U>D  
~,xa#f|GDU>SU=#balIn?cNa9PD?~PkXZb)?~  
DE";;B#  
1Zn?cNa9ZV4E"1,?~Zn?cNa9PD;C2GzyhDE"D  
;?V#}g,Y(+?~ PAYROLL DEVELOPER1 RPGSRC BIWKLY a}=|D  
*"i.bDbTiP#g{vVD53JO*sxP53}]V4,ZzV40&  
CLr*"\mw1E"1,z+#{Si DEVELOPER1 P}%C?~"Zi TEST  
PV4|#  
1z(ZS3)iP}%r>}?~1-}g,1z9(?~ PAYROLL DEVELOPER1  
RPGSRC BIWKLY 1-4(D?~ (PAYROLL DEVELOPER1 PGM BIWKLY) Z4  
>}.0;1;Z*"iP#Z>}C?~.s,z;kC|ZzV453sVYv  
V#  
9C RCLPRJ |nITbvZV4bMTss0&CLr*"\mw1?~PfZDy  
P;;BTDJb(g0yv)#r*}K#f OS/400 D~MTs.b,OS/400 #f  
MV4|n9#fMV40&CLr*"\mw1&\?~4(M,$DXZG)D  
~MTsDE",yT,n?cNa9a;V4*dnuDr}7D4,#bMG9  
C(iD#fMV4_T(x;G;#fMV4X(b)DX*TyZ#  
(F  
P1,8]MV4}LD?DG*K(FABD2~rOBf>DYw53#  
1z8]531,&q->ZPOghvD_T.;#b+#fXhDk ADM PXD  
Ts,|( QUSRSYS bP{* QALY* D}]bD~M QLY* U>MU>SU=#  
?vi<P;v{F* proj.group DbM{F* proj.group M proj_group D(^Pm,  
dP,proj M group VpGn?rFMrLi{#  
Z(F.0,T0Z8] QUSRSYS b.0,9CBP|n4axomD~DU>G  
<:  
ENDJRNPF FILE(*ALL)JRN(QUSRSYS/QLYJRN)  
4P(F,gBy>:  
1. 7#V4KyP ADM C'b"C'r*mM(^Pm#  
2. K1,;*20 ADM#g{Q20K ADM,}%|,">}b QUSRSYS PD  
yP QALY* M QLY* Ts#b*sJ1(FH0D ADM 73#  
3. Z20 ADM .0,V4 QUSRSYS P QALY* }]bD~DyP0"Pf#  
4. 20nBf>D ADM#  
5. w* QSECOFR(2+w\)"aA OS/400#  
Z15B #$&CLr*"\mwE" 177  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
6. Z OS/400 |nPO,dkBP|n:  
RCLPRJ PRJ(*ALL)OPTION(*TEST)  
7. i4(f,"8]*#fDyPB"Ts#  
8. Z OS/400 |nPO,dkBP|n:  
RCLPRJ PRJ(*ALL)OPTION(*RUN)DLTINCOBJ(*YES)  
9. TZ(fPP>D?vTs,4PBPYw:  
a. Z OS/400 |nPO,dkBP|n:  
PRTPRJUSR PRJ(name)USRPRF(*ALL)  
b. TZn?PD?vC',dkBP|n:  
RMVPRJUSR PRJ(name)USRPRF( name)  
ADDPRJUSR PRJ(name)USRPRF( name)USRTYPE(*DEVELOPER or *ADMIN)  
ACCESS(*READ or *UPDATE)DEVELOPGRP( groupnames)  
VZMV4K ADM 73#  
XUn? (RCLPRJ)  
zXkGn?\m1E\XUn?#*s\m1Z4PNNYw.0rZV453.  
s,KP0XUn?1(RCLPRJ) |n#ZV4U>.s,1Z;NZ iSeries 400 53  
OKPK|n1,+TyPn?D0&CLr*"\mw1}]b&CyPU>|  
D#+G,?vn?TXkIdn?\m1XU#g{NNKT<9Ch*XUDn  
?,r+"vms{",/f{r}Cn?h*XU#  
RCLPRJ |n9C538]MV4}LV4DE"47#+n?cNa9PD?~EX  
#fG)E"1|Gy&D4,#;xT.,Z&m RCLPRJ |n.s,ITZn?c  
Na9P+7Xm>Qa}rQ>}D?~#  
0&CLr*"\mw1&\?~4(M,$DXZD~MTsDE"F*?~?<  
E"#?~?<E"|,PX?~N14("ON|D1dT0|$tZn?cNa  
9PD;CDE"#KE"kKP RCLPRJ |n1V4D5JD~MTs`%d#g{  
fZ;;BT,r0&CLr*"\mw1&\?~abv|G#  
}g,Y(?~?<E"8>;v?~;YfZZ*"iP#;x,QZm>*"i  
DbPV4K5JDTs#&>}C?~#RCLPRJ |nJmz(}Z OPTION N}  
O9C1!5 *RUN "Z DLTINCOBJ N}O9C *YES 4>}n?cNa9P;P  
T&?~?<E"DyPD~rTs#;>}_P53a)D?~`MDTsr_P  
C'(e?~`MDTs#  
"
g{QZ0&CLr*"\mw1n?bP4(D~rTs,"R49C&CL  
r*"\mw&\?~44PKYw,r1zKPxP OPTION(*RUN) M  
DLTINCOBJ(*YES) D|n1,g{|GtZ\0&CLr*"\mw1&\?~  
'VD`M,ra>}b)D~rTs#PX\'VD?~`MDPm,N{Z  
503Dm4MZ523Dm5#TZ;PT&0&CLr*"\mw1`M(53a  
)D`MrC'(e`M)DNNTs,H;(f2;>}|G#  
178 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
zXkZ RCLPRJ |nO8(n?D{F,r8>*XUzw*\m1Td_P(^D  
yPn?Dn?E"#  
g{*>};;BDTs,k8( DLTINCOBJ N}#;;BDTsMGR;=`X?  
~?<u?DTs#  
>}: K>}5wgNXUy> Payroll n?DE"">}Kn?P;PX*?~?<  
E"DyPTsMI1#  
9C RCLPRJ |n  
RCLPRJ PRJ(PAYROLL)OPTION(*RUN)  
9C0`L*"\mw15CLr  
Z0C PDM 49Cn?1A;O!q!n 37(XU)#  
>}: ZKP RCLPRJ |n1,+zI;v(f,8>D)TsrD~;PXhD?  
~?<E"#*r! RCLPRJ (fx;>}NN?~,kdkTB|n#  
RCLPRJ PRJ(PAYROLL)OPTION(*TEST)  
<615w0XUn?1(fPa)DE"#ZK>}P,y]?~?<E",P 5 v?  
~4;6p#  
5722WDS  
V5R1M0  
&CLr*"\mw  
- XUn? 05/08/01  
10:35:57  
3f . . : 0001  
n? . . . . . . . . . . . . . . . . : PAYROLL  
!n . . . . . . . . . . . . . . . . : *RUN  
>};;BDTs . . . . . . . . . . : *NO  
AS/400  
Ts  
`M  
4
I1  
`M  
4(  
UZ  
b
Ts  
I1  
yP_  
D>  
PAY.PROD  
PAY.PROD  
PAY.PROD  
PAY.PROD  
PAY.TEST  
ASSISTS  
GOALS  
PGM  
PGM  
05/08/01 RICHARDS  
05/08/01 RICHARDS  
05/08/01 RICHARDS  
05/08/01 RICHARDS  
05/08/01 QPRJOWN  
PENALTIES PGM  
POINTS  
QDDSSRC  
PGM  
FILE  
NEWSTATS  
PF  
* * * * *  
P
m
a
x
* * * * *  
< 61. RCLPRJ |nzIDy>(f  
g{z8>*XUXZzTd_P(^DyPn?DE",ra*?vn?zI;v  
%@D(f#  
RCLPRJ |nH;(f2;>}Z0&CLr*"\mw1n?bPR=D,P4*|  
G(e53a)D`MrC'(e`MDTs#  
S|n&mJOV4  
1,1T?~?<E"MTsrD~4PYwD0&CLr*"\mw1|nZb=  
=fD=hjI.0r3)-rx;PO1,n?E"c&Z;;BD4,#bI\  
Gr*53Yw1r2+w\Z&mjI0!{Kw5,bI\Gr*C'(}53  
ksK%PD!n 2 axKH0ks,rGr*"zg4JOlID#  
r*|n}#ax"rC'a)Kms{",yTn?E"4&Z;;B4,#}  
g,g{ CRTPRJ |n5X;u{",8>|nr*n?rF^'x'\,ryPn?  
E"T;B#  
Z15B #$&CLr*"\mwE" 179  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
1"Vn?E";;B1,&m?~*"|nD==k&mn?\m|nD==TP  
;,#  
V4?~*"|n  
14\9W&m?~*"|n1,Z"V;;BT.s,(#;h*xPK$ikM  
ITV4?~#Z*"_r\m1"T9Cr|D;;BD?~(K1,0&CLr  
*"\mw1&\?~T/bvms4,).0,;a"V;;BT#  
49;fZ`T&DD~rTs,?~*"|n2Jm?~?<E"fZ#bm>4  
9 CRTPART |n'\,?~?<E"3ITfZ,!\?~>m";fZ#1fZ;  
v";fZD?~(D~rTs)D?~?<E"1,\m1r*"_ITZ  
QRYPART PmO4=K?~#  
g{C'"TTK?~4P;)Yw,r0&CLr*"\mw1&\?~IT7(  
;fZ?~?<E",x?~>m";fZ#+>}C?~?<E",|nZCiP  
R;=C?~#Ts,g{dk QRYPART |n,c;YP>C?~#  
g{w*|nYw?jD?~Qp5R;YIC,rh*9C OS/400 8]MV4|n  
V4TsrD~D8]1>#PXgN4PKYwDji,N{Z1763D:8]MV  
V4n?\m|n  
n?\m|nG(}YNdkC|nr(}dk RCLPRJ |nTK$==V4D#  
g{ CRTPRJ"CHGPRJ r DLTPRJ |n'\,r\m1&1YNdk,;|n#}  
g,g{dkK CRTPRJ |n,+K|nr*g4Ogx'\,rNN"TCJKn?  
DK1(\m1r*"_)<a4=;u8>n?;fZD{"#\m1&1YNd  
k,;v CRTPRJ |n#  
g{BPdP;v|nZ&m1'\,rXkKP8(K OPTION(*RUN) D RCLPRJ  
|nT9n?E"5X;B4,#  
ADDPRJUSR  
CHGPRJUSR  
CRTGRP  
DLTGRP  
RMVPRJUSR  
+E"4FAm;v AS/400 53  
g{*+n?cNa9MyPkd`X*DE"F/r4FAm; iSeries 400 53,  
k9C EXPPART M IMPPART |n#2IT+0&CLr*"\mw1n?bMi  
5bFA@"D(zf"X (ASP),;*{vn?$tZ,; ASP P#PXb)|n  
"b,;4Fn?cNa9>m#\m1Xk9CJ1D0&CLr*"\mw1|  
n4(n?MCn?PDi#PXgN4PKYwDji,N{Z143D:4(n?  
9Xk*BDn?cNa94(CJrGGE"#PXgN4PKYwDji,N{  
zIT9CBP=V=(4q!KE":%f>&CLrM`f>&CLr#  
180 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
%f>&CLr  
g{&CLr;P`vf>Dzk,rzk;PV<Z`viP,rK=(I\|  
C#  
*4FDn?cNa9PDyP?~<&1ZyiP#;s,IT9C EXPPART |n  
4+yP?~SKi<v=;vbP#ITZm; iSeries 400 53O#fMV4Kb#  
ZZ~v iSeries 400 53O,|,yP0&CLr*"\mw1E"Dbk IMPPART  
|ndO9C#  
Z4(BDn?cNa9"mSC'GGE".s,z&1+yP?~<<k=;v  
iP"ZGviPbT|G,T7#&CLr\;s$ZDGy$w#  
`f>&CLr  
zIT9CK=(4F/r4F|,g`viV<DzkDn?cNa9rxP`v  
f>D&CLr#ITTn?D?vi9CxP SCAN(*NO) D EXPPART |n4+  
yP?~SKi<v=;vbP#zh*Tn?D?viX4K=h,Tc*?vi  
4(%@Db#VZ,zITZm;v53O#fz4(DyPb"V4|G#  
Zm;v53O4(BDn?cNa9"mSC'GGE".s,&19CxP  
REPLACE(*YES) D IMPPART |n+yP?~SV4Db<k=d`&DiP#zh  
*Tn?cNa9DNNV'PSyi=ZciD?viX4K=h#  
"b,49G+xP`vf>D+B&CLr<k=0&CLr*"\mw173  
P,K=(2G\PCD#  
9Cn?G<  
*Ka)Tn?Dn/DsFzY,0&CLr*"\mw1&\?~a#Vn?G  
<#n?G<(}G<4(r|DKD)Ts"n/N1"zT0YwI-4P4z  
Y*"_M\m1Tn?4PDYw#x( iSeries 400 53ODyP0&CLr*"  
\mw1n?<G<ZKn?G<P#  
n?G<w* iSeries 400 U>5V#KU>0dU>SU=$tZ QUSRSYS bP#  
n?G<DU>SU=Xk$tZK&E\;0r!n?G<1(PRTPRJLOG) |n&  
m#;PNNC'(uAG_P QSECOFR (^DC')\;>}r|DvpU>u  
?#b\7#n?G<D2+T#  
|,n?G<DU>D{FG QLYPRJLOG#U>SU=D{FG QLYPRJxxxx,d  
P,xxxx G 1 = 9999 D}V#U>u?TC'(eDu?q=f"#  
Kz7T/`XU>SU="ZVfDU>SU=S|P5^F1,SBDU>SU  
=#jIKYw1,+E"{""MA QSYSOPR {"SPT(*Yw1#zIT#f  
IDU>SU=,"ZTs>}|TMEf"w#(iD_TG?GZ4P;NKn  
Yw#PXU>G<Dji,N{ Backup and Recovery#  
r!n?G<E" (PRTPRJLOG)  
k9C PRTPRJLOG |n4i4n?G<DZ]#(iy]n?G<P*r!DE"D  
6 ' T z & m N = K P K | n # Z 1 8 2 3 D m 1 8 P > K G < D | n #  
Z15B #$&CLr*"\mwE" 181  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
m 18. r!n?G<PG<D|n  
|nD`M  
n?\m  
|n{  
ADDPRJUSR"CHGGRP"CHGPRJ"CHGPRJUSR"CRTGRP"  
CRTPRJ"DLTGRP"DLTPRJ"RCLPRJ RMVPRJUSR  
?~*"  
ADDADMLANG"ADDADMTYPE"BLDPART"CHGADMACN"  
CHGADMLANG"CHGPART"CHGPARTINF"CHKINPART"  
CHKOUTPART"CPYPART"CRTPART"CVTPART"  
D L T P A R T " E X P P A R T " I M P P A R T " M R G P A R T "  
PRMPART"RMVADMLANG"RMVADMTYPE  
;)?~*"|nJm9C%;|nTm`?~4PYw#}g,IT9C PRMPART  
|n4a};viPDyP?~#} BLDPART |n.b,a*?;vw*b)|nD  
Yw?jD?~4(;vG<u?#TZ BLDPART,;4(;vu?,Ku?T>C  
'dkD BLDPART |n#  
>}  
PRTPRJLOG |nO(;XhDN}G*i4du?Dn?D{F#*r!hvyP*  
"_M\m1qlT Payroll n?9C0&CLr*"\mw1|nDn/D(f,k  
9CTB|n#<625wK4(D(f#  
PRTPRJLOG PRJ(PAYROLL)  
5722WDS V5R1M0  
&CLr*"\mw  
- r!n?G< 05/08/01  
10:29:07  
3f . . : 0001  
n? . . . . . . . . . . . . . . . . : PAYROLL  
*<UZ . . . . . . . . . . . . . . : 05/08/01  
axUZ . . . . . . . . . . . . . . : 05/08/01  
QwV{. . . . . . . . . . . . . . :  
C'r*m  
UZ  
1d  
|n  
TREMBLAY  
TREMBLAY  
05/08/01  
05/08/01  
10:07:52 CRTPRJ PRJ(PAYROLL)SHORTPRJ(PAY)SAVDTA(*YES)TEXT('*BLANK')  
10:08:42 CRTGRP PRJ(PAYROLL)GRP(PRODUCTION)SHORTGRP(PROD)PARENT(*NONE)PRMCODE(*PARENT)CCSID(*P  
ARENT)TEXT('*BLANK')  
TREMBLAY  
TREMBLAY  
TREMBLAY  
12/22/95 10:09:10 CRTGRP PRJ(PAYROLL)GRP(TEST)SHORTGRP(TEST)PARENT(PRODUCTION)PRMCODE(*PARENT)CCSID(*PA  
RENT)TEXT('*BLANK')  
12/22/95 10:09:42 CRTGRP PRJ(PAYROLL)GRP(SMITH)SHORTGRP(SMITH)PARENT(TEST)PRMCODE(*PARENT)CCSID(*PARENT  
)TEXT('*BLANK')  
12/22/95 10:10:21 CRTGRP PRJ(PAYROLL)GRP(DOUG)SHORTGRP(DOUG)PARENT(TEST)PRMCODE(*PARENT)CCSID(*PARENT)  
TEXT('*BLANK')  
TREMBLAY  
TREMBLAY  
SMITH  
12/22/95 10:11:38 ADDPRJUSR PRJ(PAYROLL)USRPRF(SMITH)USRTYPE(*DEVELOPER)ACCESS(*UPDATE)DEVELOPGRP(TANYA)  
12/22/95 10:12:10 ADDPRJUSR PRJ(PAYROLL)USRPRF(DOUG)USRTYPE(*DEVELOPER)ACCESS(*UPDATE)DEVELOPGRP(DOUG)  
12/22/95 10:13:45 CRTPART PRJ(PAYROLL)GRP(SMITH)TYPE(DDSSRC)PART(MTHLY)LANG(PF)PROMPT(*NO)PRMCODE(*GRP  
)SRCFILE(*TYPE)TEXT('*BLANK')  
SMITH  
SMITH  
SMITH  
12/22/95 10:14:07 CHKOUTPART PRJ(PAYROLL)GRP(SMITH)TYPE(DDSSRC)PART(MTHLY)PRMCODE(*GRP)  
12/22/95 10:15:06 CHGPART PRJ(PAYROLL)GRP(SMITH)TYPE(DDSSRC)PART(MTHLY)CHGCMD(*TYPE)  
12/22/95 10:15:25 BLDPART PRJ(PAYROLL)GRP(SMITH)TYPE(DDSSRC)PART(MTHLY)SCHPTH(*DFT)SCOPE(*NORMAL)FORCE  
(*NO)BLDMODE(*COND)SAVLST(*NO)  
SMITH  
12/22/95 10:18:11 PRMPART PROJ(PAYROLL)GROUP(SMITH)TYPE(DDSSRC)PART(MTHLY)  
12/22/95 10:19:45 DLTPART PROJ(PAYROLL)GROUP(SMITH)TYPE(FILE)PART(MTHLY)  
12/22/95 10:20:44 BLDPART PRJ(PAYROLL)GRP(TEST)TYPE(*ALL)PART(*ALL)SCHPTH(*DFT)SCOPE(*NORMAL)FORCE(*NO  
)BLDMODE(*COND)SAVLST(*NO)  
SMITH  
TREMBLAY  
SMITH  
SMITH  
12/22/95 10:22:13 ADDADMTYPE TYPE(ZPASSRC)SYSTYPE(*MBR)DFTSRCF(QRPGSRC)DFTRCDLEN(00092)ALWI NC(*NO)INCL  
UDES(*NONE)  
12/22/95 10:23:59 ADDADMLANG TYPE(ZPASSRC)LANG(RPG38)BLDCMD(*NONE)BLDOUTTYPE(*NONE )BLDOUTLANG(*INPUT)S  
PLFNAME(*INPUT)  
* * * * *  
P
m
a
x
* * * * *  
< 62. PRTPRJLOG |nzIDy>(f  
g{z;9k*i4qlDn/,rITZ PRTPRJLOG |nO8> FROMDATE M  
TODATE#  
Z FROMDATE N}O,'VXb5 *CURRENT M *BEGIN#1!ivG9C  
*CURRENT,4,qlDUZ#g{8( *BEGIN,rz+4=Sn?G<D*<=  
182 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
TODATE N}O8(DUZDyPn?G<u?#2ITZ FROMDATE N}O8(  
X(DUZ#KUZXk9C535 QDATFMT 8(Dq=,"R,g{9CVt{,  
r9C535 QDATSEP 8(Dq=#  
Z TODATE N}O,'VXb5 *CURRENT#|G1!5#2ITZ TODATE N  
}O8(X(DUZ#KUZXk9C535 QDATFMT 8(Dq=,"R,g{9  
CVt{,r9C535 QDATSEP 8(Dq=#  
2ITy]C'r*mr!u?#USRPRF N}D1!5G *ALL#ba<Br!|,  
Tn?_PCJ(DyPC'Du?D(f#  
g{z;ki4zT:Zn?PDn/,k8( USER(*USRPRF)#g{*i4X(K  
1Dn/,kZ USRPRF N}O8(C'r*m{#  
g{*8>!qsFG<Dj<,k9C STRINGS N}#zIT9CK&\4(}8  
(|nP|,DV{.^FsFG<(f#}g,zIT8(;vX(D|n{r|  
nP9CDX(iM?~{#  
Z STRINGS N}O,n`IT8( 4 vvVZsFG<PDV{.#?vV{.n  
`IT|, 32 vV{#yPHO<Ts4jI#  
!qD?vsFG<u?<+|,8(DyPV{.#  
": '{`1ZTyPV{.4P AND Yw#  
g{*r!|,NN;vV{.D(f,rh*(}8(?;vV{.%@X"v  
PRTPRJLOG |n#  
>}  
>>}5wgNr!xPC'r*m ROBERTS D1lDn/D(f#  
9C PRTPRJLOG |n  
PRTPRJLOG PRJ(PAYROLL)FROMDATE(*CURRENT)TODATE(*CURRENT)USRPRF(ROBERTS)  
STRINGS("RPGSRC")  
9C0`L*"\mw15CLr  
Z0C PDM 49Cn?1A;O!q!n 36(r!G<)#  
g{;kr! PRTPRJLOG |nzID(f,rIT(}!q OUTPUT(*OUTFILE) 4  
+dv}<AdvD~#Xk8(CZSUdvDbMD~#TB|nMGgNjI  
KYwD;v>}#  
PRTPRJLOG PRJ(PAYROLL)FROMDATE(*CURRENT)TODATE(*CURRENT)USRPRF(ROBERTS)  
OUTPUT(*OUTFILE)OUTFILE(*LIBL/OUTFILE)OUTMBR(*FIRST)  
dvD~DG<q=kb QADM PI53a)D}]bD~ QALYPRJLOG P9CD  
G<q=`,#  
Z15B #$&CLr*"\mwE" 183  
Download from Www.Somanuals.com. All Manuals Search And Download.  
ZC'k*n?1xPV4  
M1*Ai/PDd{$w0;rj+k*%;";#{#g{*"_k*&Z&C  
Lr*"\ZPD?~;C,r\m1h*i$KKD$wGqQjI#y]*"_  
k*D73D;,,IT+xPPD$wVdxm;v*"_"I\m1jIrSn  
?cNa9P>}#  
P>*"iPD?~  
Z;=G@@*"_D*"iPP`Y$wT4jI#9C0i/?~1(QRYPART) |  
n47(fZZKiPDE"#  
>}  
TB|n4(;v(f,K(fP>*"i ROBERTS PDyP?~#  
QRYPART PRJ(PAYROLL)GRP(ROBERTS)TYPE(*ALL)PART(*ALL)OUTPUT(*PRINT)  
SCAN(*NO)  
8( SCAN(*NO) !nD?DG,;P> ROBERTS iPDG)?~,x;P>Ki  
DQw76PDyP?~#  
>};\a}D?~  
IT>}`M* PGM D?~,bGr*|GGI9(}L9C BLDPART |nXB  
4(D#d{`M(}g,FILE"CLD"CMD M MODULE)D?~2I\a;>},  
bGr*}#ivB;\a}b)?~#((}9CxP EXTEND(*YES) N}D  
PRMPART |n"8(d`&D4?~,ITa}`M* FILE"CLD"CMD M  
MODULE D?~#)9C DLTPART |n4>}b)?~(g{z#{byvD0)#  
>}  
TB|n>} ROBERTS *"iP`M* PGM DyP?~#  
DLTPART PRJ(PAYROLL)GRP(ROBERTS)TYPE(PGM)PART(*ALL)  
B;=G7(*"iPP>DD)?~QlvAC'r*m ROBERTS#(ZK>}P,  
*"iD{FkC'r*mD{FG`,D#)  
TZKiP`BD?;v?~,9C0r!?~E"1(PRTPARTINF) |n47(CJ  
\?GqhC* ROBERTS#TZ QRYPART |n,Z PRTPARTINF |nO9C  
SCAN(*NO) N}4^FTKiDQw#  
>}  
TB|nzI;v(f,K(fP>XZ?~ BIWKLY DE"#  
PRTPARTINF PRJ(PAYROLL)GRP(ROBERTS)TYPE(RPGSRC)PART(BIWKLY)  
OUTPUT(*PRINT)SCAN(*NO)  
g{(fT>CJ\?hC* ROBERTS,rh*xPK$ik#*"_k*%;D7  
37(KgN&mB;=#Xk9C CHGPARTINF |n+CJ\?|D*BPdP;  
v5:  
v +CJ\?hC* *NONE,TcIT>}C?~  
v +CJ\?hC*m;v*"_DC'r*m(+$w+MxC*"_)  
v +CJ\?hC*zT:DC'r*m#  
184 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
>}  
g{zuC;&#t?~PD|D,r9CTB|n+CJ\?|D* *NONE#  
CHGPARTINF PRJ(PAYROLL)GRP(ROBERTS)TYPE(RPGSRC)PART(BIWKLY)  
LANG(*SAME)ACCKEY(*NONE)  
K|nMEC?~DCJ\?#VZ,IT9C DLTPART |n>}KiPD1>#;  
x,k"b,TC?~ywDNN|D<a*'#g{C?~G;vB?~,"RP  
4a},ZG,1Si ROBERTS P>}|1,+9WXSn?cNa9P}%|#g  
{P4a}C?~,rm;v*"_IT+I?~lv"Z{r}D*"iP|DC  
?~#  
g{zuC&CT?~PD|DxP@@,k+CJ\?|D*zT:DC'r*  
m,r9C CHGPRJUSR |n4Zhm;v*"_Ti ROBERTS D|BCJ(,"  
+CJ\?|D*CK1DC'r*m#bJmCJ\?O8(DK1|DC?~#  
>}  
BP|nxh SMITH XhD|BCJ("|D?~ BIWKLY DCJ\?,T9  
SMITH IT9C|#  
CHGPRJUSR PRJ(PAYROLL)USRPRF(SMITH)USRTYPE(*SAME)ACCESS(*UPDATE)  
DEVELOPGRP(SMITH ROBERTS)  
CHGPARTINF PRJ(PAYROLL)GRP(ROBERTS)TYPE(RPGSRC)PART(BIWKLY)  
LANG(*SAME)ACCKEY(SMITH)  
zXkT*"i ROBERTS PdCJ\?hC* ROBERTS D?;v?~9C  
CHGPARTINF |n#  
ZbT|D.s,cITa}?~#  
}%n?C' (RMVPRJUSR)  
B;=G9C0}%n?C'1(RMVPRJUSR) |n}%*"_DCJ(rGGE"#  
>}  
TB|nSn?P}% ROBERTS#  
RMVPRJUSR PRJ(PAYROLL)USRPRF(ROBERTS)  
0&CLr*"\mw1&\?~7#n?P<UGGP;;n?\m1#g{"T  
}%(;Dn?\m1,ra"vms{"#  
Z(;Dn?\m1k*n?bV+Y"zDivB,3vKXk9C\m1DC'  
r*mr QSECOFR C'r*m"a= iSeries 400 53O,"9C ADDPRJUSR |  
nrn?GGBDn?\m1#;s,BD\m1IT9C RMVPRJUSR |n4}%  
H0\m1DGGE"#  
>}i (DLTGRP)  
ns;=GSn?cNa9P}%i(g{d{*"_;P2mCiD0)#  
>}  
TB|n}%i ROBERTS#  
DLTGRP PRJ(PAYROLL)GRP(ROBERTS)  
Z15B #$&CLr*"\mwE" 185  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
0&CLr*"\mw1&\?~7#}Z>}DiGUD#}g,g{z"T9C  
DLTGRP |n>};vi,x|T|,?~RG)?~DCJ\?hC*Q8(xCi  
DC',rK|na'\#  
9CU>xPsFzY  
0&CLr*"\mw19CU>4#fKz7DyP|nDsFzY#zIT9C  
PRTPRJLOG |nr!KsFzY#KsFzYG9C QUSRSYS PDU> QLYJRN  
5VD#QUSRSYS PDm;vU> QLYPRJLOG C4G<z7D}]bD~DyP  
Bq#b)BqCZXUn?#  
U>T53UZM1dtP#g{r*NN-rz+53UZ|D*NN+4DUZ  
M1d,k7#;PNNK9CKz7DNN|n,1=53UZM1d5X}#*  
9#g{PKbyvD0,rz+^(4$ZDGy9C PRTPRJLOG |n#  
PRTPRJLOG |nTZ?==9CD DSPJRN |n;lwNN=}10UZ  
(PRTPRJLOG 9CD1!5)DG<,rK;a5XNNZ|,+41dAGDG<  
.sDG<#QLYPRJLOG U>2I\a"zbViv,XUn?1b+a<B`FD  
Jb#  
*bvKJb,zh*:  
1. iR">}|,xP+41dAGDmsu?DU>SU=#g{u?Z10U>  
SU=P,kGB}ZGkU>DD~D{FM10U>SU=D{F(ITT  
QUSRSYS/QLYJRN 9C WRKJRNA |n)#  
2. T}ZT QUSRSYS/QLYJRN GkU>DyPD~"v ENDJRNPF |n#  
3. >} QUSRSYS PD QLYJRN U>#  
4. >}10U>SU=#  
5. 4(U>SU= QLYRCVnnnn(dP nnnn GS 0001 *<D 4 ;}),"8(  
THRESHOLD(10000)#  
6. 4(k QLYRCVNNNN U>SU=`X*D QLYJRN U>#  
7. 9C STRJRNPF |n,TzgHGBd{FDomD~t/U>G<#  
T QUSRSYS bPDU> QLYPRJLOG X4OfD=h 1 M=h 3 A 6#  
w**"_D\m1D"bBn  
,1w**"_Dn?\m1&CwW,3)?~*"|nXkww9C#g{n?  
\m1|GK{GITTX(?~*"|nzzH*"_|c:D0lb;B5,P  
1MPI\azzJb#  
(}9C DLTPART |n,\m1ITS*"irSn?cNa9PDNNd{iP>  
}?~#1w**"_$w1,\m1XkwwX9CK|n#  
(}9C CHGPARTINF |n,\m19IT|D?~DCJ\?#Z|DQlvA*  
"_D?~DCJ\?.0,\m1&17#*"_*@{GDik#  
186 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z16B 9C`L*"\mw5CLr  
w* CL |nDfz=(,zIT9C0`L*"\mw15CLr44P?~*"N  
q#>BV[gN(}C0`L*"\mw15CLr49Cn?"iM?~#  
`L*"\mw5CLrEv  
0`L*"\mw1A;P>I)z9CDn?"ir?~T0zITT|G4PD  
Yw#YwGTA;%?D`E!nMA;W?D&\|N=J>D#*4PYw,  
kZJ1n?"ir?~T_D0!n1VNPdkYwD`E,;s404P1  
|,r9CJ1D&\|#  
ZP|`!nICDA;O,*i4d`!n,k40F23=d`!n1#g{*TP>  
DyP?~X44P3v!n,kdk!nE,;s9C0F13=X41#b+TZ;v  
?~BfDyP?~X4C!n#ZP|`&\|ICDNNA;O,*i4d`&  
\|,k40F24=d`|1#  
Z3)A;OITdkX(D{Fr`t{#CZ8( *generic* 5Dq=TyPA;  
<G;yD#g{9C`t5,rITdkIGE (*) ^(D?V{TT=X(S/#  
}g,`t{IT_PBPq=.;:  
ABC*  
T>TV{ ABC *7DyPnDPm#  
*ABC  
T>TV{ ABC a2DyPnDPm#  
*B*  
T>{FPDNN;CxPV{ B DyPnDPm#  
A*C  
T>TV{ A *7"TV{ C a2DyPnDPm#  
"a*"  
T>;Z}EZ"T a *7DyPnDPm#  
**ALL  
T>T ALL a2DyPnDPm#r* *ALL GCZT>yPnDPmDXb  
5,yTboh*+GE#  
3)a>D1!5* *ALL,b)5aZzWN9CA;1T>#B;N9CA;1,  
zONdkDdk+w*1!5vV#*V4H09CD5,k40F5="B1#PX  
gN9CA;Dji,N{ADTS/400: Programming Development Manager#  
kE  
*t/0`L*"\mw15CLr,dk STRPDM |n#vVwK%,gZ1883D  
<63y>#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
187  
 
AS/400 `L*"\mw (PDM)  
!qBPdP;n:  
1. 9Cb  
2. 9CTs  
3. 9CI1  
4. 9Cn?  
5. 9Ci  
6. 9C?~  
9. 9CC'(e!n  
!qr|n  
===> __________________________________________________________________  
________________________________________________________________________  
F3=Kv  
F4=a>  
F9=lw  
F10=|ndk  
F12=!{  
F18=|D1!5  
< 63. AS/400 `L*"\mw (PDM) wK%  
v1Q200&CLr*"\mw1&\?~1,!n 4"5 M 6 EavVZA;O#  
g{Q*@|,zyhD?~Dn?MiD{F,k!q!n 6#g{z*@n?+h  
*7(i,k!q!n 5#g{=_<h*7(,k9C!n 4#(!n 1"2 M 3 "  
;1Sk0&CLr*"\mw1&\?~`X,rK>i;V[|G#;P!n 7 M  
8#)  
8(n?  
ITZ0C PDM 49Cn?1A;P8(*&mDn?#wCKA;D=(P=V:  
1. SwK%P,!q!n 4(9Cn?)#vV08(*&mDn?1A;,g<64y  
>#  
188 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
8(*&mDn?  
dk!n,404P1|#  
n? . . . . . . . . *ALL_____________________________ *ALL, {F  
*generic*  
F3=Kv  
F5="B  
F12=!{  
< 64. 8(*&mDn?A;  
a. Zn?a>P,g{z*@z*&mDn?,rdkX(D{Fr`t{#g  
{*i4zQrdGGDyPn?DPm,k8( *ALL#  
b. 404P1|#0C PDM 49Cn?1A;vV,KA;P>zZ0;A;O  
8(Dn?#N{<65#  
C PDM 49Cn?  
(;A . . . . . . . . . . ________________________________  
dk!n,404P1|#  
2=|D  
4=>}  
5=T>  
6=r!  
12=9C  
35=T>G<  
36=r!G<  
37=XU ...  
!n n?  
__  
D>  
WEEKLY PAYROLL PROCESSING APPLICATION  
PAYROLL  
W?  
N}r|n  
===> _________________________________________________________________________  
F3=Kv  
F9=lw  
F4=a>  
F12=!{  
F5="B  
F23=d`!n  
F6=4(  
F24=d`|  
< 65. C PDM 49Cn?A;  
(}9CKA;,zIT:  
v 4(">}rXUn?  
Z16B 9C`L*"\mw5CLr 189  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
v |D"T>rr!n?E"  
v T>rr!n?DsFG<E"  
v mS"|D"}%"T>rr!XZn?C'DE"  
PXsFG<Dji,N<Z15B #$&CLr*"\mwE"#  
2. S0`L*"\mw15CLrb?,zIT9C WRKPRJPDM |n41S*A  
0C PDM 49Cn?1A;,xF}wK%M08(*&mDn?1A;#Z|n  
POdk WRKPRJPDM#  
g{404P1|,avVCA;,"T>zQTdwKGGDyPn?#bH,  
ZZ08(*&mDn?1A;O8( *ALL#g{40F4=a>1,rWHaT>  
a>#9C1!5 *PRV(8>k*9CZ0;a0P8(DZ]),*ALL"  
*generic* rdk{F,;s404P1|#ZG,0C PDM 49Cn?1A;v  
V,;T>z8(Dn?#  
Z0C PDM 49Cn?1A;O,Zk*i4|DiDn?Tdk 12(9C)#K!  
nT>Z1913D<67y>D0C PDM 49Ci1A;#  
8(i  
zITZ09Ci1A;P8(*&mDi#wCKA;D=(P}V:  
1. SwK%P,!q!n 5(9Ci)TT><66y>D08(*&mDi1A;#  
8(*&mDi  
dk!n,404P1|#  
n? . . . . . . . .  
. . . . . . . .  
PAYROLL_________________________ {F  
i
*ALL____________________________ *ALL, {F  
F3=Kv  
F5="B  
F12=!{  
< 66. 8(*&mDiA;  
a. Zn?a>P,dk|,*i4DiDn?D{F#Zia>P,g{*@k  
*9CDi,kdkX(D{Fr`t{#g{z;*@iD{F,r40F4=  
a>1Tq!n?PyPiDPm#ZKPmP,I!qk*9CDi#  
190 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
b. 404P1|#0C PDM 49Ci1A;vV,KA;P>zZ0;A;O8  
(Di#9C0F11=T>cNa914T;VX(D==T>i,ZbV==  
P,?;viD6pkn?cNa9Dd`?VDX5<+T>v4#?ji  
;ZPm%?#N{<67#  
g{zZ0;a0P9CK F11 |,r10C PDM 49Ci1A;vV1,  
iTVca9DN=J>#  
C PDM 49Ci  
n?. . . . . . . . . . . . PAYROLL_________________________  
dk!n,404P1|#  
2=|D  
25=iRV{.  
4=>}  
29=lk  
12=9C  
30=a}  
14=9(  
38=<k ...  
!n 6p  
i
MASTER  
TEST1  
DEVELOPER1  
DEVELOPER2  
TEST2  
DEVELOPER3  
__  
__  
__  
__  
__  
__  
01  
02  
03  
03  
02  
03  
W?  
N}r|n  
===> _________________________________________________________________________  
F3=Kv  
F9=lw  
F4=a>  
F10=|ndk  
F5="B  
F23=d`!n  
F6=4(  
F24=d`|  
< 67. C PDM 49CiA;  
Z0C PDM 9Ci1A;O,40F23=d`!n1ITCJBP=S!n#  
dk!n,404P1|#  
39=<v  
45=mSn?bPm ...  
< 68. 4 F23 |svVD!n  
xR,Z0C PDM 9Ci1A;O,40F24=d`|1ITCJBP=S&\|#  
4;N0F24=d`|1ITC=<69P5wD|,4=NITC=Z1923D<70  
P5wD|#  
N}r|n  
===> _________________________________________________________________________  
F11=;T>i  
F18=|D1!5  
F12=!{  
F23=d`!n  
F13=X4  
F14=T>D>  
F24=d`|  
< 69. 4;N F24 |svVD&\|  
Z16B 9C`L*"\mw5CLr 191  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
N}r|n  
===> _________________________________________________________________________  
F20=}%n?bPm  
F23=d`!n  
F21=r!Pm  
F24=d`|  
< 70. 4=N F24 |svVD&\|  
ZKA;P,zIT4PBPNq:  
v |DiE"  
v Sn?cNa9P>}i  
v 9("lk"a}"<k"<viPDyP?~rrZdPiRV{.  
2. Z1893D<65PT>D0C PDM 49Cn?1A;P,Z*i4|DiDn?T  
dk 12(9C)#0C PDM 49Ci1A;vV,KA;P>KKn?PDyP  
i#  
3. S0`L*"\mw15CLrb?,zIT9C WRKGRPPDM |n41S*A  
0C PDM 49Ci1A;#byD0,zMITF}wK%M08(*&mDi1  
A;#  
Z|nPOdk WRKGRPPDM#g{404P1|,rvVCA;,"T>|,ZzC  
JDO;vn?PDyPi#(g{bGzDZ;va0,r;\7(NNn?,  
z+SU=;ums{"#)  
g{z40F4=a>1,raWHT>a>#9C1!5 *PRV 48>k*9CZ0  
;a0P8(DZ](Y(b;GzDZ;va0),rdk{F,"404P1  
|#CA;vV,;T>z8(Di#  
Z0C PDM 49Ci1A;O,Z*i4|D?~DiTdk 12(9C)#*"_T  
{GDn?PDyPi<_PACJ(#  
9C?~  
zITZ09Ci1A;P8(*9CDi#wCKA;D=(P}V:  
1. SwK%P,!q!n 6(&m?~)TT><71y>D08(*&mD?~1A  
;#  
192 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
8(*&mD?~  
dk!n,404P1|#  
n? . . . . . . . .  
PAYROLL_________________________ {F  
DEVELOPER1______________________ {F  
i
. . . . . . . .  
`M . . . . . . . .  
*ALL______  
*ALL,`M  
*generic*  
?~ . . . . . . . . *ALL______  
*ALL,{F  
*generic*  
oT . . . . . . . . *ALL______  
?~Pm . . . . . . *NONE_____  
*ALL, *NONE  
*NONE,{F  
F3=Kv  
F5="B  
F12=!{  
< 71. 8(*&mD?~A;  
Zn?Mia>P,dk|,*D?~Dn?MiD{F#Z`M"?~MoTa  
>P,dkX({Fr`t{w**D?~D`M"?~{roT,r_dk  
*ALL(g{*i4yP?~D0)#  
Z?~Pma>P,dk?~Pm?~DX({Fr *NONE#  
g{z8( *NONE "404P1|,rvV0C PDM 49C?~1A;#N{  
g{z8(?~Pm?~DX({F"404P1|,rvV0C PDM 49C?~  
Pm?~1A;#N{Z1973D<79#  
r_,Z0C PDM 49C?~1A;P,zIT8( PL C'(e!nT*A0C  
PDM 49C?~PmPD?~1A;#  
PL WRKPARTPDM PRJ(&ZP)GRP(&ZG)TYPE(*ALL)PART(*ALL)LANG(*ALL)PLIST(&N)  
2. ZOv0C PDM 49Ci1A;P,Z*i4d?~DT_dk 12(9C)#v  
V0C PDM 49C?~1A;#  
3. S0`L*"\mw15CLrb?,zIT9C WRKPARTPDM |n41S*A  
0C PDM 49C?~1A;,xF}wK%M08(*&mD?~1A;#  
Z|nPOdk WRKPARTPDM#g{z404P1|,rCA;"4vV,"T>|  
,ZzONCJDiPDyP?~#(g{bGzDZ;va0,r;\7(NN  
n?Mi,z+SU=;ums{"#)  
g{z40F4=a>1,raWHT>a>#Zn?Mia>P,dk *PRV T8>  
*9CzZ0;a0P8(DZ](Y(b;GzDZ;va0),rdkX({  
F#Z`M"?~MoTa>P,dkX({Fr`t{w**9CD?~D`  
M"?~{roT,r_dk*ALL(g{*i4yP?~D0)#404P1|#  
ZG,vVCA;,T>|,Zz8(DiPDyP?~#  
Z16B 9C`L*"\mw5CLr 193  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
C PDM 49C?~  
0C PDM 49C?~1A;T>0|Da01!51A;O8(DQw76PfZD  
?~#g{,;?~fZZ`viP,z;\4=fZZQw76PDnMcDiP  
D?~#z;\4=0C PDM 49C?~1A;OP>D,;?~D;v1>#?~  
4TBNrP>:  
1. 4?~4`MTV83rP>#?V`MD?~4|GD?~{TV83rP>#  
2. |,?~#  
3. 9(!n?~#  
4. Qw76?~#  
5. yPd{Ts`M#  
6. C'(e`M4`MTV83rP>#  
C PDM 49C?~  
n? . . . . . . . . . PAYROLL_________________________  
8(Di . . . . . . .  
(;A . . . . . . . .  
DEVELOPER1______________________  
__________ (;A`M . . . . . . __________  
dk!n,404P1|#  
2=|D  
3=4F  
4=>}  
5=T>  
6=r!  
7=X|{  
8=T>E"  
13=|DE"  
14=9( 16=KP ...  
Opt ?~  
`M  
oT  
i
__  
__  
__  
__  
BIWKLY  
MNTHLY  
OVRTM  
WKLY  
RPGSRC  
RPGSRC  
RPGSRC  
RPGSRC  
RPG  
RPG  
RPG  
RPG  
MASTER  
MASTER  
TEST  
DEV1  
W?  
N}r|n  
===> _________________________________________________________________________  
F3=Kv  
F9=lw  
F4=a>  
F10=|ndk  
F5="B  
F23=d`!n  
F6=4(  
F24=d`|  
< 72. C PDM 49C?~A;  
Z<72P,8(Ki DEVELOPER1 MQw76 *DFT;;x,yP?~<T>*fZ  
Zi MASTER P#bm> DEVELOPER1 P10;PNN?~,+Zi MASTER P  
"VP?~,CiZi DEVELOPER1 D1!Qw76P#  
g{kC0C PDM 49C?~1A;;T>{OX(j<D?~,k40F17=S/1#  
vV0S/?~Pm1A;,g<73y>#  
194 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
S/?~Pm  
dk!n,404P1|#  
?~ . . . . . . . . *LY_______  
`M . . . . . . . . *RPGSRC___  
oT . . . . . . . . *ALL______  
*ALL,{F  
*generic*  
*ALL,`M  
*generic*  
*ALL,*NONE  
i . . . . . . . . .  
MASTER__________________________ *ALL,{F  
p<UZ . . . . . . 01/01/00  
axUZ . . . . . . 12/31/99  
ngDUZ  
nBDUZ  
D> . . . . . . . .  
*ALL__________________________________________  
_______________________  
?~Pm?~ . . . . *NONE_____  
F3=Kv F5="B F12=!{  
*NONE,{F  
< 73. S/?~PmA;  
ZK>}P,I8(;ki4`M* RPGSRC R{FTV{ LY a2";Zi  
MASTER PD?~#  
404P1|#XBvV0C PDM 49C?~1A;,VZ;T>z8(DG)?  
~#A;W?D{"8>CPmG;vOsPmDS/#N{<74#  
9ITZp<UZMaxUZa>PdkUZT9I;v1d6',T+S/^F*  
dON|DUZZK6'ZDG)?~#WN9CKA;1,1!5G 01/01/00 M  
12/31/99#zBN9C|1,+T>zZKa0Pn|9CDUZ#  
Z16B 9C`L*"\mw5CLr 195  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
C PDM 49C?~  
n? . . . . . . . . . PAYROLL_________________________  
8(Di . . . . . . .  
(;A . . . . . . . .  
MASTER__________________________  
__________ (;A`M . . . . . . . . ____________  
dk!n,404P1|#  
2=|D  
3=4F  
4=>}  
5=T>  
6=r!  
7=X|{  
8=T>E"  
13=|DE"  
14=9( 16=KP ...  
Opt ?~  
`M  
oT  
i
__  
__  
__  
BIWKLY  
MNTHLY  
WKLY  
RPGSRC  
RPGSRC  
RPGSRC  
RPG  
RPG  
RPG  
MASTER  
MASTER  
MASTER  
W?  
N}r|n  
===> _________________________________________________________________________  
F3=Kv  
F9=lw  
bG;vS//Pm#  
F4=a>  
F10=|ndk  
F5="B  
F23=d`!n  
F6=4(  
F24=d`|  
< 74. ?~PmDS/  
g{*r!?~Pm,9C0F21=r!Pm1#(f;YQzAKw5Dr!h8Dd  
vSP#r!D(fZ(fjbPxvn?Mi,"Z(fwePP>BPE":?  
~"`M"oT"i"UZMD>#  
Z0C PDM 49C?~1A;O,PBP=S!nM&\|IC#  
dk!n,404P1|#  
17=9C SDA xP|D 18=9C DFU xP|D 19=9C RLU xP|D  
25=iRV{.  
26=r!E"  
28=lv  
29=lk ...  
< 75. 4;N F23 |svVD!n  
dk!n,404P1|#  
30=a}  
39=<v 45=mSn?bPm 50=*;  
52=9CQi5I1  
54=HO  
55=O" ...  
< 76. 4=N F23 |svVD!n  
N}r|n  
===> _________________________________________________________________________  
F11=T>?~M`M  
F14=T>UZMD>  
F12=!{  
F23=d`!n  
F13=X4  
F24=d`|  
< 77. 4;N F24 |svVD&\|  
196 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
N}r|n  
===> _________________________________________________________________________  
F15=ErUZ  
F16=C'!n  
F17=S/  
F18=|D1!5  
F20=}%n?bPm  
F21=r!Pm F24=d`|  
< 78. 4=N F24 |svVD&\|  
1z9CKA;1,&\| F11"F14 M F15 XpPC#|GJmzT>XZ?~D  
;,E",gUZMD>(x;GoTMi),?~D`vP,2IT4UZr{F  
Er#  
C PDM 49C?~PmPD?~  
0C PDM 49C?~PmPD?~1A;Jmz&m8(n?MiPD?~Pm?~  
PD?~#g{8(D?~Pm?~Z8(DiPR;=,rQw1!n?cNa  
9#  
1Z08(*&mD?~1A;O8(K?~PmD{F1,avV0C PDM 49C  
?~PmPD?~1A;#KA;k0C PDM 49C?~1A;`F#zZ0C PDM  
49C?~1A;OI4PDNNYw2ITZKA;O4P#  
g{(}ZKA;OD?~0dk!n49CNN0&CLr*"\mw1|n,R  
C|n|,?~Pm (PARTL) N},raT/9Cz}Z&mD?~Pm?~D{F  
ndCN}#  
C PDM 49C?~PmPD?~  
n? . . . . . . . . . PAYROLL_________________________  
8(Di . . . . . . . DEVELOPER1______________________  
(;A . . . . . . . . ___________ (;A`M . . . . . . . . __________  
dk!n,404P1|#  
2=|D  
3=4F  
4=>}  
5=T>  
6=r!  
7=X|{  
8=T>E"  
13=|DE"  
14=9( 16=KP ...  
Opt ?~  
`M  
oT  
i
TEST1  
__  
__  
__  
__  
__  
__  
BIWKLY  
BIWKL2  
MNTHL2  
OVRT2  
WKL2  
PAY000001  
RPGSRC  
RPGSRC  
RPGSRC  
RPGSRC  
RPGSRC  
PARTL  
RPG  
RPG  
RPG  
RPG  
RPG  
DEVELOPER1  
MASTER  
MASTER  
MASTER  
DEVELOPER1  
*NONE  
W?  
N}r|n  
===> _________________________________________________________________________  
F3=Kv  
F9=lw  
F4=a>  
F10=|ndk  
F5="B  
F23=d`!n  
F6=4(  
F24=d`|  
< 79. 0C PDM 49C?~PmPD?~1A;  
"b,T>r"B0C PDM 49C?~PmPD?~1A;yhD1dO$##V?  
~PmrLITuLbN1d#  
Z16B 9C`L*"\mw5CLr 197  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
*"?~  
>Za);vy>=8,|8<zjI;)IT9C0`L*"\mw15CLr4  
PDYw:  
v lv?~  
v |D?~  
v 4F?~  
v X|{?~  
v *;?~  
v HO?~  
v O"?~  
v >}?~  
v 9(?~  
v bT?~  
v lk?~  
v Z?~PiRV{.  
v 9CQi5I1  
v a}?~  
v |Da01!5  
v 4(M9CC'(e!n  
K>}Y(z}ZZ1943D<72y>D0C PDM 49C?~1A;P$w,"RzT  
i DEVELOPER1 M DEVELOPER2 _P|BCJ(#z+*9CDDv?~{*  
RPGSRC BIWKLY"RPGSRC MNTHLY"RPGSRC WKLY M RPGSRC OVRTM#|  
GfZZ<80y>Dn?cNa9PDi MASTER P#  
*ZzT:D$w>O4PK&hvDYw,k9Cn?PDJ1?~Mi#  
MASTER  
MASTER  
RPGSRC BIWKLY  
RPGSRC MNTHLY  
RPGSRC WKLY  
RPGSRC OVRTM  
MASTER  
TEST  
MASTER  
DEVELOPER1  
MASTER  
DEVELOPER2  
< 80. y>=8P9CDn?cNa9  
198 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
lv?~  
Z+?~lv*"i.0,zI\kTdliT7#|G}7D#*K,Zd{FT  
_dk!n 5(T>)#  
ZK>}P,z+?~ RPGSRC BIWKLY lvAi DEVELOPER1#bMGXkZ8  
(DiVNP8(Di#Zd{FT_dk 28(lv)#VZ,A;T>}Z+K?~  
lvA DEVELOPER1,xRA;W?vV;u{",T7OKYw#(N{<81#)V  
Z,C?~Qx(AzDC'r*mMi#  
C PDM 49C?~  
n? . . . . . . . . . PAYROLL_________________________  
8(Di . . . . . . . DEVELOPER1______________________  
(;A . . . . . . . . __________ (;A`M . . . . . . . . ____________  
dk!n,404P1|#  
3=4F  
2=|D  
4=>}  
5=T>  
6=r!  
7=X|{  
8=T>E"  
13=|DE"  
14=9( 16=KP ...  
Opt ?~  
`M  
oT  
i
__  
__  
__  
BIWKLY  
MNTHLY  
OVRTY  
WKLY  
RPGSRC  
RPGSRC  
RPGSRC  
RPGSRC  
RPG  
RPG  
RPG  
RPG  
DEVELOPER1  
MASTER  
MASTER  
MASTER  
W?  
N}r|n  
===> ________________________________________________________________________  
F3=Kv  
F9=lw  
F4=a>  
F10=|ndk  
F5="B  
F23=d`!n  
F6=4(  
F24=d`|  
QTzlv?~ BIWKLY#  
< 81. C PDM 49C?~A;  
|D?~  
Z?~ BIWKLY RPGSRC T_dk 2(|D)T|D|#g{P4TzlvC?~,  
r+a"LxPKYw#r*C?~QZ8(DiP,yT;4P4F#  
r*C?~G4?~,yT,zaxk SEU `-a0#ZzjI|D"xP#f.s,  
XBvV0C PDM 49C?~1A;,"T>;u{",8>QI&X|DC?~#  
g{*|DD?~;G4?~,raT>J1D AS/400 |D|n,x;G SEU a0#  
g{;9C!n 2,rI9C!n 17"18 r 19 4(}9C SDA"DFU r RLU 4  
|D?~:  
v g{C?~D`M* DDSSRC,RoTtT* DSPF,r9C!n 17(9C SDA x  
P|D)  
v g{C?~G;v}]D~,r9C!n 18(9C DFU xP|D)  
v g{C?~D`M* DDSSRC,RoTtT* PRTF,r9C!n 19(9C RLU x  
P|D)  
Z16B 9C`L*"\mw5CLr 199  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
4F?~  
*+?~ BIWKLY Si DEVELOPER1 4FAi DEVELOPER2,kZ|DT_dk  
3(4F)#vV04F?~1A;,g<82y>#  
4F?~  
4n? . . . . . . . . : PAYROLL  
4i . . . . . . . . . : DEVELOPER1  
dkn?Mi{TSU4FD?~#  
?jn? . . . . . . . PAYROLL_________________________  
?ji . . . . . . . . developer2______________________  
*X|{4FD?~,dk0B?~1,"404P1|#  
?~  
BIWKLY  
`M  
RPGSRC  
B?~  
biwkly2___ RPGSRC____  
B`M  
W?  
F3=Kv  
F5="B  
F12=!{  
F19=a;Az&m  
< 82. 8(K0BiM?~1D04F?~1A;  
?jn?M?jia>D1!5MGzZ4n?M4ia>P4=D5#g{*+?  
~4FAm;virn?,k|Db)VNPDE"#zXkT}Zrd4F?~D  
i_P|BCJ(#  
?~M`MVNj6}Z4FD?~#B?~MB`MVND1!5MGzZ?~M  
`MVNP4=D5#g{*T4FD?~X|{rTd8(m;`M,k|Db)  
VNPDE"#  
Z<82P,?jia>QI DEVELOPER1 |D* developer2,xB?~a>QI  
BIWKLY |D* BIWKLY2#404P1|#4F"X|{C?~#  
A;W?vV;uE",8>4FYwGqI&#g{z"T4FD?~QfZZw  
*4F?jDiDa}76P,"R;PTd8(B{F,r4F+'\#NN4\  
4FD?~<+T4W;vT>#  
X|{?~  
Z0C PDM 49C?~1A;O,Z*Z,;vn?MiPX|{D?~Tdk 7  
(X|{)#  
0X|{?~1A;P>*X|{D?~#ZB?~VNPdkB{F,"404  
P1|#zXkT|,}ZX|{D?~Di_P|BCJ(#  
*;?~  
Z**;D?~T_dk 50(*;?~)#  
200 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
0*;?~1A;P>**;D?~#r*;\*;,;vn?MiPD?~`M,  
yTz;\|Dn?MiVNPDE"#Z?j`MVNPdkB`M{,"404  
P1|#*;C?~,"X|{d`M#  
HO?~  
Z0C PDM 49C?~1A;O,Z*HOD?~T_dk 54(HO?~)#  
0HO?~1(CMPPART) A;Jmz8(*HODI?~Di"`MM?~{#z9  
IT8(HO1*9CDwV!n#HOa{;EZ;v(fP,zITZ$w>O  
T>C(f,2IT+dYQzAr!h8#  
O"?~  
Z0C PDM 49C?~1A;O,Z*w*O"?jD?~T_dk 55(O"?  
~)#  
0O"?~1(MRGPART) A;Jmz8(*O"D,$i",$`M",$?~"y  
i"y`MMy?~#  
>}?~  
Y(z4FD?~;T#Z BIWKLY2 T_dk 4(>})T>}|#vV07O>}  
?~1A;,g<83y>#  
7O>}?~  
n? . . . . . . . : PAYROLL  
i
. . . . . . . . :  
DEVELOPER2  
404P1|T7OzT0>}1D!q#  
40F12=!{15X,T|DzD!q#  
?~  
BIWKLY2  
`M  
RPGSRC  
oT  
RPG  
i
DEVELOPER2  
W?  
F12=!{  
F19=a;Az&m  
< 83. 7O>}?~A;  
KA;P>zQ8>*>}D?~#404P1|T>}C?~,r40F12=!{1#  
g{}Z>}m`v?~,rI9C0F19=a;Az&m1T+yP>}Ywa;A  
`vz&mw5#bJmzZ>}?~14Pd{Nq#  
Z16B 9C`L*"\mw5CLr 201  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
9(?~  
Z*9(D?~Tdk 14(9()#  
g{}ZTvv;v?~xP`N|D,"Rz;k`k`X?~,rZ0C PDM 4  
9C?~1A;O40F18=|D1!51T*A0|D1!51A;,;s+9(6  
'a>|D*02=\^1,x;G9C1!5(1=}#)#PXji,N{Z2043D  
Z9(?~.s,zITli9((fTq!9(/f{"(g{PD0)#Z1363  
D<49PhvK9((f#=<E. 9((f{"P>K9({"#  
bT?~  
ZI&9(?~.s,z&TdxPbT#I9C ADDPRJLIBL |n+n?Dwvb  
mSAa0bPmDC'?VD*7#PX ADDPRJLIBL |nDhv,N{Z1573D  
!n 16(KP)+KPC?~#K!nT`M* PGM"REXXSRC M CMD D?~  
P'#  
zIT9CZ AS/400 bPmPmSr}%n?bD=vC'(e!n#PXb=v!  
nDhv,N{Z2083D:mSM}%n?b;#09Ci1M09C?~1A;P  
D!n 45(mSn?bPm)M!n 20(}%n?bPm)CZZbPmPmSr}  
%n?b#  
lk?~  
ZI&X4(r|D?~,9(?~MKP?~.s,z+XB+dlk,T9dI  
)T`,i_P|BCJ(Dd{*"_9C#*+dlk,kZ|D{FT_dk 29  
(lk)#zSU=;u{",8>QI&Xlk?~#  
a}?~  
Zz9Cj?~.s,kdk 30(a})T+da}An?cNa9PDB;|_6p  
Di#  
zSU=;u{",8>QI&Xa}C?~,"R,iVN|B*T>C?~?0  
y$tDiD{F#g{P4lkC?~,raZa}C?~.0T/jIKYw#  
Z?~PiRV{.  
0iRV{.?~1(FNDSTRPART) |nJmzZ0&CLr*"\mw1?~PQw  
|,4rD~}]DV{r.yxFV{.#g{R=CV{.D%dn,rzIT  
TC?~9CNN0`L*"\mw1!nrzT:DC'(e!n. ;#  
FNDSTRPART |nk0iRV{. PDM1(FNDSTRPDM) |n`F;;x,;\(  
}0C PDM 49Ci1M0C PDM 49C?~1A;49C|#  
zITSb=vA;P9C!n025=iRV{.1,2ITS0`L*"\mw15  
CLrb?9C FNDSTRPART |n#Z09Ci1A;P,Qw8(iPDyP?  
~#Z09C?~1A;P,;Qw8(D?~#zZ0|D1!51A;OD(h  
202 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
cNa9a>O8(D57(GqQwn?cNa9#i4Z2043D:|Da01!  
5;Tq!(hcNa9a>5#(PX FNDSTRPDM |nDji,N{ ADTS/400:  
Programming Development Manager#)  
>}  
TB|nZn? PAYROLL PSi DEVELOPER1 *<ZyP`MDyP?~PDP  
2 A 4 PQwV{. 'ADDR'#R=CV{.1,a> CHECKOUT |n,TczI  
T`-|, 'ADDR' D?~#r!|,CV{.D?~DPm#|,CV{.D7=v  
G<TV{q=r!#;jGCV{.#g{G<D$H,}PD$H,ra+G<  
XO#  
FNDSTRPART STRING('ADDR')PRJ(PAYROLL)GRP(DEVELOPER1)TYPE(*ALL)  
PART(*ALL)OPTION(*CHG *PROMPT)COL(2 4)PRTPARTLST(*YES)  
PRTRCDS(2 *CHAR *NOMARK *TRUNCATE)SCAN(*YES)  
*q!0iRV{.1A;OD?va>r FNDSTRPART |nOD?vVNDj85  
w:  
v Z0iRV{.1A;O,ZzkKbXZdE"DNNA;xrO,40F1=o  
z1  
v a> FNDSTRPART |n(F4=a>),"ZzkKbXZdE"DA;xrO4  
0F1=oz1  
9Ci5I1  
Z0C PDM 49C?~1A;O,Z*9CD4?~T_dk 52(9Ci5I1)#  
0C PDM 49CI11A; (Z2043D<84) P>C?~Di5I1#b)I1GZ  
|DK?~"+K?~<kKir+da}AKi18(K ARCHIVE(*YES) DivB  
4(D#  
*V4rXvi5I1,kZ*XvD?~T_dk IM(<k?~)#  
Z16B 9C`L*"\mw5CLr 203  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
C PDM 49CI1  
D~ . . . . . .  
. . . . . .  
BIWKLY____  
PAY_TST1___  
b
(;A . . . . . . . . ___________  
dk!n,404P1|#  
2=`-  
8=T>hv  
3=4F 4=>} 5=T>  
9=#f 13=|DD> 14=`k  
6=r!  
15=4(#i...  
7=X|{  
!n I1  
__  
`M  
D>  
"archive1" __________ _________________________________________________  
W?  
N}r|n  
===> _________________________________________________________________________  
F3=Kv  
F9=lw  
F4=a>  
F10=|ndk  
F5="B  
F23=d`!n  
F6=4(  
F24=d`|  
< 84. C PDM 49CI1A;  
": g{zZ9Ci5I11|DKNNa01!5,r;aGBG)BD|D#1  
z5XA0C PDM 49C?~1A;1,a01!5kzdk!n 52(9CQi  
5I1).0D1!5;PNN;,#  
|Da01!5  
>Zhv0|D1!51A;OD0(hcNa91"0Qw761"0"B?~P  
m1M0;T>4?~1a>#|GJmz8>Gq&CZn?cNa9PQw?  
~"C4iRC?~DQw76T0*C49(?~D9(6'#*|D|G,zX  
k|Da01!5#  
9C0C PDM 49C?~1A;OD0F18=|D1!51*A0|D1!51A;,  
204 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
|D1!5  
dk!n,404P1|#  
Tsb . . . . . . . . . . . *SRCLIB___ {F,*CURLIB,*SRCLIB  
f;Ts . . . . . . . . . .  
z&m`k . . . . . . . . .  
z&mKP . . . . . . . . .  
#fa01!5 . . . . . . .  
#f/V4!n . . . . . . .  
N
Y
N
Y
1
Y=G,N=q  
Y=G,N=q  
Y=G,N=q  
Y=G,N=q  
1=%v,2=+?  
w5hv . . . . . . . . . . QBATCH____ {F,*USRPRF,4 F4 Tq!Pm  
b . . . . . . . . . . . .  
|D`MMD> . . . . . . .  
*LIBL_____ {F,*CURLIB,*LIBL  
Y=G,N=q  
Y
!nD~ . . . . . . . . . . TESTFILE__ {F  
b . . . . . . . . . . . .  
*LIBL_____ {F,*CURLIB,*LIBL  
I1 . . . . . . . . . . . . TESTMBR___ {F  
+A;== . . . . . . . . .  
(hcNa9 . . . . . . . .  
N
Y
Y=G,N=q  
Y=G,N=q  
Qw76 . . . . . . . . . . *DFT______ {F,*DFT  
9(6' . . . . . . . . . .  
2
1=}#,2=\^,3=)9,  
4=1S4  
PP...  
F3=Kv  
F4=a>  
F5="B  
F12=!{  
< 85. |D1!5A;-Z 1 ?V  
|D1!5  
dk!n,404P1|#  
G<!n|n . . . . . . . .  
404P1|1KvPm . . .  
"B?~Pm . . . . . . . .  
;T>4?~ . . . . . . . .  
N
Y
Y
Y
Y=G,N=q  
Y=G,N=q  
Y=G,N=q  
Y=G,N=q  
< 86. |D1!5A;-Z 2 ?V  
TBPmhv0|D1!51A;OD(hcNa9"Qw76M9(6'a>#(  
hcNa9MQw76a>5IwCxP SCAN M SCHPTH N}D|nDNN!n9  
C#i4Z1033D:gN&mQw76?~;Tq!(hMQw76N}gNdO$  
wTQw?~D5w#  
zZA;O!q9CQw76D!n1,+7OQw76a>P8(D5#zI\h  
*kT}Z4PDX(Nq|DC5#  
(hcNa9  
K57(D)?~vVZ0C PDM 49C?~1A;O,T0D)ivVZ  
0C PDM 49Ci1A;O#zZb)A;O!qDwV!n29CK5#  
1!5G0Y=G1,bm>Z1!Qw76PDiPQw?~#  
0N=q18(;Qw8(Di#  
Qw76  
K57(0&CLr*"\mw1!n9CDQw76"T>8(Qw76D  
iP|,D?~#1!5G *DFT,z2IT8(Qw76?~D{F#  
Z16B 9C`L*"\mw5CLr 205  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
g{8(X(Qw76,rITi4^((}1!Qw76a)D?~f>#  
g{z#{9C SCHPTH QDFT ?~P8(DQw764iR?~,rXkZ  
Ka>O8( QDFT#g{ZKa>O8( *DFT,RP;v SCHPTH QDFT  
fZZcNa9P,r;a9C|47(0C PDM 49C?~1M0C PDM  
49C?~PmPD?~1A;D?~Pm#;x,yP0&CLr*"\m  
w1?~*"|n<9C SCHPTH QDFT#  
g{8(gn?4PQwDQw76?~,r0`L*"\mw15CLrv  
T;tZQw76P8(Dn?DNNi#TZ0C PDM 49C?~1M0C  
PDM 49C?~PmPD?~1A;OP>D?~,1ZKA;O|DQw7  
651,|GaT/"B#  
8(DQw76";7(0C PDM 49Ci1A;OT>DiPm#  
9(6'  
1!5G01=}#1#Ka>k BLDPART |nODSCOPE N}`T&#9(  
8(D?~"9(|y@5DyPd{?~"9(G)?~y@5D?~,H  
H#  
"B?~Pm  
Ka>8(Z&m0&m?~1A;OD!n.sGq"B?~Pm#}g,  
g{ZKa>O8(0Y=G1,"ST>D?~PmP>}K;v?~,r  
?~PmaYNT>,"R;PQ>}D?~#  
0Y=G18(Z&m0&m?~1A;OD!n.sh"B?~Pm#  
0N=q18(Z&m0&m?~1A;OD!n.s;"B?~Pm#  
;T>4?~  
Ka>8(G+8(n?MiPDyP?~<T>Z?~PmP9G;+8(  
n?MiPD4?~T>Z?~PmP#  
0Y=G18(;+8(n?MiPD4?~T>Z?~PmP#  
0N=q18(+8(n?MiPDyP?~T>Z?~PmP#  
}G9CC'(e!n,qrTsb"f;TsM|D`MMD>a>;vT#;  
x,^[zGq}Z9C0&CLr*"\mw1&\?~,yP1!5<ITf1  
|D#  
C'(e!n  
}KA;OD!n.b,zIT4(zT:D!n,4C'(e!n#b)!nJm  
zr%X(}ZA;Odk;v!n44Pz514PDYw,rxG#PC#  
z!qD*kC'(e!n`T&D|nITGNN AS/400 53rC'|n#|IT  
|,N}d?,TcITTPmPDn4PC|n#b9z;X8((k|n`T&  
D)!n"a>!nM*N}8(5;|9Jmz4PzTPmPDn!qD|n#  
4(C'(e!n  
TB>}4(;v{* EP DC'(e!n,C!nwC;v{* EDITPART D CL  
Lr#bMGZ873D:lw?~E" (RTVPARTINF);PD CL Lr#CLrlv;  
v?~"lw`-C?~yXhD AS/400 E""t/`-w,;sY+C?~lk#  
206 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z4(KC'(e!n.s,zMIS0&m?~1A;P9C|:  
1. g{zZ0C PDM 49C?~1A;O,k40F16=9CC'!n1T*A09  
CC'(e!n1A;#g{zZwK%O,k!q!n 9(9CC'(e!n)T  
T>08(*9CD!nD~1A;#8(*9CD!nD~,"404P1|#  
2. Z09CC'(e!n1A;O40F6=4(1#vV04(C'(e!n1A;,  
g<87y>#  
4(C'(e!n  
dk!nM|n,404P1|#  
!n . . . . . . . . . .  
__ *4(D!n  
|n . . . . . . . . . . __________________________________________________  
_________________________________________________________________________________  
_________________________________________________________________________________  
__________________________________________  
F3=Kv  
F4=a>  
F12=!{  
< 87. 4(C'(e!nA;  
3. Z!na>P,dkm>k*CB!nwCD|nD 1 r 2 vV{#Z;vV{X  
kGV8;Z~vV{ITGV8r}V#  
TZK>},Z!na>Pdk EP#  
4. Z|na>P,kdk*Z EP !n;!P1*wCD|n#g{zG;!|nD}  
7{F,k40F4=a>1TT>;vK%,CK%JmzT>yP53|nrX  
(`MD|n#g{z*@|nD{F,+k*i4dN},rdk|n{,"4  
0F4=a>1i4da>A;#  
TZK>},Z|na>PdkTB|n#  
CALL EDITPART (&ZP &ZG &ZT &ZN)  
K|n+wCZ873D:lw?~E" (RTVPARTINF);PD EDITPART CL L  
r#  
f;d?bvgB:  
&ZP  
n?D{F  
&ZG iD{F  
&ZT  
&ZN  
?~D`M  
?~D{F  
Z16B 9C`L*"\mw5CLr 207  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
z2IT9C%V{f;d? &A"&B"&D"&F"&L"&N"&O"&R"&S"&T M  
&X 44(C'(e!n#|Gbv*k09C1A;OP>D0&CLr*"\mw1  
n?"ir?~`T&D AS/400 TsrI1#bJmz9C10DC'(e!n44  
P0&CLr*"\mw1&\#i4=<D. f;d?Tq!yPf;d?Dhv#  
9CC'(e!n  
<k OS/400 Tsr4I1  
IO(<kTs)M IM(<kI1)b=vI53a)DC'(e!nITozz+  
OS/400 Ts<k0&CLr*"\mw1n?cNa9,ZCcNa9P,|Gd*?  
~#(}+b)!nk 0F13=X41dO9C,;NIT<km`Ts#IO M IM !  
n|(Zb QPDA PI53a)DC'(e!nD~ QAUOUSR P#  
S09CTs1A;9C IO#  
IO IMPPART OBJ(&L/&N)OBJTYPE(&T)TYPE(&S)PART(&N)TEXT(&X)  
S09CI11A;9C IM#  
IM  
IMPPART OBJ(&L/&F)OBJTYPE(*FILE)MBR(&N)PART(&N)LANG(&S)TEXT(&X)  
1z!qdP;v!n1,avV;va>,zITZCa>Odkn?{"i"`  
MT0 IMPPART |nh*Dd{E"#  
09Ci1A;PD0!n 381(<k)a)k IM M IO C'(e!n`,D&\#  
mSM}%n?b  
mb=vI53a)DC'(e!nG AP M RP#|GC4ZzbT?~1ZbPm  
PmSM}%n?b#AP M RP !nDb[*:  
AP ADDPRJLIBL PRJ(&ZP)GRP(&ZG)SCAN(&ZH)SCHPTH(&ZS)  
RP RMVPRJLIBL  
*9C|G:  
1. ZPmPDNN?~T_dk AP#  
(}9C ADDPRJLIBL |n,+Qw76PDn?bmSAbPm#  
2. 9C 16(KP)!n4KP?~#1C?~jI1,5XA0C PDM 49C?~1  
A;#  
3. ZPmPDNN?~T_dk RP#  
(}9C RMVPRJLIBL |n,SbPmP}%n?b#  
0&m?~1A;OD!n 45(mSn?bPm)M0F20=}%n?bPm1Vp  
a)k AP M RP `,D&\#  
208 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z17B 9C VisualAge RPG ?~  
0&CLr*"\mw1&\?~JmZ0&CLr*"\mw1n?Pf"M\m  
VisualAge RPG &CLr#*K,a)K=V?~`M:VRPGTXT M VRPGBIN#  
VRPGTXT ?~`Mf"Z4omD~P#C?~`MDoT+G VRPG#0&CLr  
*"\mw1&\?~+QK?~S*%;5e#VisualAge RPG D>TsGw*I1  
f"D,dI1`MhC*|GD$w>D~)9{#  
VRPGBIN ?~`Mf"Z}]D~P#C?~`MDoT+G VRPG#K?~`M+  
|( VisualAge RPG ~xFTs#  
BP0&CLr*"\mw1?~*"|n'Vb)?~`M:  
|D?~ (CHGPART)  
|D?~E" (CHGPARTINF)  
lk?~ (CHKINPART)  
lv?~ (CHKOUTPART)  
HO?~ (CMPPART)  
4F?~ (CPYPART)  
>}?~ (DLTPART)  
T>?~ (DSPPART)  
<v?~ (EXPPART)  
<k?~ (IMPPART)  
r!?~E" (PRTPARTINF)  
a}?~ (PRMPART)  
i/?~ (QRYPART)  
XUn? (RCLPRJ)  
lw?~E" (RTVPARTINF)  
BP0&CLr*"\mw1?~*"|n;'V VRPGTXT ?~`M:  
O"?~ (MRGPART)  
d;_T\D~53 (HPFS) OD?<(r VisualAge RPG TsDi~{)I\G#  
$,+Z0&CLr*"\mw173P,;Jm$H* 10 vV{D?~{#  
VisualAge RPG C'IT9C?~D>VN4f"d{E"#  
i4DW?<Tq! VisualAge RPG vfoDPm#  
<k VisualAge RPG ?~  
Z0&CLr*"\mw1P4( VisualAge RPG ?~D(;=(G9C IMPPART |  
n#*<k VisualAge RPG ?~,XkZ IMPPART |nD TYPE N}O8(  
VRPGBIN r VRPGTXT#bGXhD,-rG IMPPART |nZ}#ivB+4D~  
PDvpI1w*?~<k#d; VRPGTXT ?~f"Z4D~P,+|aw*%;5  
e<k#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
209  
 
*<k VisualAge RPG ?~,h*9C0VisualAge RPG M'z1&\?~+  
VisualAge RPG n?D;vi~#f= iSeries 400 53ODbP#zIT9C QTEMP  
b(g{zkY1#fD0)#;s,zIT"vxP REPLACE(*YES) D IMPPART  
|n4%@X<kyP VisualAge RPG 4M~xFTs#<k&\+lv?~(g{  
PX*D0),;sXB+|Glk#g{3v?~;fZ,<k&\+T/4(C  
?~#  
IZ VisualAge RPG &\?~)SD^F,zZ<k VisualAge RPG ?~1,;\|  
D|GD{F#  
<v VisualAge RPG ?~  
g{*Z$w>OV4 VARPG n?TxPi4r|D,rXkWH+J1D  
VRPGTXT M VRPGBIN ?~<v=;vbP#I+ QTEMP bCw EXPPART |n  
OD?jb#;s,I9C VisualAge RPG &\?~4Z$w>OV4 VARPG ?~#  
g{;Gki4 VARPG n?,r;h*Z"v EXPPART |n.0lvb)?~#  
;x,g{zF.|D?~,rXkZ"v EXPPART |n.0lv?~#  
9( VisualAge RPG ?~  
*9( VisualAge RPG ?~,k4PBP=h:  
1. lv VisualAge RPG ?~  
2. <v?~  
3. +?~V4A$w>  
4. wC VisualAge RPG <NC'gf (GUI) 49(?~  
5. +?~#fAwz  
|
6. +-}|DD?~<k=0&CLr*"\mw1n?P,"8( REPLACE(*YES)  
7. XB+?~lk  
g{Ofa=DNN=h'\,r9( VisualAge RPG ?~2a'\#  
VisualAge RPG ?~*"  
*,$ VisualAge RPG ?~Dj{T,&,1|B VRPGTXT ?~0d`X*D  
VRPGBIN ?~#bm>z&1<U,1lv"9("<vr<k VRPGTXT ?~0d  
`X*D VRPGBIN ?~#  
g{z>}K;v VisualAge RPG ?~,kGC9*>}|D`X?~#}g,g{  
z>} VRPGBIN ?~,r9Xk>} VRPGTXT ?~,4.`;#  
210 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
Z18B 9C System/36 M System/38 &CLr  
>Bhv:  
v 9C System/36 &CLr  
v 9( System/36 &CLr  
v System/38 &CLrD"bBn  
9C System/36 &CLr  
0&CLr*"\mw1&\?~1S'V System/36 &CLr#zIT9Cm19PT  
>D System/36 ?~`M,2IT(ezT:D?~`M#  
m 19. System/36 ?~`MMoT  
System/36 ?~`M  
CBL36INC  
oT  
CBL36  
CBL36  
DSPF36  
MNU36  
MSGF36  
OCL36  
RPG36  
RPG36  
RPT36  
SRT36  
TXT36  
CBL36SRC  
DSPF36SRC  
MNU36SRC  
MSGF36SRC  
OCL36SRC  
RPG36INC  
RPG36SRC  
RPT36SRC  
SRT36SRC  
TXT36SRC  
PXJmZ TYPE N}O8( System/36 ?~`MD|nDhv,N{Z2153D:=  
zXk+OmP4a0DyP System/36 oTD?~`M(g BAS36)(e*C'(  
e?~`M#  
?~`M *PGM IdO?~oT CBL36 M RPG36 9C#  
TB0&CLr*"\mw1|nZ LANG N}O'V System/36 oT:  
CHGPARTINF  
CRTPART  
EXPPART  
IMPPART  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
211  
 
9( System/36 &CLr  
;\9C BLDPART |n9( System/36 Ts,bGr* System/36 `kw;a5X  
9(}LyhDE"#  
*9( System/36 &CLr,4PBP=h:  
1. 9C ADDPRJLIBL |nhCbPm#  
2. 9C!1D`kw|n4`k4?~#*K,z+h*8(*9(D4?~D+^  
(>z{#IZ CL LrP9C RTVPARTINF |n,rZ WRKPARTPDM A;  
O9CC'(e!n4lwKE"#  
3. XkZ0&CLr*"\mw1XF6'.bDbP4(dvTs#  
4. 9Cx REPLACE(*YES) D IMPPART |n+dvTs<kn?P#  
5. 9C RMVPRJLIBL 4V4bPm#  
System/38 &CLrD"bBn  
d;,0&CLr*"\mw1&\?~;\1S'V System/38 &CLr,+G,z  
I(}9CC'(eD?~`M4\mb)&CLr#;)(eKb)`M,MI{  
C0&CLr*"\mw1&\?~D|D\mMf>XF&\#  
} BLDPART |nb,yPd{0&CLr*"\mw1?~|n<ICZf"Z_P  
C'(e?~`MD?~PD System/38 4#  
r* System/38 `kw4*0&CLr*"\mw1&\?~a)9(X5E",yT  
z+;\1S9C BLDPART |n9(b)&CLr#  
212 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
=<A. &CLr*"\mwXFoT|n  
IZ OS/400 |nPP9CyP0&CLr*"\mw1XFoT (CL) |n#"R,  
9I(}ZBPdP;v PDM A;O!q!nr4&\|49Cb)|nPDm`|  
n:  
C PDM 49Cn?  
C PDM 49Ci  
C PDM 49C?~  
m20P>KyP0&CLr*"\mw1 CL |n#PX9C PDM A;DE",N{  
m 20. &CLr*"\mw CL |n  
CL |n  
hv  
ADDADMLANG¹ mSC'(e`MDoT  
ADDADMTYPE¹ mSC'(e`M  
ADDPRJLIBL  
ADDPRJUSR²  
BLDPART  
+n?bmSA AS/400 bPm  
Zh*"_r\m1T8(n?D(^  
9(?~  
CHGADMACN¹  
|DC'(e`MDYw(e  
CHGADMLANG¹ |DC'(e`MDoT  
CHGGRP²  
|DiDXw  
CHGPART³  
CHGPARTINF  
CHGPRJ²  
|DVfD?~  
|DPXVf?~DE"  
|Dn?DXw  
CHGPRJUSR²  
CHKINPART  
CHKOUTPART  
|DTn?_P(^D*"_r\m1DXw  
MElvD?~"9|I)d{*"_9C  
+?~4FA*"i(g{|;fZZ*"iPD0),"x(|T@9d  
{*"_CJ|  
CMPPART  
CPYPART  
CRTGRP²  
CRTPART  
CRTPRJ  
HO=vr`v?~  
4(yZVf?~DB?~  
4(Bi  
4(B?~  
4(n?  
CVTPART  
DLTGRP²  
DLTPART  
DLTPRJ²  
+?~`MMoT*;*m;?~`MMoT  
>}i0dZ]  
S8(DiP>}?~  
>}n?0dZ]  
DSPPART  
EXPPART  
FNDSTRPART  
T>?~DZ]rXw  
+?~Sn?cNa94F= OS/400 bP  
Z;v?~r;i?~PiRX(V{.  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
213  
 
m 20. &CLr*"\mw CL |n (x)  
CL |n  
hv  
IMPPART  
4F OS/400 I1rTs"+|w*0&CLr*"\mw1?~f"Zn  
?cNa9P  
MRGPART  
PRMPART  
PRTADMLANG  
PRTADMTYPE  
PRTPARTINF  
PRTPRJ  
O"T;vr`v?~yvD=i|B#  
+?~a}AcNa9PDB;i  
r!C'(e`MDoTE"  
r!PXC'(e`MDE"  
r!PXX(?~DE"  
r!PXn?DE"  
PRTPRJLOG  
PRTPRJUSR  
QRYPART  
QRYPRJ  
r!n?sFG<DZ]  
r!n?DZ(*"_M\m1DPm  
i/?~  
i/n?  
RCLPRJ²  
ZV4Yw.srZ53JO.sXUn?  
S6L53SUkV?~  
RCVPART  
RMVADMLANG¹ }%C'(e`MDoT  
RMVADMTYPE¹ }%C'(e`M  
RMVPRJLIBL  
RMVPRJUSR²  
RNMPART  
S OS/400 bPmP}%n?b  
Sn?P}%*"_r\m1  
X|{?~  
RTVPARTINF⁴  
WRKGRPPDM³  
lwX(0&CLr*"\mw1?~D OS/400 I1rTs{  
C PDM 49CiPm  
WRKPARTPDM³ C PDM 49C?~Pm  
WRKPRJPDM³  
"b:  
C PDM 49Cn?Pm  
1. ADDADMLANG"ADDADMTYPE"CHGADMACN"CHGADMLANG"RMVADMLANG M  
RMVADMTYPE |nh* *ALLOBJ (^#  
2.  
ADDPRJUSR"CHGGRP"CHGPRJ"CHGPRJUSR"CRTGRP"DLTGRP"DLTPRJ"RCLPRJ M  
RMVPRJUSR |nvI)n?\m19C#  
3. ;\Z;%=73P&mK|n,1Z|ndka>OdkrS QCMDEXC PwCK|n1,  
|w* CL LrD;?Vr REXX }LD;?VS\&m#  
4. Zz&mr;%=73P,K|nvw* CL Lrr REXX }LD?~KP#  
214 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
=<B. ?~`MT0|Gk|nDX5  
9CBPwm47(IT|, TYPE N}D0&CLr*"\mw1|n8( \0&  
CLr*"\mw1'VD`M(y=G,I8(,<blank>=q,;\8()#  
m 21. &CLr*"\mw`MT0|Gk CL |nDX5(2 8 ?V,Z 1 ?V)  
|n  
RPGSRC  
RPGLESRC RPGINC  
RPGLEINC CBLSRC  
CBLLESRC CBLINC  
BLDPART  
CHGPART  
CHGPARTINF  
CHKINPART  
CHKOUTPART  
CMPPART  
CPYPART  
CRTPART  
CVTPART  
DLTPART  
DSPPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y¹  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y¹  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
EXPPART  
FNDSTRPART²  
IMPPART  
MRGPART  
PRMPART³  
PRTPARTINF  
QRYPART  
RNMPART  
RTVPARTINF  
WRKPARTPDM  
"b:  
BPwnJCZmPP>D?~`M:  
1. ";5JX9({"D~M|,?~,+z}Z9(D?~IT}C|G#TZ`M* BNDDIR D?~,iv2Gb  
y;;x,g{zZ BLDPART |nO8( SCOPE(*EXTENDED),rIT9(|G#PXji,N{Z1293D:h  
2. FNDSTRPART |nTf"Z4D~PDI53a)D`MrC'(e`MP',"T FILE(PF) ?~P'#  
3. ;c54,g{Z PRMPART |nO8( EXTEND(*YES),rITa}Ts#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
215  
 
m 22. &CLr*"\mw`MT0|Gk CL |nDX5(2 8 ?V,Z 2 ?V)  
|n  
C S R C  
(CLE)  
CBLLEINC CSRC (C)  
CINC (C)  
CINC (CLE) CMDSRC  
CLSRC  
BLDPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
CHGPART  
CHGPARTINF  
CHKINPART  
CHKOUTPART  
CMPPART  
CPYPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
CRTPART  
CVTPART  
DLTPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
DSPPART  
EXPPART  
FNDSTRPART¹  
IMPPART  
MRGPART  
PRMPART²  
PRTPARTINF  
QRYPART  
RNMPART  
RTVPARTINF  
WRKPARTPDM  
"b:  
BPwnJCZmPP>D?~`M:  
1. FNDSTRPART |nTf"Z4D~PDI53a)D`MrC'(e`MP',"T FILE(PF) ?~P'#  
2. ;c54,g{Z PRMPART |nO8( EXTEND(*YES),rITa}Ts#  
216 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 23. &CLr*"\mw`MT0|Gk CL |nDX5(2 8 ?V,Z 3 ?V)  
|n  
CLLESRC  
CLPSRC  
DDSSRC  
REXXSRC CLDSRC  
TXTSRC  
BLDOPT  
BLDPART  
CHGPART  
CHGPARTINF  
CHKINPART  
CHKOUTPART  
CMPPART  
CPYPART  
CRTPART  
CVTPART  
DLTPART  
DSPPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
EXPPART  
FNDSTRPART¹  
IMPPART  
MRGPART  
PRMPART²  
PRTPARTINF  
QRYPART  
RNMPART  
RTVPARTINF  
WRKPARTPDM  
"b:  
BPwnJCZmPP>D?~`M:  
1. FNDSTRPART |nTf"Z4D~PDI53a)D`MrC'(e`MP',"T FILE(PF) ?~P'#  
2. ;c54,g{Z PRMPART |nO8( EXTEND(*YES),rITa}Ts#  
=<B. ?~`MT0|Gk|nDX5 217  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 24. &CLr*"\mw`MT0|Gk CL |nDX5(2 8 ?V,Z 4 ?V)  
|n  
SCHPTH  
PGM  
y²  
FILE  
CLD  
CMD  
MSGF  
DTAARA BNDSRC  
BLDPART  
CHGPART  
CHGPARTINF  
CHKINPART  
CHKOUTPART  
CMPPART  
CPYPART  
CRTPART  
CVTPART  
DLTPART  
DSPPART  
y
y
y
y
y
y
y
y¹  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y⁵  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
EXPPART  
FNDSTRPART³  
IMPPART  
y
y
y
y
MRGPART  
PRMPART⁴  
PRTPARTINF  
QRYPART  
RNMPART  
RTVPARTINF  
WRKPARTPDM  
"b:  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
BPwnJCZmPP>D?~`M:  
1. ";5JX9({"D~M|,?~,+z}Z9(D?~IT}C|G#TZ`M* BNDDIR D?~,iv2Gb  
y;;x,g{zZ BLDPART |nO8( SCOPE(*EXTENDED),rIT9(|G#PXji,N{Z1293D:h  
2. ;\9(xP C oTD`M* PGM D?~#  
3. FNDSTRPART |nTf"Z4D~PDI53a)D`MrC'(e`MP',"T FILE(PF) ?~P'#  
4. ;c54,g{Z PRMPART |nO8( EXTEND(*YES),rITa}Ts#  
5. CMPPART |nTf"Z4D~PDI53a)D`MrC'(e`MP',"T FILE(PF) ?~M PARTL ?~P  
'#  
218 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 25. &CLr*"\mw`MT0|Gk CL |nDX5(2 8 ?V,Z 5 ?V)  
|n  
M E N U  
(*UIM)  
MODULE  
SRVPGM  
BNDDIR¹  
PNLSRC  
PNLINC  
PNLGRP  
BLDPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
CHGPART  
CHGPARTINF  
CHKINPART  
CHKOUTPART  
CMPPART  
CPYPART  
y
y
y
y
y
y
y
y
y
CRTPART  
CVTPART  
DLTPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
DSPPART  
EXPPART  
FNDSTRPART²  
IMPPART  
y
y
y
y
MRGPART  
PRMPART³  
PRTPARTINF  
QRYPART  
RNMPART  
RTVPARTINF  
WRKPARTPDM  
"b:  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
BPwnJCZmPP>D?~`M:  
1. ";5JX9({"D~M|,?~,+z9(D?~IT}C|G#TZ`M* BNDDIR D?~,iv2Gby;  
;x,g{zZ BLDPART |nO8( SCOPE(*EXTENDED),rIT9(|G#PXji,N{Z1293D:hC  
2. FNDSTRPART |nTf"Z4D~PDI53a)D`MrC'(e`MP',"T FILE(PF) ?~P'#  
3. ;c54,g{Z PRMPART |nO8( EXTEND(*YES),rITa}Ts#  
=<B. ?~`MT0|Gk|nDX5 219  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 26. &CLr*"\mw`MT0|Gk CL |nDX5(2 8 ?V,Z 6 ?V)  
|n  
SCHIDX  
JOBD  
JOBQ  
MSGQ  
OUTQ  
PARTL  
PRDDFN PRDLOD  
BLDPART  
CHGPART  
CHGPARTINF  
CHKINPART  
CHKOUTPART  
CMPPART  
CPYPART  
CRTPART  
CVTPART  
DLTPART  
DSPPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
EXPPART  
FNDSTRPART¹  
IMPPART  
y
y
y
y
y
y
MRGPART  
PRMPART²  
PRTPARTINF  
QRYPART  
RNMPART  
RTVPARTINF  
WRKPARTPDM  
"b:  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
BPwnJCZmPP>D?~`M:  
1. FNDSTRPART |nTf"Z4D~PDI53a)D`MrC'(e`MP',"T FILE(PF) ?~P'#  
2. ;c54,g{Z PRMPART |nO8( EXTEND(*YES),rITa}Ts#  
220 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 27. &CLr*"\mw`MT0|Gk CL |nDX5(2 8 ?V,Z 7 ?V)  
|n  
SYSTEML  
CBL36SRC CBL36INC DSPF36SRC MNU36SRC MSGF36SRC OLC36SRC  
BLDPART  
CHGPART  
CHGPARTINF  
CHKINPART  
CHKOUTPART  
CMPPART  
CPYPART  
CRTPART  
CVTPART  
DLTPART  
DSPPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
EXPPART  
FNDSTRPART  
IMPPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
MRGPART  
PRMPART¹  
PRTPARTINF  
QRYPART  
RNMPART  
RTVPARTINF  
WRKPARTPDM  
"b:  
1. ;c54,g{Z PRMPART |nO8( EXTEND(*YES),rITa}Ts#  
=<B. ?~`MT0|Gk|nDX5 221  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 28. &CLr*"\mw`MT0|Gk CL |nDX5(2 8 ?V,Z 8 ?V)  
|n  
RPG36SRC RPG36INC RPT36SRC SRT36SRC TXT36SRC VRPGBIN  
VRPGTXT  
BLDPART  
CHGPART  
CHGPARTINF  
CHKINPART  
CHKOUTPART  
CMPPART  
CPYPART  
CRTPART  
CVTPART  
DLTPART  
DSPPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
EXPPART  
FNDSTRPART  
IMPPART  
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
y
MRGPART  
PRMPART¹  
PRTPARTINF  
QRYPART  
RNMPART  
RTVPARTINF  
WRKPARTPDM  
"b:  
1. ;c45,g{Z PRMPART |nO8( EXTEND(*YES),rITa}Ts#  
222 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
=<C. |{fr  
>ZhvzZ*n?"i"?~Ma}k4({F1h*NGDfr#  
n?Mi{  
Z9C CRTPRJ |n(09Cn?1A;OD0F6=4(1)r CRTGRP |n(09  
Ci1A;OD0F6=4(1)4(n?ri1,*|a)=v{F# zZ PRJ r GRP  
N}O8(D 32 vV{D{FGZyPkn?ri`XD CL |nO9CD{F,C  
Zj6KX(n?#;)P'D{F|( PAYROLL"BIWEEKLYPAYROLL"  
PAY_ROLL_09.92 r PAY$ROLL#;)P'Di{|( VERSION1"V1PAY$ROLL M  
SYS_TEST_VERSION2#  
Z SHORTPRJ N}O,z8(;vn?rF,C{FC4*Cn?PDi4((;D  
AS/400 b{#  
Z SHORTGRP N}O,z8(;vrLi{,C{FC4*n?PD?vi4((;  
D AS/400 b{#  
n?rFkrLi{2,9I OS/400 b{#}g,g{P;vrF* PAY Dn?  
PAYROLL M;vrF* MST Di MASTER,r AS/400 b{+G PAY.MST#g  
{Z,;n?P4(m;v{* TEST Di,drF* TST,r|Db+G PAY.TST#  
z;&9CTV{ Q *7Dn?rF,53Y(byDbG53b#n?rFn$I  
P 4 vV{#rLi{n$IP 5 vV{#Z;vV{XkGTBdP;n:  
V8 (A-Z)  
@*{ ($)  
}V{ (#)  
@ {  
n?rFDd` 3 vV{T0rLi{Dd` 4 vV{ITGTBwnDNbiO:  
V8 (A-Z) r}V (0-9)  
@*{ ($)  
}V{ (#)  
@ {  
B._ (_)  
n?rFMrLi{;\|,:  
JE (')  
dc (.)  
6kUq  
DBCS V{rNNd{XbV{  
;)P'Dn?rF|( PR$"PAYR r PR92#;)P'DrLi{|( V1"V1PAY  
r TSTV2#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
223  
 
?~{  
?v?~<ITBD?VE"DiO(;j6:  
n?  
i
K?~ytDn?D{F(n$ 32 vV{)#  
K?~ytDiD{F(n$ 32 vV{)#  
`M  
?~`M,}g PGM"FILE r RPGSRC(n$ 10 vV{)#Z523Dm5P  
>0&CLr*"\mw1&\?~'VD OS/400 Ts`M#  
?~  
(;j6X(n?"iM`MD?~D{F(n$ 10 vV{)#  
?~{DZ;vV{XkGTBdP;n:  
V8 (A-Z)  
@*{ ($)  
}V{ (#)  
@ {  
d`V{ITGTBwnDNbiO:  
V8 (A-Z) r}V (0-9)  
@*{ ($)  
}V{ (#)  
@ {  
dc (.)  
B._ (_)  
?~{;\|,:  
JE  
6kUq  
DBCS V{rNNd{XbV{  
rK,+^(?~{n$ITG 84 vV{SOCZxPVtDUq#PAYROLL  
DEVELOPER1 RPGSRC BIWKLY G+^({FD;v>}#?~{* BIWKLY;|  
D`M* RPGSRC;;Zn? PAYROLL PDi DEVELOPER1 P#  
x({FM`MD?~;\fZZP4|,_P`,{F`,`MD?~DiP#g  
{;v`,{F`,`MD?~QfZZ*|,B?~DiD1!Qw76P,r4  
("4Fr<kC?~1,Xk8(a}k *NONE#  
C'(e`M{  
?v?~<ITBD?VE"DiO(;j6:  
n?  
i
K?~ytDn?D{F(n$ 32 vV{)#  
K?~ytDiD{F(n$ 32 vV{)#  
`M  
?~`M,}g ZPGM"ZFILE r ZRPGSRC(n$ 10 vV{)#(iyPC  
'(e?~`M{<T Z *7#  
?~  
CZ(;j6X(n?"iM`MD?~D{F(n$ 10 vV{)#  
?~{DZ;vV{XkGTBdP;n:  
V8 (A-Z)  
224 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
@*{ ($)  
}V{ (#)  
@ {  
d`V{ITGTBwnDNbiO:  
V8 (A-Z) r}V (0-9)  
@*{ ($)  
}V{ (#)  
@ {  
dc (.)  
B._ (_)  
?~{;\|,:  
JE  
6kUq  
DBCS V{rNNd{XbV{  
rK,+^(?~{n$ITG 84 vV{SOCZxPVtDUq#PAYROLL  
DEVELOPER1 RPGSRC BIWKLY G+^({D;v>}#K?~{* BIWKLY;|  
D`M* RPGSRC;;Zn? PAYROLL PDi DEVELOPER1 P#  
x({FM`MD?~;\fZZP4|,_P`,{F`,`MD?~DiP#g  
{;v`,{F`,`MD?~QfZZ*|,B?~DiD1!Qw76P,r4  
("4Fr<kC?~1,Xk8(a}k *NONE#  
a}k{F  
a}k5D|{^Fki{D|{^F`,;4,n$ 32 vV{,WV{XkGBP  
dP;n:  
V8 (A-Z)  
@*{ ($)  
}V{ (#)  
@ {  
d` 31 vV{ITGTBwnDNbiO:  
V8 (A-Z) r}V (0-9)  
@*{ ($)  
}V{ (#)  
@ {  
dc (.)  
B._ (_)  
=<C. |{fr 225  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
226 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
=<D. f;d?  
0&CLr*"\mw1&\?~+8vV{.6p*f;d?#bk0`L*"\  
mw15CLr*dC'(e!na)f;D==`F#  
b)f;d?GTm`;,D==6pD:  
1. 0`L*"\mw15CLr  
ZC4&m PDM C'(e!nD|nP#ITZBP0`L*"\mw1A;P9  
Cf;d?:  
C PDM 49Cn?  
C PDM 49Ci  
C PDM 49C?~  
4(C'(e!n  
T?vd?5XD5*Sz}Z9CDA;x(#g{Z9Cb"TsrI119  
Cb)d?PDNN;v,rCd;;f;* *NULL#  
2. BLDOPT ?~  
ZzZ9(!n?~(`M* BLDOPT D?~)P(eD`k|nP#  
3. CMD N}  
ZzZ CHGADMACN |nD CMD N}O(eD|nV{.P#  
4. BLDCMD N}  
ZzZ ADDADMLANG M CHGADMLANG |nD BLDCMD N}O(eD|n  
V{.P#  
": ZG)ivB,1f;d?;JC1,f;d?;a;f;#}g,g{  
CHGADMACN |nO(eDYw*>}Yw,r &ZJ f;d?;\;f;*}  
ZF/r4FD?~D{F#K1,9Cf;d? &ZJ G;PbeD#g{;PX  
hDE"IC,r;bvf;d?#  
m 29. &CLr*"\mw6pDf;d?  
f;d?  
hv  
&A TstT  
PDM  
g{z}Z9C?~,r &A ;f;*?~D OS/400 TstT#g{}Z9Cn?r  
i,r &A ;f;* *NULL#  
BLDOPT ?~  
;JC  
CMD N}  
}Z&mD?~DTstT#  
BLDCMD N}  
&A ;f;* *NULL#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
227  
 
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
hv  
&B Pm`M  
PDM  
g{}Z9Cn?Pm,r &B ;f;* R#g{z}Z9CiPm,r &B ;f;  
* G#g{z}Z9C?~Pm,r &B ;f;* P#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
&C !n  
PDM  
&C ;f;*C'(e!nzk#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
&D ON|DUZ  
PDM  
g{z}Z&m?~Pm,r &D ;f;*ON|D?~Z]DUZ#  
5XD5_P53q=,xPVt{#qr,&D ;f;* *NULL#XkZ%}EP9  
CKd?(4 '&D'),bGr*UZI\a|,aCwKc{D1\ (/)#  
BLDOPT ?~  
;JC  
CMD N}  
}Z&mD?~DON|DUZ#  
BLDCMD N}  
}Z`kD?~DON|DUZ#  
&E Tz&m==KP  
PDM  
g{Z0|D1!51A;ODTz&m==KPa>P8(K Y,r &E ;f;*  
*YES,g{8(DG N,r;f;* *NO#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
228 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
hv  
&F 4D~{  
PDM  
g{}Z&m?~,r &F ;f;*f"C?~DD~D{F#Kd?vTZ503Dm  
4PP>D?~`MP'#  
BLDOPT ?~  
}Z`kD?~D4D~{#  
CMD N}  
}Z&mD?~D4D~{#1Z CHGADMACN |nD ACTION N}O8(K *CPY  
Yw1,bG444D~D{F#  
BLDCMD N}  
}Z&mD?~D4D~{#  
14D~{;IC1,&F ;f;* *NULL#  
&G w5hvb  
&H w5hv{  
&J w5hv  
PDM  
&G ;f;*0|D1!51A;PDw5hvb5#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
PDM  
&H ;f;*0|D1!51A;PDw5hv5#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
PDM  
&J ;f;*0|D1!51A;PDw5hv5,_Pb/w5hvq=#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
=<D. f;d? 229  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
&L b{  
hv  
PDM  
g{}Z9Cn?,r &L ;f;* *NULL#g{z}Z9Ci,r &L ;f;*k  
Ci`X*DbD{F#g{z}Z9C?~,r &L ;f;*|,C?~DiDbD  
{F#  
BLDOPT ?~  
k|,}Z`kD?~Di`X*Db{#  
CMD N}  
k|,}Z&mD?~Di`X*Db{#  
TZZ CHGADMACN |nD ACTION N}O8(D *CPY Yw,bG}ZSP4F  
?~DbD{F#}g,g{C IMPPART |nGT *CPY Yw(eD,r &L ;f  
;*}ZSP<k?~DbD{F#  
1"v EXPPART |n1,bGT CHGADMACN |nD ACTION N}O8(D *DLT  
Yw+?~<vADbD{F#  
BLDCMD N}  
k|,}Z`kD?~Di`X*Db{#  
&N Ts/I1{  
PDM  
g{}Z9Cn?,r &N ;f;* *NULL#g{z}Z9Ci,r &N ;f;*k  
Ci`X*DbD{F#g{z}Z9C?~,r &N ;f;*kCn?`X*DTs  
rI1D{F#  
BLDOPT ?~  
}Z`kD?~DTs{#  
CMD N}  
}Z&mD?~DTs{#  
BLDCMD N}  
}Z`kD?~DTs{#  
&O Tsb  
PDM  
g{}Z9Cn?,r &O ;f;* *NULL#g{z}Z9Ci,r &O ;f;*k  
Ci`X*DbD{F#g{}Z9C?~,r &O ;f;*k0C PDM 49C?  
~1A;OD8(Dia>P|{Di`X*DbD{F#  
BLDOPT ?~  
fE BLDPART |nDdvTsDbD{F#  
CMD N}  
k|,}Z&mD?~Di`X*Db{#  
TZZ CHGADMACN |nD ACTION N}O8(D *CPY Yw,bG}ZSP4F  
?~DbD{F#}g,g{C IMPPART |nGT *CPY Yw(eD,r &O ;f  
;*}ZSP<k?~DbD{F#  
1"v DLTPART |n1,bG?~yZDbD{F#  
BLDCMD N}  
fE BLDPART |nDdvTsDbD{F#  
230 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
hv  
&P Tz&m==`k  
PDM  
g{Z0|D1!51A;ODTz&m==`ka>P8(K Y,r &P ;f;*  
*YES,g{8(DG N,r;f;* *NO#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
&R f;Ts  
PDM  
g{}Z9Cn?"ir?~,r^[0|D1!51A;ODf;Tsa>P8(D  
G245,&R \G;f;* *NO#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
&S ;x '*' Dn`M  
PDM  
g{}Z9Cn?,r &S ;f;* *NULL#g{}Z9Ci,r &S ;f;* LIB#  
g{}Z9C?~,r &S ;f;*C?~DTs`M(;x '*')#  
BLDOPT ?~  
;JC  
CMD N}  
}Z&mD?~D OS/400 Ts`M,40<T '*'#  
BLDCMD N}  
}Z`kD?~D OS/400 Ts`M,40<T '*'#  
&T xP '*' Dn`M  
PDM  
g{}Z9Cn?,r &T ;f;* *NULL#g{}Z9Ci,r &T ;f;*  
*LIB#g{}Z9C?~,r &T ;f;*C?~DTs`M(xP '*')#  
BLDOPT ?~  
;JC  
CMD N}  
}Z&mD?~D OS/400 Ts`M,0< '*'#  
BLDCMD N}  
}Z`kD?~D OS/400 Ts`M,0< '*'#  
=<D. f;d? 231  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
hv  
&U C'(e!nD~  
PDM  
&U ;f;*0|D1!51A;PDC'(e!nD~{#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
&V C'(e!nb  
PDM  
&V ;f;*0|D1!51A;PDC'(e!nb{#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
&W C'(e!nD~  
I1  
PDM  
&W ;f;*0|D1!51A;PDC'(e!nD~I1{#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
&X TsD>hv  
PDM  
g{}Z9Cn?,r &X ;f;* *NULL#g{}Z9Cir?~,r &X ;f;  
*kCn`X*DTsrI1DD>((Z%}EP)#  
BLDOPT ?~  
;JC  
CMD N}  
}Z&mD?~DTsD>hv(50 vV{)#  
BLDCMD N}  
}Z`kD?~DTsD>hv(50 vV{)#  
232 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
hv  
&ZA oT  
PDM  
&ZA ;f;*?~DoTtT#  
BLDOPT ?~  
}Z`kD4?~DoTtT,x;Gdv?~DoTtT#  
CMD N}  
}Z&mD?~DoT#  
BLDCMD N}  
}Z`kD?~DoT#  
&ZC OS/400 |n{  
&ZD 9(dv?~`M  
&ZE dv?~{  
PDM  
&ZC ;f;*}Z&mD0&CLr*"\mw1|n(}g IMPPART r BLDPART  
|n)D{F#  
BLDOPT ?~  
&ZC ;f;* BLDPART#  
CMD N}  
10}Z&mD OS/400 |n{;}g,IMPPART r BLDPART |n#  
BLDCMD N}  
&ZC ;f;* BLDPART#  
PDM  
BLDOPT ?~  
&ZD ;f;* BLDPART |n}Z4(Ddv?~D`M#g{H0P49(4?~,  
rKd?k4?~D`M`,#  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
PDM  
BLDOPT ?~  
&ZE ;f;* BLDPART |n}Z4(Ddv?~D{F#g{H0P49(4?~,  
;JC  
rKd?k4?~D{F`,#  
TZC'(e`M *NONE,&ZE hC* BLDPART |nv=DZ;vdvI1,rG  
_PC'(e`M *NONE D?~D{F(g{T0P4&mC?~)#  
CMD N}  
;JC  
BLDCMD N}  
;JC  
=<D. f;d? 233  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
hv  
&ZF 4D~{  
PDM  
;JC  
BLDOPT ?~  
;JC  
CMD N}  
k}Z+?~4FADi`X*Db{#  
1zZ CHGADMACN |nO(e *CPY Yw1,IT9C &ZF#  
BLDCMD N}  
;JC  
&ZG i{  
PDM  
&ZG ;f;*0C PDM 49C?~1A;OD 8(Dia>PxvDiD{F#T  
Z PRMPART |n,bG}ZSPa}?~Di#TZ CHKOUTPART |n,bG}  
Z+?~lvADi#  
BLDOPT ?~  
fE BLDPART |nDdvDiD{F#  
CMD N}  
|,}Z&mD?~DiD{F#  
BLDCMD N}  
|,}Z`kD?~DiD{F#  
&ZH (hX|V  
PDM  
&ZH ;f;*0|D1!51A;PD SCAN X|VD5#b)5|( *YES M  
*NO#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
&ZI b{  
PDM  
;JC  
BLDOPT ?~  
;JC  
CMD N}  
k}Z+?~F/r4FADi`X*Db{#  
1Z CHGADMACN |nO(e *MOV r *CPY Yw1,IT9C &ZI#  
BLDCMD N}  
;JC  
234 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
hv  
&ZJ TOPART 5  
PDM  
;JC  
BLDOPT ?~  
;JC  
CMD N}  
}Z9C4FYwF/r4FD?~D{F#  
BLDCMD N}  
;JC  
&ZL i{  
PDM  
&ZL ;f;*zZ0C PDM 49C?~1A;O|DT_dkK!nDiD{F#g  
{}Z9Cn?ri,r &ZL ;f;* *NULL#  
BLDOPT ?~  
;JC  
CMD N}  
;JC  
BLDCMD N}  
;JC  
&ZN {  
PDM  
&ZN ;f;*}Z9CD0`L*"\mw1PmPD{F#g{}Z9Cn?,r  
&ZN ;f;*n?{#g{}Z9Ci,r &ZN ;f;*i{#g{}Z9C?~,  
r &ZN ;f;*?~{#  
BLDOPT ?~  
}Z`kD?~D{F#  
CMD N}  
}Z&mD?~D{F#  
BLDCMD N}  
}Z`kD?~D{F#  
&ZO 9(6'  
PDM  
BLDOPT ?~  
B L D P A R T  
*NORMAL"*LIMITED"*DIRCHAIN M *EXTENDED#  
CMD N}  
&ZO ;f;*0|D1!51A;OD09(6'1N}D5#  
| n O D 0 9 ( 6 ' 1 N } D 5 # b ) 5 | (  
;JC  
BLDCMD N}  
ADDADMLANG r CHGADMLANG |nD BLDCMD N}OD|nV{.P8(D  
5#b)5|( *NORMAL"*LIMITED"*DIRCHAIN M *EXTENDED#  
=<D. f;d? 235  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
hv  
&ZP n?{  
PDM  
&ZP ;f;*zZ9Cir?~1Dn?{#  
BLDOPT ?~  
|,}Z`kD?~Dn?D{F#  
CMD N}  
|,}Z&mD?~Dn?D{F#  
BLDCMD N}  
|,}Z`kD?~Dn?D{F#  
&ZS Qw76  
PDM  
&ZS ;f;*0|D1!51A;PD SCHPTH X|VD5#K5GQw76?~D  
{F#  
BLDOPT ?~  
BLDPART |nOD0Qw761N}D5#K5GQw76?~D{F#  
CMD N}  
;JC  
BLDCMD N}  
ADDADMLANG r CHGADMLANG |nD BLDCMD N}OD|nV{.P8(D  
5#  
&ZT ?~`M  
PDM  
&ZT ;f;*z9C?~Pm1D?~`M#  
BLDOPT ?~  
}Z`kD?~D`M#  
CMD N}  
}Z&mD?~D`M#  
BLDCMD N}  
}Z`kD?~D`M#  
&ZX D>hv  
PDM  
&ZX ;f;*3nDD>hv(80 vV{),b!vZ}Z9CDA;#  
BLDOPT ?~  
;JC  
CMD N}  
}Z&mD?~DD>hv(80 vV{)#  
BLDCMD N}  
}Z&mD?~DD>hv(80 vV{)#  
236 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
m 29. &CLr*"\mw6pDf;d? (x)  
f;d?  
hv  
&ZY ?~Pm?~{  
PDM  
&ZY ;f;*C4zI09C?~PmPD?~1A;OD?~PmD?~Pm?~  
{#Z PDM PDNNd{PmO,|G *NONE#  
BLDOPT ?~  
PARTL N}O8(D?~Pm?~D{F#  
CMD N}  
PARTL N}O8(D?~Pm?~D{F#  
BLDCMD N}  
PARTL N}O8(D?~Pm?~D{F#  
=<D. f;d? 237  
Download from Www.Somanuals.com. All Manuals Search And Download.  
238 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
=<E. 9((f{"  
>=<P>9((fPvVD BLDPART |n{", |Ghv9(?~D-r#a)  
KZ;6MZ~6{"D>#  
-r{"  
BP{"GCZhv9(?~D-rD9((f{"#Z>ZP,&1=`M,x &2=?  
~#Z9((fP,`MM?~bv*5J{F#  
ADM4213  
&1 &2 Q|D#  
ADM4208  
}Z9C1!`kw|n#  
-r: ?~ &1 &2 D1dAGQ|D#  
-r: R;= BLDOPT ?~,Q9C1!`kw|n#  
C?~H0G9C BLDOPT ?~9(D#  
ADM4204  
&1 &2 ;PTs#  
ADM4210  
R=;,D BLDOPT ?~#  
-r: BLDPART |n"Vdv?~;P`X*DTs#  
bGH09(}LDa{,C9(}L}%KCTs,T  
JmZ FILE PF M FILE LF ivBxP`k#  
-r: *K9(K?~x"VD BLDOPT ?~kH09  
(}LP9CD?~;,#  
ADM4203  
T049( &1 &2#  
ADM4216  
&1 &2 PDVNQ|D#  
-r: BLDPART |n"Vdv?~;P4TH09(}  
LDE"#  
-r: 8(D FILE PDVNQ|D#  
ADM4217  
;Y\;Z &1 &2 PR=VN#  
ADM4206  
&1 &2 ;GI4?~4(D#  
-r: 8(D FILE PDVN;YfZ#  
-r: C47(Gq&C"z9(}LDdv?~H0G  
Im;v4?~9(D#  
ADM4205  
*FORCE hC* *YES#  
-r: BLDPART |nOD FORCE N}hC* *YES#  
ADM4212  
R;= &1 &2#  
-r: H09(}L9CKK?~,+Z9(6'PR;  
=|#  
ADM4219  
I\Gr*Q9(`X?~x9(#  
-r: K?~;h*9(,+;v`X?~I\h*9  
(,bI\<BK?~h*9(#  
ADM4226  
BLDPART &m;\Lx#  
-r: BLDPART TZ?==9CD;vr`v$wxQ  
;,v#g{}Z9(s?D?~,rI\a"zbVi  
v#  
ADM4221  
I\Gr*9(K4r`X?~x;9(#  
-r: K?~;h*9(,+;v`X?~r4(K?~  
D4I\h*9(,bI\<BK?~h*9(#  
ADM4209  
BLDOPT ?~|,`kw|n#  
ADM4220  
r*Xk9(4r`X?~xXk9(#  
-r: K?~H0G9C1!`kw|n9(D#K9(  
}LP9CD`kw|n4T BLDOPT ?~#  
-r: K?~;h*9(,+;v`X?~r4(K?~  
D4h*9(,b+<Bh*9(K?~#  
ADM4211  
BLDOPT ?~Q|D#  
ADM4218  
r*Xk9(`X?~xXk9(#  
-r: BLDOPT ?~D1dAGQ|D#  
-r: K?~;h*9(,+;v`X?~Xk9(,b  
<BK?~2+;9(#  
© Copyright IBM Corp. 1992, 2001  
239  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
ADM4202  
R=Ddv?~Z2mn?P#  
ADM4207  
4?~Q|D#  
-r: BLDPART |nZ;fn?PR=dv?~#9(  
}LLx,Ms;Pdv?~;y,bm>+9(4?  
~#  
-r: TS4PH09(}L.s,}Z9(D4?~D  
1dAGQ|D#  
ADM4225  
T0P49(4?~#  
ADM4201  
R;=4TH09(}LDdv?~#  
-r: T0P49C BLDPART |n9(4?~#  
-r: BLDPART |nR;=ZH09(}LP4(Dd  
v?~#  
ADM4227  
&1 &2 PD SRVPGM ){Q|D#  
-r: 8(D SRVPGM PD){Q|D#  
ADM4214  
&1 &2 PDG<6pj6Q|D#  
-r: 8(D FILE PDG<6pj6Q|D#  
ADM4228  
C'(eoTQ|D#  
-r: Q9C CHGADMLANG |n|DKC'(eo  
T#  
ADM4215  
;Y\;Z &1 &2 PR=G<#  
-r: 8(D FILE PDG<;YfZ#  
/f{"  
TZ9((f/f{"PDs`},{"PDf;d?bv*BPwn:  
&1 n?{  
&2 i{  
&3  
&4  
?~`M  
?~{  
TZ;){",&1"&2"&3 M &4 ITVpm>b"TsMI1{#*i4b){  
",kdkTB|n#  
DSPMSGD RANGE(ADM4400 *LAST)MSGF(QADM/QADMMSG)  
Xb/f{"  
v1 BLDPART &mZddP;vZ?9(Ud,}d]?D 80% 1,BD/f{"  
EavVZ9((fP#Zw5G<P,b)/f9ifEM6p/f{"#k4i  
b){""4Pb){"D{"hvPa=DJ1V4Yw#  
240 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
=<F. `oT'V  
0&CLr*"\mw1&\?~Jmz,1T`VzRoT4(M\m&CLrD  
`vf>,"Jmz*h*-kDi~\myhD-kn/#  
>=<a)K;vy>n?cNa9,zIT4(Kn?cNa94\m`oT&C  
Lr,>=<95wKZ*"Kn?cNa91h*<GDJb#>=<;PV[ IBM  
*>z7a)DzRoT'V#kN<0iSeries E"PD1TKbb=fDE"#  
`oTn?cNa9  
Yh  
>ZV[D=8wKBPYh:  
1. &CLrD*"IyP*"_T;Vy>oTjI#(ZK>}P,y>oTG"  
o#)  
2. Xk-kBP`MD&CLri~PD3;)r+?:  
v {"(`M* MSGF D?~)#  
v T>D~(`M* DDSSRC D?~)#  
v r!D~(`M* PRTF D?~)#  
v }]x(`M* DTAARA D?~)#  
v |n4(`M* CMDSRC D?~)#  
v Lr4(`M* xxxSRC r xxxINC D?~,dP,xxx G>z7'VD`Lo  
T.;#i4Z503Dm4TKbb=fDE"#)  
n?cNa9gN$w  
Z2423D<88T>KgN(e`oTn?cNa94oz\m-kn/#  
zs=#Gy4(n?cNa9,"<GyP=S CCSID hs#N<Z2423D:Kb  
CCSID;Tq!0&CLr*"\mw1|ngN9C CCSID D5w#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
241  
 
< 88. CZ-kDn?cNa9  
Z4(n?1,|IC4(n?D53OD+VZV{/ (DBCS) Xw#bm>g{5  
3tCK DBCS,rCn?2at/ DBCS,"R|D4D~+Jm9C DBCS V{#  
*9Cy>oT4*"&CLr,k9Cn?cNa9P_Pkyi`,Da}kD  
i#ZK>}P,yiDa}kG MASTER#9C_Pa}k *NONE Di4|,}  
Z-kD?~D1>#ZK>}P,}Z+&CLr*;I(oMBo#  
": i FRENCH M GERMAN G9Ca}k *NONE 4(D,rK,;\a}b)i  
PD?~,2;\f;b)?~D"Df>#  
1C'*"&CLr1,+;OXa}"9(MbT&CLrD?~,1Ayi  
MASTER#1&CLrDyP?~<ZyiP1,zIT*<-kToTtPD?  
~:  
1. 9C CHKOUTPART |nTZiP**-kDoT4(}Z-kD?~D1>#Z  
b)?~O8( PRMCODE(*NONE),T9|G@6;\;a}#  
2. Z-kKyP?~.s,Z-ki(}gi FRENCH)P9(yP?~#  
3. Z9(KiPDyP?~.s,<vyhoTf>D&CLrf>#}g,g{*  
4("Df,rSyi<v{v&CLr,r_,(}Z EXPPART |nO8(  
GRP(FRENCH),IT<v{v(DfD&CLr#g{z;k<vQ-kD?  
~,rITZ EXPPART |nO8(J1oTDi{M SCAN(*NO)#PX  
EXPPART |nDji,N<Z13B <v&CLr#  
Kb CCSID  
>Z5w0&CLr*"\mw1|ngN9C CCSID,T0 CCSID GgN0lI*  
|
;4D#PX CCSID DV[Dji,z&1N<0iSeries E"PD1#  
BP0&CLr*"\mw1|n9C CCSID:  
v CRTGRP  
242 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
1z4(;vi1,zTT===rT1!==8(C4ZCiP4(yP4D  
CCSID#CCSID ;0l4I1,|;1S0ld{Ts#  
g{ CCSID k-k?~DK1PX,r&9CC CCSID 4(i#1  
v CPYPART"IMPPART"CHKOUTPART"PRMPART M EXPPART  
19CdP;v|n4+4I1S;vD~4FAm;vD~1,+Q4I1PD  
.yxF5S4F4 CCSID m>(*;*4F?j CCSID m>(#TZ  
CPYPART"IMPPART"CHKOUTPART M PRMPART |n,g{CZSUI1D  
4D~;fZ,ra9CSU?~DiD CCSID 4(|#TZ EXPPART |n,g  
{CZSUI1D4D~;fZ,ra9CKP EXPPART |nDw5D CCSID 4  
(|#  
v1<GI*;41,CCSID ETzPyoz#;x,|;0l{"D~>m,r*b  
)D~;\9C CCSID 4(#  
IT+y>oTiPD?~D.yxF5*;Id{oTyhDG)5,gByv#  
N<<88,dPhvKgN+"Df?~*;I(DfMBDf?~:  
v {"  
*-k{"D~,k9C CHKOUTPART |n+|GSyilv=i FRENCH M  
GERMAN#;s,XkTK$==-k?vD~#  
v AfiM UIM K%  
BP}vtTdO PNLGRP ?~9C:  
MSGID  
`kwSb LIB Db MSGF Pi!;6{"D>TqC{" MSGID,"CD>  
f;K{E#lw=D{"D>;xNNf;d?#  
{"D~1!* PNLGRP j>D SUBMSGF tTO8(D{"D~#g{48  
( SUBMSGF,rXkZ{EP8({"D~#  
SUBMSGF  
bG &msg {EO48({"D~1*9CD1!{"D~#  
DFTMSGF  
bG1BPNNjGO4T{"j6{8({"D~1*9CD1!{"D~:  
CHECK"LISTDEF"TL"DATASLTC"PDFLDC"LISTACT M MENUI#  
TZdPNN;vjG,1TKjG8( MSGID tT1,g{;PZCjGO8  
(`T&D{"D~tT,rKtTGXhD#  
v T>D~  
zh** DDS 4<G}Viv:  
DDS 4|,|DyPI-kD>D MSGID X|V#2  
g{GbyD0,z;h-kTOhvD=(PD{"#bGr*{"M MSGID  
X|V<GZKP1bvD#  
DDS 4|,|D?Vr+?I-kD>D MSGCON X|V#  
1. (i+,; CCSID CZn?cNa9PDyPi,w*CZ*"y>oT&CLrD CCSID#byIT\bZn?cNa9Pa}  
41A^X*X*;4D.yxFm>(#  
2. ?0,MSGID X|V;PZ DSPF DDS 4PE\'V#  
=<F. `oT'V 243  
Download from Www.Somanuals.com. All Manuals Search And Download.  
kTOv==-k{"#;sXB`ki FRENCH M GERMAN PDD~#r  
*{"M MSGCON X|VGZ`k1bvD,yTzXkbyv#9C  
BLDPART |n`k DDS 4#  
DDS 4|,|D?Vr+?I-kD>DDV#  
*-kb)?~,Xk+|GSyilvA FRENCH M GERMAN i#;s,  
XkK$X-kiPD?v?~#jI-ks,9C BLDPART |n`k DDS  
4#  
v }]x  
*-k}]x,kWH+|GSyilvA FRENCH M GERMAN i#;sK$X  
-k?v}]x#  
v Lr4  
g{zF.+&CLr*;Id{oT,RG(iz;*ZLr4zkPyw*-  
kDDV#;x,49Lr4zk_PKXT,TI(}4PBPwn4xP-  
k#Xk+?~SyilvAi FRENCH M GERMAN#;s,XkK$X-ki  
PD?v?~PDDV#jI-ks,9C BLDPART |n`kLr4zk#  
v |n4  
*-k|n4,WH+|n4SyilvAi FRENCH M GERMAN#;sK$X  
-k?v|n4?~#jI-ks,9C BLDPART |n`k|n4#  
244 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
=<G. a>k<I  
>=<|,CZDx;)0&CLr*"\mw1|nD'JMT\D(i#>=<  
a)KXZBPwbDE":  
v T\Dx  
v ?~*;:<kAfi4  
v hCvZLr  
v d{a>k<I  
T\Dx  
>Za)KXZBPwbDE":  
v Dx WRKGRPPDM"WRKPARTPDM M WRKPRJPDM A;T0?~|nT\  
v Dx WRKPARTPDM M?~|nT\  
DxT\  
*Dx WRKGRPPDM"WRKPARTPDM M WRKPRJPDM A;OD?~|nDT\  
Ml&YH,?m"vBP|n4i/0&CLr*"\mw19CDy>}]bD  
~:  
RGZPFM FILE(QUSRSYS/QALYPART)KEYFILE(*FILE)  
RGZPFM FILE(QUSRSSYS/QALYBLDMAP)KEYFILE(*FILE)  
RGZPFM FILE(QUSRSYS/QALYFLDTBL)KEYFILE(*FILE)  
RGZPFM FILE(QUSRSYS/QALYREL)KEYFILE(*FILE)  
Dx WRKPARTPDM M?~|nT\  
*Dx WRKPARTPDM A;OD?~|nT\T0l&YH,k"vBP|n:  
1. (}dkTB|n,Kb?~?<D~Ds!:  
DSPOBJD OBJ(QUSRSYS/QALYPART)OBJTYPE(*FILE)DETAIL(*FULL)  
2. 4(S53:  
CRTSBSD SBSD(QGPL/ADMPARTS)POOLS((1 *BASE)(2 xxx 1)  
dP,xxx sZ?~?<D~Ds!#  
3. t/S53:  
STRSBS (QGPL/ADMPARTS)  
4. e}XPDZf:  
CLRPOOL POOL(ADMPARTS 2) +e}XPDZf#  
5. hCTsCJ(:  
SETOBJACC OBJ(QUSRSYS/QALYPART)OBJTYPE(*FILE)POOL(ADMPARTS 2)  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
245  
 
?~*;:<kAfi4  
*<kAfi4w*`M* PNLSRC D?~(xPoT PNLGRP),k4PBP=h:  
1. +|,Afi4DI1DI1tT|D* PNLGRP#  
2. 9C IMPPART |n<kI1,"ZC|nO8( LANG(*ATTR)#  
K=(TZxP`VP'oTDNN?~`M<\PC#  
g{Z<kI1.0;P4$Z|DI1tT,rIT4(D|n9C CHGPARTINF  
|nT+d10oT*;*Z{DoT#}g,g{z<kDAf4I1DtTG  
MENU,"R*4(`M* PNLSRC R_PoT PNLGRP D?~,rIT9C  
CHGPARTINF |n+doTS MENU |D* PNLGRP#  
*=S&mhCvZLr  
vZLrGZ&m0&CLr*"\mw1|n1KP=S&mDLr#r*yP  
0&CLr*"\mw1&\<I|n}/,yT\]WMIT*zyhDNN0&  
CLr*"\mw1&\hCvZLr#vZLrG#in,ITC4Z&m0&C  
Lr*"\mw1|n0sek=S_-#  
Y(*T DLTPART |nmS;)nbD&m#zIT`4;vk<89PT>DvZL  
r`FDvZLr#  
PGM  
PARM(&CMD &PRJ &GRP &TYPE &PART &PARTL +  
&DLTARCHIVE)  
DCL  
DCL  
DCL  
DCL  
DCL  
DCL  
DCL  
VAR(&CMD)TYPE(*CHAR)LEN(2)  
VAR(&PRJ)TYPE(*CHAR)LEN(32)  
VAR(&GRP)TYPE(*CHAR)LEN(32)  
VAR(&TYPE)TYPE(*CHAR)LEN(10)  
VAR(&PART)TYPE(*CHAR)LEN(10)  
VAR(&PARTL)TYPE(*CHAR)LEN(10)  
VAR(&DLTARCHIVE)TYPE(*CHAR)LEN(4)  
/* Insert Preprocessing Logic Here */  
QSYS/DLTPART PRJ(&PRJ)GRP(&GRP)TYPE(&TYPE)+  
PART(&PART)PARTL(&PARTL)+  
DLTARCHIVE(&DLTARCHIVE)  
MONMSG  
MSGID(ADM0000)EXEC(SNDPGMMSG MSGID(ADM9003)  
MSGF(QADM/QADMMSG))  
+
/* Insert Postprocessing Logic Here */  
ENDPGM  
< 89. DLTPART |nDy>vZLr#  
TOvZLrP44PNNnb&m#;x,z\]WMITZ8>D;C&ekn  
bDod#  
g{zh*q!0&CLr*"\mw1?~D>z{,rIZvZLrP9C0l  
w?~E"1(RTVPARTINF) |n4lwKE"#RTVPARTINF |nZ;,DN}P  
5Xb"D~MI15#  
246 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
*K\;Z*"_9C DLTPART |n1wCKLr,zh*4( DLTPART |nD  
1>,"+C1>EZby;vbP,CbZbPmPD;CH QSYS b*_#z&1  
|D DLTPART |nD1>,TcvZLrITTdxP&m#  
BLDPART |na)K;V|]WD=(4`4vZLr,x;XXB`4|nSZ#  
WH4(;v`M* BLDOPT D9(!n?~#ITZ}Z&mD?~`MD0f8  
(kd`,DjE4wCvZLr#jGD|nITZ9(!n?~PDNN;C`  
4#g{Z9(!n?~PR=jGD|n,Ma&mK|n,x;G&m4D`k  
w|n,49!{TC`kw|nD"M2Gby#  
<90PT>K BLDOPT QDFT ?~Dy>#  
CRTRPGPGM ...  
/*******************************************************/  
/* PGM compilers  
*/  
/*******************************************************/  
CRTRPGPGM PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)  
/* CRTCBLPGM PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)*/  
CRTCLPGM  
PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
USRPRF(*USER)REPLACE(*YES)AUT(*EXCLUDE)  
.
.
.
CLPSRC:  
RPGSRC:  
CALL USRCRTCLP PARM(&O &ZE &L &F &ZN)  
USRCRTRPG PGM(&O/&ZE)SRCFILE(&L/&F)SRCMBR(&ZN)+  
REPLACE(*YES)USRPRF(*USER)AUT(*EXCLUDE)  
.
.
.
< 90. y> BLDOPT QDFT ?~#  
ZOfD>}P,BLDPART |nwCvZLr|n USRCRTRPG(x;GwC  
CRTRPGPGM)4&m RPGSRC `MD?~#vZLr|n USRCRTRPG(bG;v  
T4xP$&mD CL Lr)(}wC CRTRPGPGM `kw4T4xP`k,nsT  
dvxPs&m#(;D*sGvZLrXkwCJ1D`kw,bGr*`kwa  
+9(X5E"+MA BLDPART |n#zXkG! BLDOPT ?~D&mNr,"J  
1X^D|G#  
d{a>k<I  
>Za)KXZBPwnDE":  
v 9C;,$HD4D~  
9C;,$HD4D~  
1!ivB,0&CLr*"\mw14($H* 92 vVZD4D~#(QRPGLESRC  
G;v}b,4(1|D$H* 112 vVZ#)1NN?~*"|n*4AD~+4R  
;=|1,ca4(K4D~#g{?~*"|nR=4D~,rC|naZdPm  
S"}%rf;dPDI1#  
=<G. a>k<I 247  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
g{z9C;,Z1!$H(92 vVZ)D4D~$H,kZ4(isM"4Z?vi  
P4(_PZ{$HDyP4D~#z9h*Zi5ibP4(`FDD~#g{i  
5ib;fZ,ri5AY;vf"Z 92 VZD4D~PD4I1#byM4(Ki  
5b#  
248 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
DW?<  
>i?P>KzZ9C0&CLr*"\mw1i  
~1I\a9CrPK$DwVi.#  
v VisualAge RPG Language Reference, SC09-2451-03  
v Programming with VisualAge RPG, SC09-2449-04  
v Getting Started with WebSphere Development Tools  
for AS/400, SC09-2625-04  
0&CLr*"\mw1b|,BPvfo:  
v
ADTS/400: Application Development Manager  
Self-Study Guide, SC09-2138-00  
zI\aTBPkK&\?~`XDvfoPK  
$:  
v ADTS/400: Application Development Manager API  
Reference, SC09-2180-00  
v Backup and Recovery, SC41-5304-05  
v CL Programming, SC41-5721-04  
v COBOL/400 User’s Guide, SC09-1812-00  
v COBOL/400 Reference, SC09-1813-00  
v ILE Application Development Example, SC41-5602-00  
v ILE Concepts, SC41-5606-05  
v
ADTS/400: Application Development Manager  
Introduction and Planning Guide, GC09-1807-00  
v
A D T S : & C L r * " \ m w C ' 8 O ,  
SB84-0449-00  
0&CLr*"$_d1b|,BPvfo:  
v ADTS/400: Advanced Printer Function, SC09-1766-00  
v ILE C/C++ Programmer’s Guide, SC09-2712-02  
v ILE C/C++ Language Reference, SC09-4815-00  
v ILE C/C++ Compiler Reference, SC09-4816-00  
v ILE COBOL Programmer’s Guide, SC09-2540-02  
v ILE COBOL Reference, SC09-2539-02  
v ILE COBOL Reference Summary, SX09-1317-02  
v ILE RPG Programmer’s Guide, SC09-2507-03  
v ILE RPG Reference, SC09-2508-03  
v ILE RPG Reference Summary, SX09-1315-02  
v iSeries Security Reference, SC41-5302-04  
v System API Programming, SC41-5800-00  
v System Manager Use, SC41-5321-01  
v
ADTS/400: Character Generator Utility,  
SC09-1769-00  
v ADTS/400: Data File Utility, SC09-1773-00  
v
ADTS/400: File Compare and Merge Utility,  
SC09-1772-00  
v
ADTS/400: Interactive Source Debugger,  
SC09-1897-00  
v ADTS/400: Programming Development Manager,  
SC09-1771-00  
v
ADTS for AS/400: Report Layout Utility,  
SC09-2635-00  
v ADTS for AS/400: Screen Design Aid, SC09-2604-00  
v
ADTS for AS/400: Source Entry Utility,  
v System Operation, SC41-4203-00  
SC09-2605-00  
g{zITCJrXx,rzITSTB Web >c  
q!10D iSeries E"Mvfo:  
v Introducing Application Development ToolSet for  
OS/400 and the AS/400 Server Access Programs,  
GC09-2088-00  
http://www.ibm.com/eserver/iseries/infocenter  
TZ iSeries vfoD PDF f>,N{ iSeries E"  
PD:Va9E, SB84-0456-00 CD ROM#  
0&CLrVd~q1b|,BPvfo:  
v ADTS/400: Application Dictionary Services Self-Study  
Guide, SC09-2086-00  
v ADTS/400: Application Dictionary Services User’s  
Guide, SC09-2087-00  
VisualAge RPG b|,BPvfo:  
v VisualAge RPG Parts Reference, SC09-2450-04  
© Copyright IBM Corp. 1992, 2001  
249  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
250 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
"bBn  
>JOG*Z@za)Dz7M~q*"D#IBM I\;PZd{zRa)>D5PV  
[Dz7"~qr&\?~#I/>XD IBM zm,Tq!PXzyZDXx10I  
qCDz7M~qDE"#NNT IBM z7"Lrr~qD}C";rcywr5>  
;\9C IBM Dz7"Lrr~q#2G,H&\Dz7"Lrr~q,;*;V8  
IBM DNN*6z(,<IT9C#;x,@@Mi$NNG IBM Dz7"Lrr~  
qDYwyIC'TP:p#  
IBM I\Q-jkr}Zjkk>D5PXDwn({(#a)>D5";m>Jmz  
9Cb)({#zITCifN=+mIi/Dy:  
IBM Director of Licensing  
IBM Corporation  
North Castle Drive  
Armonk, NY 10504-1785  
U.S.A.  
BPLD;JCZ"zrbVf(k1X(I;;BDNNd{zR:zJL5zw  
+>04-y1a)Kvfo,+;wNNw7r5>D#$,|(+;^ZT;V  
("z[\&rX(C>DJ&TD5>#$#3)zR;JmZX(BqPqOw  
7r5>D#$,rK,KywI\;JCZz#  
>JOI\a|,<uTmsr!"ms#a(ZT>iPDE"xP|D;b)|  
D+`k>vfoDBf>P#IBM I\ZNN1dZ;(*DivBDxM/r|D  
>vfoPhvDz7M/rLr#  
>JOv*=czN<xa)KTG IBM Web >cDNN}C,b)}C";TG)  
Web >ca)NNN=D#$#G) Web >cODJO;G> IBM z7JOD;?  
V,9CG)>cyx4DgUIzT::p#  
*KTB?D:(i) JmZ@"4(DLrMd{Lr(|(>Lr).dxPE";;  
(ii) JmTQ-;;DE"xP`%9C,x#{q!>LrPXE"DmI$VP_&  
kTBX7*5:  
IBM Canada Ltd.  
Department 071  
1150 Eglinton Avenue East  
North York, Ontario M3C 1H7  
Canada  
;*qXJ1DunMu~,|(3)iNB;(}?D6n,<Iq!b=fDE  
"#  
>JOPhvDXmLrMICZCXmLrDyPXmJOyI IBM Z0IBM C'  
-i1"0IBM zJLrmI$-i1rRG.dDNNH'-iDunBa)#  
© Copyright IBM Corp. 1992, 2001  
Download from Www.Somanuals.com. All Manuals Search And Download.  
251  
 
>JOP|,KCZU#Lq&mD}]r(mD>}#*K!I\j{X5wJ  
b,b)>}|,KvK"+>"7FMz7D{F#yPb){F<Gi9D,g  
k5JL5s5y9CD{FMX7`F,?tIO#  
LjM~qjG  
TBwnGzJL5zw+>Z@zMrd{zRDLj:  
Application System/400  
iSeries  
AS/400  
Operating System/400  
OS/400  
AS/400e  
C/400  
RPG/400  
COBOL/400  
System/36  
System/38  
SystemView  
VisualAge  
WebSphere  
DB2  
DB2  
e(XphFD)  
IBM  
Integrated Language Environment  
Java MyPyZ Java DLjMUjG Sun +>Z@zM/rd{zRDLj#  
d{+>"z7M~qD{FI\Gd{+>DLjr~qjG#  
252 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
w}  
`L*"\mw (PDM) (x)  
?~ (x)  
[A]  
[B]  
f>  
oz  
(f<V5CLr (RLU)  
`k  
?~  
HO  
`L*"\mw (PDM)  
?~`M,Ev  
?~Pm?~  
© Copyright IBM Corp. 1992, 2001  
253  
Download from Www.Somanuals.com. All Manuals Search And Download.  
 
?~Pm?~ (x)  
4( (x)  
<k?~  
<kTs|n  
?~.dDX5,(e  
?~.dDX5, (e  
M;x(  
4(X5  
[C]  
(e  
cNa9  
i/?~  
i/n?  
[D]  
r!  
I1'V  
10?~  
X|{  
}%  
<v  
<k  
4(  
254 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
(e (x)  
9(==N}  
[G]  
9(==,hC  
yi  
9(}L  
(F  
|D  
`oT&CLr  
9(!n?~  
[F]  
9(  
CJ  
9((f  
CJ\?  
[H]  
O"?~  
9(?~  
V<SULr  
XU  
[J]  
8i  
9(6'  
lv  
lk  
2G}]bD~|n  
4F  
lw  
w} 255  
Download from Www.Somanuals.com. All Manuals Search And Download.  
lw (x)  
XFoT (CL) |n (x)  
(^ (x)  
;fn?Qw76  
[R]  
b
[K]  
[S]  
*"i  
bPm  
XFoT (CL) |n  
>}  
)doz  
OBDoz  
[L]  
_-D~  
[M]  
?ji  
}]D~5CLr (DFU)  
Qw76  
[P]  
A;hF(z (SDA)  
[Q]  
(^  
256 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Qw76 (x)  
n?\m (x)  
[W]  
b?b  
b?Qw76  
omD~  
Qw76?~  
[X]  
53\m  
53Pm?~  
[T]  
n?G<  
T>  
a}  
a}76  
`XX5  
n?b  
a}k  
n?  
T\a_  
mS  
[Y]  
&CLr*"  
n?\m  
w} 257  
Download from Www.Somanuals.com. All Manuals Search And Download.  
&CLr*" (x)  
CL |n  
[Z]  
*;  
&CLrVd~q  
i
CoOperative Development Environment/400  
(CODE/400)  
C'(e`M  
D
DSPPART |n  
C'(e!n  
A
ACCESS N}  
C'r*m  
C'b  
E
oT'V  
F
FORCE N}  
FROM N}  
B
BLDPART |n  
4dk5CLr (SEU)  
I
C
6L53  
L
LANG N}  
258 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
LANG N} (x)  
TYPE N} (x)  
R
M
S
N
U
SAVDTA N}  
NOTIFY N}  
USRPRF N}  
SAVLST N}  
V
VARPG  
SCAN N}  
O
OUTPUT N}  
SCOPE N}  
SRCFILE N}  
W
P
PRMCODE N}  
T
TEXT N}  
TO N}  
TYPE N}  
PRTPRJLOG  
Q
w} 259  
Download from Www.Somanuals.com. All Manuals Search And Download.  
260 &CLr*"\mwC'8O  
Download from Www.Somanuals.com. All Manuals Search And Download.  
Download from Www.Somanuals.com. All Manuals Search And Download.  
ꢀꢁꢂ  
Lr`E: 5722-WDS  
Pz!"  
SB84-0449-00  
Download from Www.Somanuals.com. All Manuals Search And Download.  

Graco Inc Automobile Parts 308287 User Manual
Graco Stroller PD194243C User Manual
Graham Field Wheelchair 603900A User Manual
Grizzly Paint Sprayer G0533 User Manual
Grizzly Riding Toy G7112 User Manual
Hamilton Beach Blender 70590C User Manual
Hearth and Home Technologies Outdoor Fireplace GO35MTCH User Manual
Honeywell Air Cleaner F111 User Manual
Husqvarna Trimmer 324L 324LD User Manual
IBM Printer A00 User Manual