<k4omD~1,IZMBR N}O8(X(4I1,r(}9CXb5*ALL 8
>*<k4D~ZDyPI1#9I9C`t{#I9CgABC* .`Dq=8(`t
I1{,Sxa&mTV{ABC *7DyPI1#
g{ZOBJTYPE N}O8(K*FILE"*SRC"r*ALL,,198(KOBJ(*ALL),
rh*5MBR(*ALL)#g{;S4D~<k;vI1,r8(OBJ(
D~{
)"
OBJTYPE(*SRC)(rOBJTYPE(*FILE))MMBR(
I1{
)#
k*4(D?~Xk8(;)E"48>k*<kOS/400 Tsr4I1D;C#
XhN}
?~GZz8>Dn?MiP4(D,TOS/400 Tsr4I1*y!#ZPRJ N}
O8(n?{,"ZGRP N}O8(i{#b=vN}<GXhD#
ZTYPE N}O8(0&CLr*"\mw1?~`M#g{8(Xb5*OBJTYPE
R}Z<kDTs;G4omD~,r?~`M1!*OS/400 Ts`MD0&CLr
*"\mw1H'5#}g,g{<k*PGM Ts"8(TYPE(*OBJTYPE),r0&
CLr*"\mw1`M*PGM#
g{}Z<kDTsG4omD~,r?vI1<aI;v@"?~#TZb)?
~,Z8(Xb5*OBJTYPE 1C?~`M1!*OS/400 TstTMI1`MD0&
CLr*"\mw1H'5#N<m4Mm5Ti4OS/400 `Mk?~`MD`XT#
9I8(X(?~`M#+G,;\ZTYPEN}Oa)T<kDOS/400 Ts^be
D0&CLr*"\mw1?~`M#}g,;\+`M**PGM DTs<k`M*
RPGSRC D?~#g{T<byvD0,IMPPART |na'\#
XkZIMPPART |nDTYPE N}O8(VRPGTXT rVRPGBIN,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+<kxPC/400 4odD4I1,"4(`M*CSRC D?~
HELLO#?~oT;hC*CLE(g{HELLO D4I1tT*CD0)#
9CIMPPART |n
IMPPART OBJ(*CURLIB/CSRC) OBJTYPE(*SRC) MBR(HELLO) PRJ(PAYROLL)
GRP(MASTER) TYPE(CSRC) PART(*NAME)
9C0`L*"\mw15CLr
Z0CPDM 49Ci1A;O!q!n38(<k)#
g{<k|,tT*CrSQLC DC4D4I1,a4(`M*CSRC (}GZ
TYPE N}Ow78(KCINC `M)R?~oTVp*CLE rSQLCLE D?~#
ZPART 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)#
>}
:I1BIWKLY ;<k"X|{*EMPMST#
54 &CLr*"\mwC'8O