>}
K>}5wgN4(;vF*PAYROLL Dn?,dn?rF*PAY#n?rFn$
IT*4vV{,C4*n?PDi4((;Db{#komD~`X*DNN}]G
ZxP9(}L1#fMV4D#gTEXT N}yv,PAYROLL n?G;v?\
Payroll &m&CLr#
9CCRTPRJ |n
CRTPRJ PRJ(PAYROLL) SHORTPRJ(PAY) SAVDTA(*YES)
TEXT('WEEKLY PAYROLL PROCESSING APPLICATION')
9C0`L*"\mw15CLr
40CPDM 49Cn?1A;OD0F6=4(1#
9Cn?
IT(}1SZNN|nPOdkCL|n49Cn?#9ITZCL Lr"REXX }
LP9C|n,r_(}QCMDEXC 49C|n#n?|n*
CRTPRJ"QRYPRJ"CHGPRJ"PRTPRJ MDLTPRJ#
9IT(}9C0CPDM 49Cn?1A;4(}0`L*"\mw15CLr9C
n?#
}Kb)n?|n.b,K&\?~9'V0XUn?1(RCLPRJ) |n#K|nbvK
Z"z53JOr_n?\m|nl#ax.sn?PyfZDNN;;BT#PX
K|nDji,N{Z1783D:XUn?(RCLPRJ);#
T>yPn?(QRYPRJ)
9C0i/n?1(QRYPRJ) |n4q!zZ53OGGDyPn?DPm#KPmO
+;vVzP(A!r|BDn?#
9IT9CK|n4i$GqI&4(Kn?,r_C47(GqNNn?r53J
Oxp5rdC;;B#PXV4n?DE",N{Z1753D:Z15B#$&CLr
*"\mwE";#
9COUTPUT N}4T>&C+dv<rN&#1!5*+(fYQzT)r!,
OUTPUT(*PRINT)#
>}
<35wK1zdkTB|n1YQzD~Db[:
QRYPRJ OUTPUT(*PRINT)
5722WDS V5R1M0 &CLr*"\mw-i/n?05/08/01 11:59:48 3f..:0001
DBCS #f
n?rF}]}]D>QF5
PAYROLL PAY qG?\Payroll &m&CLrq
*****Pmax*****
<
3.
I
QRYPRJ
|nzIDYQzD~Dy>
8&CLr*"\mwC'8O