mb,IT(}8( OUTPUT(*OUTFILE) 4+dv<r3vdvD~#dvD~DG
<q=kZb QADM PI53a)D}]bD~ QALYQPRJ Py9CDG<q=`
,#
>}
bPmC47(ZN&f"F* OUTFILE DdvD~,D~PDZ;vI1+SUd
v#
QRYPRJ OUTPUT(*OUTFILE) OUTFILE(*LIBL/OUTFILE) OUTMBR(*FIRST)
|Dn? (CHGPRJ)
9C0|Dn?1(CHGPRJ) |n4|Dkn?`X*DD>,r_|D1Zn?PX
B9(omD~1Gqk*T/#fMV 4zDbT}]#;Pn?\m1E\9C
K|n#
g{z8( SAVDTA(*YES),r9(}L+Z9(.0#fbT}],xZXB9(o
mD~.sV4b)}]#
>}
*|Dk PAYROLL n?`X*DhvTD>,dkTB|n:
9C CHGPRJ |n
CHGPRJ PRJ(PAYROLL) SAVDTA(*SAME) TEXT('BIWEEKLY PAYROLL
PROCESSING APPLICATION')
9C0`L*"\mw15CLr
Z0C PDM 49Cn?1A;O!q!n 2(|D)#
K|n+;a|DNNGGE"r_|D-T Kn?_P(^#*|DGGE",9
C CHGPRJUSR |n,gZ293D:|DC'GGE" (CHGPRJUSR);;ZPyv#
r!XZn?DE" (PRTPRJ)
9C0r!n?1(PRTPRJ) |n4i4n?DXwMn?cNa9ZDwvi#ITZ
4(n?cNa9.s9CK|n4 i$a}76#n?\m1M&CLr*"_<
IT9CK|n#
XkZ PRTPRJ |nD PRJ N}O8(zQGGDn?D{F#
OUTPUT N}D1!5 OUTPUT(*PRINT) +9(fYQzT)r!#
(fT>K PARTL Xh5,C58>iGq*sZ|D"4(ra}?~1<&xv
-r#5 Y 8>Xkxv-r#
>}
K>}5wgN4(Z103D<4PyT>Dy>(f#
9C PRTPRJ |n
PRTPRJ PRJ(PAYROLL) OUTPUT(*PRINT)
9C0`L*"\mw15CLr
Z2B 9Cn? 9
