Z8B ?~Pm?~"-rXFMDzY

?~Pm?~G?~`M* PARTL D?~,,Iw*_-Vi&mD?~DPm#

1*xPBPYw1a"VK?~`MG#PC:

v;Na};iX(?~

v;N9(;iX(?~

v;N<v;iX(?~

vzYQDD;iX(?~

>Ba)PXBPwbDE":

v4(?~Pm?~

vD?~Pm?~

vT>?~Pm?~

vr!?~Pm?~

vzYJb

vD PARTL N}1!5

4(?~Pm?~

I9C CRTPART n4(?~Pm?~#

>}

TBnZn? 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( C?~#PXj8E",N{Z413D:4(B?~ (CRTPART);#

Z?~Pm?~Z,4(k*w*_-Vi&mD?~Pm#}g,ZOv?~Pm ?~P,ImSBPu?:

RPGSRC PROGRAM1

RPGSRC PROGRAM2

RPGSRC PROGRAM3

9I9C`t?~`Mr?~{#GE (*) MJE (?) D9CfrZZ333D:XhN };PwKhv#9C *ALL 8>&9CyP{F#9C **ALL 48>&9CT ALL axDyP{F#

TB?~Pmu?+<B53&m0;>}PT>D`,?~#

RPGSRC PROGRAM*

© Copyright IBM Corp. 1992, 2001

91

Page 103
Image 103
IBM SB84-0449-00 manual Z8B ?~Pm?~-rXFMDzY, Rpgsrc PROGRAM1 Rpgsrc PROGRAM2, Rpgsrc Program