ꢀꢁꢂ
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!
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#
|
|
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
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
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[=
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.
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#
<#
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#
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
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?~#
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*"
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
>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
9C OUTPUT N}4T>&C+dv<rN!5*+(fYQzT)r!,
OUTPUT(*PRINT)#
>}
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
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#
>}
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?
MASTER
MASTER
MASTER
TEST
MASTER
DEVELOPER1
MASTER
DEVELOPER2
< 5. PRTPRJ (fPhvDn?cNa9
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#
>}
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
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
>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
1z4(i1,Xk*|a)=v{F:;vCZZyPki`XD CL |nP9CD
i,m;vGIevV{iIDrF#KrFkn?rFiOp4,*n?PD?v
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 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*
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.
>}
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#
>}
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')
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
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
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
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
{ZG)iPP?~Da}k* V2 D0)#byvaF5b)?~D V2 a}76#
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>
>,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
;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,
PARTLREQ N}8(1ZKiP|D?~1Gq PARTL {GXhD#t*X(i8
(K *YES,r19C?~*"|nR+Kiw*?ji1,Xkxv-r#
|Dn?cNa9PDi
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#
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
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?~;
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/
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|
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#
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
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')
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
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
7. ZTn? TRAVEL GGK Dave"Nicole M Ken .s,IT9C PRTPRJUSR |
"b,zDC'r*m2P>Z(fO,-rGzQ-4(Kn?,rxz2Gn
?\m1#
8. zITv(zh*8(;vr9n?\m1#9C CHGPRJUSR |n4jIKYw#
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)?~#
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#
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{{
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!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)
>}
i DEVELOPER1#ZCiP4R=C?~,rK QRYPART |n+XE1!Qw76
(ZK>}P* DEVELOPER1"TEST"MASTER)4iRC?~,"Zi MASTER
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)
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
":
OUTPUT N}7(&C+dv"MAN	C1!5 OUTPUT(*) 49dvvVZA
;O#OUTPUT(*PRINT) +9dvYQzAr!h8DdvSPO#
36 &CLr*"\mwC'8O
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(?~#
?~`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?~
((}"v BLDPART"IMPPART r CPYPART |nx4(DI53a)D?~`
;\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
< 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
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{;
g { z } Z 4 ( D ? ~ ; G 4 ? ~ , } g , } Z 4 ( D G ` M *
MSGF"DTAARA"JOBD r MSGQ D?~,rIT8(Gqk*a>J1D4(|
`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
IT*#fD~4(`M* FILE xoT* SAVF D?~#
g{z}Z4(D?~D`M* SCHPTH,r CRTPART |n+Q1!Qw76S8
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(|,?~,
>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 |
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*
(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
`M#1!5* *SAME#4D~{k-<?~y9CDD~{`,#9C{F4j6
X(D4D~,r_9C1!5 *TYPE 48(+9CI53a)D1!4D~#(PX
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#
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.
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<
© 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*"\
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
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
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&
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 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
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
{`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
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
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
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#
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#
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')
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')
3. j6F.<kDyP&CLr,"7(D)Ts`MI<kn? PAYROLL#N{
P OS/400 Ts`MDPm#
<G9C0C PDM 49CI11A;M0C PDM 49CTs1A;4Pvwv
&CLrD?~D OS/400 4D~I1MTs#9IZb)A;P9C IM M IO
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{
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
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)
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#
XhN}
Z CHKOUTPART |nO8(n?"i"`MM?~#"GyP`MD?~<ITl
v#
I!N}
9C PRMCODE N}48(*Z7(?~Da}7619CDa}k#KN}JCZ
?~,;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
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#
}?~ (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.
"_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
"+;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}
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>#
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#
TZC'(eD?~`M,at/Z CHGADMACN |nD ACTION N}O(eD
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
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,;(*
(#,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
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
+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
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)
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}
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
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
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
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
M PRMPART |n0s?~"zDd/#
~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 |
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
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?~#
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}
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?~
< 28. DLTPART |nMM;x(
Y(+?~Si DEVELOPER1 a}Ai TEST,;s+dYlvAi DEVELOPER1#
VZ?~ BIWKLY D1>fZZTB}viP:DEVELOPER1"TEST M MASTER#
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 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}
Z7B 9C?~ 83
Download from Www.Somanuals.com. All Manuals Search And Download.
I!N}
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
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}
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)
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
!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#
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
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{?~
( 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#
DEVELOPER1 *<D1!Qw76* DEVELOPER1 A TEST A MASTER#
8CQw76
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
< 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
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 |
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
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.
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
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#
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
0l#
>}
|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#
>}
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
}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{#
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{
*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}
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)
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#
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#
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)
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#
"\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}
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
{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
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?~#
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_
** 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?#
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?~#
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"#
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#
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#
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
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 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#
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
g{zDi/9C`M* SCHPTH M BLDOPT D?~,r;&Dx*"_a}{G
T:D BLDOPT r SCHPTH ?~,}G{GC=\m1r!i$DmI#PXgN
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~#
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
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#
>`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
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
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(
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
>}
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
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#
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
\mw1&\?~'VD OS/400 Ts`M#
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
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?
~#
>}
*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)
>}
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#
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#)
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-{"
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{
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(
D9(}LDdv#
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?
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*
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
*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
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
?~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|#
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:
2. 7#K?~ZQw76P#
3. S53a)D BLDOPT ?~D CODE/400 ?VP}%TJ1`kw|nD"M,
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
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?~
?~#?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)
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
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
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#
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
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.
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
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-
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#
*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 ’Q’ r ’#’ *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&
_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
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
>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]?~
}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#
>}
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
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 |
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
+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.
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
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
J6p#
*<vD?~
XkZ EXPPART |nP8(n?"i"`MM?~{#TZ TYPE M PART N},
Z TYPE N}O,IdkX(?~`M#}g,TYPE(RPGSRC) +<v`M* RPGSRC
yP;2+D?~#g{8( TYPE(*NONSRC),r;<vf"ZTsPD?~`M,
nD SYSTYPE N}D *NONE 5(eD?~#K`MD?~QfZZ0&CLr*
"\mw1n?b?DbP#
Z PART N}O,IdkX(?~{#}g,PART(BIWKLY) <v?~ BIWKLY#
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?~#
~#
>}
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"
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<#
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
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#
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
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
|
|
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
PLrTs(rzwIADO,4 MRM)S QADM b4F= QADMDIST b
|
|
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,
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=
~.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.
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
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&\?~
)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)
~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
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|
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
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
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
© 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:
>#
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
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"
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!
8(i
zITZ09Ci1A;P8(*&mDi#wCKA;D=(P}V:
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
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&\|#
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{.
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:
;#
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?~
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;
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#
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)?
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
i DEVELOPER1 M DEVELOPER2 _P|BCJ(#z+*9CDDv?~{*
RPGSRC BIWKLY"RPGSRC MNTHLY"RPGSRC WKLY M RPGSRC OVRTM#|
*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?~
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
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"#
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>}
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
bT?~
ZI&9(?~.s,z&TdxPbT#I9C ADDPRJLIBL |n+n?Dwvb
!n 16(KP)+KPC?~#K!nT`M* PGM"REXXSRC M CMD D?~
P'#
zIT9CZ AS/400 bPmPmSr}%n?bD=vC'(e!n#PXb=v!
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.
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)#
|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
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	(
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
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;,
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)
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
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"#
<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
>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
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?~
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
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
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;
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
>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
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
n?cNa9gN$w
© 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
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#
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_-#
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#
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.
?~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.
|