IBM SB84-0449-00 *"?~

*"?~

>Za);vy>=8,|8<zjI;)IT9C0`L*"\mw15CLr4

PDYw:

vlv?~

v|D?~

v4F?~

vX|{?~

v*;?~

vHO?~

vO"?~

v>}?~

v9(?~

vbT?~

vlk?~

vZ?~PiRV{.

v9CQi5I1

va}?~

v|Da01!5

v4(M9CC'(e!n

K>}Y(z}ZZ1943D<72y>D0CPDM 49C?~1A;P$w,"RzT

iDEVELOPER1 MDEVELOPER2 _P|BCJ(#z+*9CDDv?~{*

RPGSRC BIWKLY"RPGSRC MNTHLY"RPGSRC WKLY MRPGSRC OVRTM#|

GfZZ<80y>Dn?cNa9PDiMASTER P#

*ZzT:D$w>O4PK&hvDYw,k9Cn?PDJ1?~Mi#

MASTER

RPGSRC BIWKLY

RPGSRC MNTHLY

RPGSRC WKLY

RPGSRC OVRTM

MASTER

DEVELOPER2

TEST

DEVELOPER1

MASTER

80.

y>=8P9CDn?cNa9

198 &CLr*"\mwC'8O

Contents

Main Page Page "b! 9C>JOM|'VDz7.0,kqXDAZ2513D:"bBn;BD;cE"# ?< XZ>i..............vii |||| Z1B&CLr*"\mw&\?~i\..1 Z2B9Cn?............7 Z8B?~Pm?~"-rXFM|DzY91 Z9B9CQw76.........97 iv Z10B&mC'(e`M.......105 Z11B9(&CLr........119 Z14B+&CLrV<A6L53...169 || Z15B#$&CLr*"\mwE"175 Z16B9C`L*"\mw5CLr187 Z17B9CVisualAge RPG ?~. . 209 Page XZ>i -&9C>i E"PD:Va9E E"PD Hvu~M`XE" gN"MzDb{ y>n? viii (e (e q!*zE" Page Z1B&CLr*"\mw&\?~i\ n?\mDEv n?\m1DG+ 53\m1 2 ?~*"DEv &CLr*"_DG+ &CLr*"73 &CLr*"D$_ 9C&CLr*"$_d5CLr 4 9C&CLrVd~q&\?~ 9C0WebSphere *"$_1z7 9CCODE/400 $_ CODE/400 `-w D~ 9CVisualAge RPG $w>$_ 6 Z2B9Cn? 4(n?(CRTPRJ) 9Cn? T>yPn?(QRYPRJ) 8 |Dn?(CHGPRJ) r!XZn?DE"(PRTPRJ) 10 >}n?(DLTPRJ) Page Z3B9Cn?cNa9PDi 4(i(CRTGRP) n?iMbPm 14 4(n?cNa9 Page *n?cNa9(e;va}k 16 Page 9ln?cNa9 a}k 18 4;= ;v?~D=vf> 4(;v;Pa}kDi *ihC(* 20 Page 9Ci |Di(CHGGRP) 22 |Dn?cNa9PDi Page |Dn?cNa9PDa}76 24 >}i(DLTGRP) Zn?cNa9PGGC' GG*"_Mn?\m1(ADDPRJUSR) 26 9Cn?C'|n r!C'GGE"(PRTPRJUSR) 28 |DC'GGE"(CHGPRJUSR) }%C'GGE"(RMVPRJUSR) 4(y>n?cNa9 30 Page 32 Z4B?~*"i\ P>n?Mi{T0zDCJ( i4?~Pm(QRYPART) 34 Page T>Mr!?~(DSPPART) 9C0T>?~1(DSPPART) |n4T>rr!?~DZ]rXw#m1P>K DSPPART |nwCD|nT0wV?~`M# 36 8(n?"i"`MM?~D{F#9IT!qk*+dv<rN&,T0g{Z8 (DiP4R=3v?~,Gq9C1!Qw764iRC?~# TYPE N}7(;wC4T>rr!?~D|n# Page Page Z5B4(?~ ?~`M ?~`MMoT 40 4(B?~(CRTPART) 42 {F# ?~`M0d`&D1!4D~ 4F?~(CPYPART) 44 zk4FD?~ zk4(D?~ 46 Page Page Z6B<k&CLr <k=n?cNa9P ;a zk<kDD~rTs 50 &CLr*"\mw&\?~'VD 4I1`M &CLr*"\mw&\?~'VD 52 4I1`M \&CLr*"\mw&\?~'VD Ts`M Page D~{ I1{ k*4(D?~ 54 Page 56 <k;v?~D=8 <ky>&CLr 58 Page Page Z7B9C?~ lv?~(CHKOUTPART) 62 }]2+TMj{T |D?~(CHGPART) 64 Page 66 *;?~D`MMoT(CVTPART) fr ^F 68 HO?~(CMPPART) O"?~(MRGPART) 70 Page O"y>&CLr 72 lk?~(CHKINPART) a}?~(PRMPART) 74 a}I9(}L4(Ddv?~ a}?~Pm?~ a}k 76 9CCHKOUTPART"CHKINPART MPRMPART |n 78 X|{?~(RNMPART) >}?~(DLTPART) 80 M;x(gN|D n?\m1I$ i5?~ 82 ?~DX*E" |D?~E"(CHGPARTINF) hv 84 r!?~E"(PRTPARTINF) 86 lw?~E"(RTVPARTINF) 9C 88 Lr |nDy> 9C Lr |nDy> Page Z8B?~Pm?~"-rXFM|DzY 4(?~Pm?~ |D?~Pm?~ 92 ?~`M ?~{ T>?~Pm?~ r!?~Pm?~ 94 zYJb |D PARTL N}1!5 Page Z9B9CQw76 KbQw76 98 i0dkbPmDX5 4(Qw76?~ 100 4(;fn?Qw76 +2E" 4(b?Qw76 102 gN&mQw76?~ ZQw76?~P8(ix;Pv|G 104 Z10B&mC'(e`M KbC'(e`M mSC'(e4I1`M(ADDADMTYPE) mSC'(eTs`M mS4f"ZTsr4D~I1PDC'(e`M 106 mSC'(e`M-y>=h 9CC'(e`M mSC'(e`M(ADDADMTYPE) }%C'(e`M(RMVADMTYPE) 108 r!C'(e`ME"(PRTADMTYPE) 9CC'(eoT rC'(e`MmSoT(ADDADMLANG) 110 Page |DC'(eoT(CHGADMLANG) 112 }%C'(eoT(RMVADMLANG) r!C'(eoTE"(PRTADMLANG) 114 (e*dOC'(e`M9CDYw(CHGADMACN) mSRJE Ts`M*CSI->} 116 mSC'(e`MZPASSRC->} mSC'(e`MRPT->} 118 Z11B9(&CLr Kb?~X5 &CLr*"\mwPDX5 120 Page r1(CRTBNDC) |n,r;a4(`M*MODULE D?~,x;4(`M*PGM D?~# iPD?~0d`Xn BLDPART |nwCD`kwM$&mw ITk&CLr*"\mw&\?~dO9CD`kwM$&mw 122 | | BLDPART |ngN7(N1`k?~ 9(- r hC9(73 #f}] ("BLDPART <r Z;N9( 124 ;* ?N9(.s 9(}LgNQw?~ 126 } C`X?~1,;&Z4zkP8(b{# 9C9(?~|n 128 hC9(6' 130 Page 132 Page 7(Gq9(yP?~ 7(9(== 134 +a #f9((fM`kwPm 9(-r 136 /f s(Lr 4Ps(=h +?~mSA?~Pm?~ 9(OY?~ 9C9(!n Z4(`M*BLDOPT D?~.0h*<GDBn 138 `kw!n 4(9(!n?~ Page 140 Page 142 `kw!n +BLDOPT ?~CZ CODE/400 gN&m`M*BLDOPT D?~ 144 n?cNa9PP`v9(!n?~ 146 CZomM_-D~DXb9(!n|n 8(OVRDBF MDLTOVR |n CZX(?~`MDXb9(&m 9C?~Pm?~9(?~ 148 9(omM_-D~ #fomD~}] `M*CSRC"CINC MPGM RoT*CMSQLC D?~M9 (}L `M*MENU D?~M9(}L DB2 OS/400 f?~M9(}L T?;v}Z`kD?~T>D{" 9(y>&CLr 150 Page 9(}LMC'(e`M 7#9(}LKb?~.dDX5 152 9(4f"ZTsrI1PD?~ 9(f"Z4D~I1PD?~ +9(!n?~kC'(e`MdO9C R;= Page Z12BbTMKP&CLr bT_ TbT_(exPiDn?cNa9 _PACJ(DbT_ _P|BCJ(DbT_ 156 Zn?cNa9PbT?~r&CLr +n?bmSAbPm 158 +b?bmSAbPm SbPmP}%n?b yP 160 Z13B<v&CLr <v&CLrTT|xPbT 9C<v?~|n *<vD?~ 162 *4(DTsrD~ ?jb ;f;D~ f?~;p<v}] <v?~1XhDZ( 164 <v?~Pm?~ 9C53Pm?~<v <vMb0&CLr 4(z7(eMz70k?~ 166 4(?~Pm?~T|,*b0D?~ *b0&CLrx<v?~Pm?~ hCb0E" Page Z14B+&CLrV<A6L53 V<SULr ;x&CLr*"\mwD1053 xPr;x&CLr*"\mwD053 170 9(0"Pf&CLr 4(53Pm?~ +&CLrV<A6L53 172 S6L53SUTs(RCVPART) xP&CLr*"\mwD10"Pf53 ;x&CLr*"\mwD10"Pf53 ;x&CLr*"\mwD0"Pf53 xP&CLr*"\mwD0"Pf53 NNd{iSeries 400 53 174 ^F Z15B#$&CLr*"\mwE" &CLr*"\mw&\?~PD2+T (^Pm d{n?2+T"bBn 8]MV4&CLr*"\mwE" 8]MV4_T 176 (F XUn?(RCLPRJ) 178 S|n&mJOV4 V4?~*"|n 4= 180 V4n?\m|n +E"4FAm;vAS/400 53 %f>&CLr `f>&CLr 9Cn?G< r!n?G<E"(PRTPRJLOG) 18. 182 r!n?G<PG<D|n 62. PRTPRJLOG PRTPRJLOG PRJ(PAYROLL) |nzIDy>(f Page ZC'k*n?1xPV4 P>*"iPD?~ 184 >};\a}D?~ }%n?C'(RMVPRJUSR) >}i(DLTGRP) 9CU>xPsFzY w**"_D\m1D"bBn 186 Z16B9C`L*"\mw5CLr `L*"\mw5CLrEv kE 8(n? 188 Page 8(i 190 Page 9C?~ 192 `M"?~ oT `M"?~ ?~Pm CPDM 49C?~ 194 p<UZ axUZ 196 CPDM 49C?~PmPD?~ *"?~ 198 lv?~ 8 (Di |D?~ 4F?~ X|{?~ 200 *;?~ ?j`M HO?~ O"?~ >}?~ 9(?~ 9(6 ' 202 bT?~ lk?~ 9Ci5I1 |Da01!5 0(hcNa91"0Qw761"0"B?~P m1 204 0;T>4?~1 (hcNa9"Qw76 9(6' Qw76 ( hcNa9 Tsb"f;Ts C'(e!n 4(C'(e!n 206 !n |n 9CC'(e!n <kOS/400 Tsr4I1 208 mSM}%n?b Z17B9CVisualAge RPG ?~ <kVisualAge RPG ?~ <vVisualAge RPG ?~ 9(VisualAge RPG ?~ VisualAge RPG ?~*" 210 Z18B9CSystem/36 MSystem/38 &CLr 9CSystem/36 &CLr 9(System/36 &CLr System/38 &CLrD"bBn 212 =<A. &CLr*"\mwXFoT|n &CLr*"\mw 214 |n =<B. ?~`MT0|Gk|nDX5 9CBPwm47(IT|,TYPE N}D0&CLr*"\mw1|n8(\0& CLr*"\mw1'VD`M(y=G,I8(,<blank>=q,;\8()# 216 Page 218 Page 220 Page 222 =<C. |{fr n?Mi{ ?~{ C'(e`M{ 224 a}k{F Page =<D. f;d? Tz&m==KP 228 Page 8(Di 230 Tz&m==`k f;Ts 232 Page 8(Di 234 Page 236 Page Page =<E. 9((f{" >=<P>9((fPvVDBLDPART |n{",|Ghv9(?~D-r#a) KZ;6MZ~6{"D># ?~ M `M /f{" Xb/f{" 240 =<F. `oT'V `oTn?cNa9 Yh n?cNa9gN$w KbCCSID 242 Page ;* 244 =<G. a>k<I T\Dx DxT\ DxWRKPARTPDM M?~|nT\ ?~*;:<kAfi4 *=S&mhCvZLr 246 d{a>k<I 9C;,$HD4D~ Page DW?< :&CLr*"\mwC'8O E" PD:Va9E Page "bBn LjM~qjG 252 w} [A] [B] [C] [D] 254 [F] [G] [H] [J] [K] [L] 256 [M] [P] [T] [W] [X] [Y] [Z] A 258 B C M N O P Q