<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#

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<m4Mm5Ti4 OS/400 `Mk?~`MD`XT#

9I8(X(?~`M#+G,;\Z TYPE N}Oa)T<kD OS/400 Ts^be D0&CLr*"\mw1?~`M#}g,;\+`M* *PGM DTs<k`M* RPGSRC D?~#g{T<byvD0,IMPPART na'\#

XkZ IMPPART nD TYPE N}O8( VRPGTXT r VRPGBIN,E\<k VARPG 4r~xFTs#g{<kK4D~,R8(K`t?~`M,ravp<k 4D~PDI1#g{<kKomD~,R8(K`t?~`M,rComD~aw *`M* *FILE D?~<k#

>}: TBn+<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?~#

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)#

>}: I1 BIWKLY ;<k"X{* EMPMST#

54&CLr*"\mwC'8O

Page 66
Image 66
IBM SB84-0449-00 manual 4D?~, Xk8E48k*k OS/400 Tsr4I1DC#, 9C Imppart n