>}

K>}5wgN4(;vF* PAYROLL Dn?,dn?rF* PAY#n?rFn$ IT* 4 vV{,C4*n?PDi4((;Db{#komD~`X*DNN}]G ZxP9(}L1#fMV4D#g TEXT N}yv,PAYROLL n?G;v?\ Payroll &m&CLr#

9C CRTPRJ n

CRTPRJ PRJ(PAYROLL) SHORTPRJ(PAY) SAVDTA(*YES)

TEXT('WEEKLY PAYROLL PROCESSING APPLICATION')

9C0`L*"\mw15CLr

40C PDM 49Cn?1A;OD0F6=4(1#

9Cn?

IT(}1SZNNnPOdk CL n49Cn?#9ITZ CL Lr"REXX } LP9Cn,r_(} Q C M D E X C 49Cn#n?n*

CRTPRJ"QRYPRJ"CHGPRJ"PRTPRJ M DLTPRJ#

9IT(}9C0C PDM 49Cn?1A;4(}0`L*"\mw15CLr9C n?#

}Kb)n?n.b,K&\?~9'V0XUn?1(RCLPRJ) n#KnbvK Z"z53JOr_n?\mnl#ax.sn?PyfZDNN;;BT#PX KnDji,N{Z1783D:XUn? (RCLPRJ);#

T>yPn? (QRYPRJ)

9C0i/n?1(QRYPRJ) n4q!zZ53OGGDyPn?DPm#KPmO +;vVzP(A!rBDn?#

9IT9CKn4i$GqI&4(Kn?,r_C47(GqNNn?r53J Oxp5rdC;;B#PXV4n?DE",N{Z1753D:Z15B #$&CLr *"\mwE";#

9C OUTPUT N}4T>&C+dv<rN!5*+(fYQzT)r!,

OUTPUT(*PRINT)#

>}

<3 5wK1zdkTBn1YQzD~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

* * * * * P m a x

PAY q

G

?\ Payroll &m&CLr

q

 

* * * * *

 

 

 

<3. I QRYPRJ nzIDYQzD~Dy>

8&CLr*"\mwC'8O

Page 20
Image 20
IBM SB84-0449-00 manual 9Cn?, TyPn? Qryprj, 9C Crtprj n, Crtprjqryprjchgprjprtprj M DLTPRJ#, Output*Print#