* PAYCHEK.FAU         -DEFAULT VALUES PROGRAM
STORE '          ' TO Mlast
STORE '          ' TO Mfirst
STORE ' ' TO Minitial
STORE '000-00-0000' TO Mssno
STORE ' ' TO Mvac
STORE ' ' TO Mterm
STORE 0.00 TO Mregpay
STORE 0.00 TO Motpay
STORE 0.00 TO Msick
STORE 0.00 TO Mgross
STORE 0.00 TO Mtaxable
STORE 0.00 TO Mwhhold
STORE 0.00 TO Mchkfica
STORE 0.00 TO Mins
STORE 0.00 TO Mpension
STORE 0.00 TO Mnet

WITH Mnet
  ELSE
     STORE F TO Amore
  ENDIF
  ENDDO
  RELEASE Amore
* RELEASE