VZ,Y(i DEVELOPER2 PD3v*"_ks9(?~ RPGSRC BIWKLY#i D E V E L O P E R 2 ;,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
iDEVELOPER2 PD*"_D9(?~Df>ki DEVELOPER1 PD*"_9( Df>;,#
g{k*C9(}L(};,Z1!Qw76DirPQw?~,rzI\k4(z T:DQw76?~#TZ"vD?v BLDPART n,;a9C;vQw76?~# K?~D?~`M* SCHPTH#BLDPART nOD SCHPTH N}P=v5:*DFT M{F#Z1033D:gN&mQw76?~;hvKb=v5#
r*KP BLDPART n10&CLr*"\mw1&\?~a9CbPm,yT,} C`X?~1,;&Z4zkP8(b{#g{zbyvD0,1`kwZQw76 P(eDbPmPQw1,I\a9C;}7D?~f>#bI\a<B BLDPART n"v/f{"#
g{z}Z9(D,rD~?~;fZZn?P,+fZZbPmP,raZ9( (fP"v/f#;x,P19(aLx4P,"R;"v/f:
vZ 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~#
vDB2/400 ,D~
9(}LavT8(D DB2® OS/400 f,od,gBy>:
EXEC SQL INCLUDE SQLCA EXEC SQL INCLUDE SQLDA
IZDB2 OS/400 f`kw;aSm;vI1r4D~A!4,yTb)od;Gf }D,od#
v,Z QRPG/QIRGINC PD RPG/400
BLDPART n;QwQw76PDi4j6`kwy9CD{"D~#g{R;= MSGF,r_;G;v?~,ra"v/f#
9C9(?~n
9C BLDPART nI9(;v?~r{v&CLr#*"_M\m1<IT9CK n#(#,n?\m1r!i$9(&CLr,x*"_9(&CLrD?~ri ~#>Zhv\m1M*"_gNXF9(}LD"z,y] BLDPART nD9(6 '"9(==M9(?FN}O8(D57(9(D)?~#
XkZ BLDPART nD PRJ M GRP N}O8(n?{Mi{#zXkTKi_P BCJ(#9Xk8(?~`MM?~{#
*8>*9(X(`MM{FD?~,kZ PART N}Odk{F,"Z TYPE N} Odk`M#zIT8( *ALL T8>*9(yP`MDyP?~#}g,g{dk TYPE(*ALL) PART(*ALL),ra9(yP`MDyP?~#2ITT`MM?~8( `t{#i4Z333D:XhN};,TKb`t{D9C#
Z11B 9(&CLr 127