r!?~E" (PRTPARTINF)

0r!?~E"1(PRTPARTINF) nar!XZ?~XwDBPE":

vn?"i"`MM?~

vC4`kC?~DoT

vONDC?~DK1

vOND?~Z]DUZM1d

v4(C?~DUZM1d

v8(xC?~Da}k

vM;x(

vCJ\?

vT&D OS/400 {F(b"Ts"`M"I1)

v,Zn?cNa9DCV'PvVC?~DnM;C,Ra}kkK?~`,D i

vCn?cNa9DCV'PvVC?~DnM;COD?~lv,Ra}kkK? ~`,DK1DC'r*m

vhvC?~DD>

XhN}

8(k*r!dE"D?~Dn?"i"`MM?~{#i4=<B. ?~`MT0G knDX5Tq!IZ PRTPARTINF nO8(D?~`MDPm#

I!N}

9C OUTPUT N}8>dv&&ZD;C#1!5* OUTPUT(*PRINT)#(f;YQ zAKw5Dr!h8#OUTPUT(*OUTFILE) a+dv}<AdvD~#

dvD~DG<q=kb QADM PD53a)}]bD~ QALYPARTI 9CDq= `,#

>}: I(}8(`FgBDn+dv}<AdvD~#

9C PRTPARTINF n

PRTPARTINF PRJ(PAYROLL) GRP(DEVELOPER1) TYPE(RPGSRC) PART(BIWKLY)

OUTPUT(*OUTFILE) OUTFILE(*LIBL/FILE1)

OUTMBR(*FIRST *ADD) SCAN(*YES)

9C0`L*"\mw15CLr

Z0C PDM 49C?~1A;O!q!n 26(r!E")#

bPmC47(*f"dvD~ FILE1 D;C#FILE1 PDZ;vI1SUdv," +dv}]mSAVfG<#

PRTPARTINF nOD SCAN N}8(GqQwn?cNa9TiRC?~(g{Z 8(iPR;=D0)#1!5* SCAN(*YES)#

>}: TBnr! RPGSRC ?~ BIWKLY D?~E"#

Z7B 9C?~ 85

Page 97
Image 97
IBM SB84-0449-00 manual ?~E Prtpartinf, 9C Prtpartinf n