home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / CLIPPER / MISC / SELLMOR2.ZIP / W2.RPT < prev    next >
Encoding:
Text File  |  1992-01-02  |  1.1 KB  |  27 lines
  1. #@  4,5  #say client->client
  2. #@  4,45 #say "x"
  3. #@  5,5  #say client->address1
  4. #@  6,5  #say client->address2
  5. #@  7,5  #say trim(client->city)+", "+client->state+" "+client->zip
  6. #@ 10,5  #say client->fin
  7. #@ 10,24 #say client->sin
  8. #@ 12,5  #say w2year->ssn
  9. #@ 14,5  #say trim(employee->fname)+" "+trim(employee->mname)+" "+trim(employee->lname)
  10. #@ 16,5  #say trim(employee->address1)
  11. #@ 17,5  #say iif(! empty(employee->address2), trim(employee->address2), trim(employee->city)+", "+employee->state+" "+employee->zip)
  12. #@ 18,5  #say iif(! empty(employee->address2), trim(employee->city)+", "+employee->state+" "+employee->zip, "")
  13.  
  14. #@  8,46 #say tran(w2year->fit  ,     "9,999,999.99")
  15. #@  8,65 #say tran(w2year->fit_gross,"99,999,999.99")
  16. #@ 10,46 #say tran(w2year->fica_ss,   "9,999,999.99")
  17. #@ 10,65 #say tran(w2year->ficass_gr,"99,999,999.99")
  18.  
  19. #@ 12,65 #say tran(w2year->ficamc_gr,"99,999,999.99")
  20. #@ 14,46 #say tran(w2year->fica_mc,   "9,999,999.99")
  21.  
  22. #@ 23,5  #say tran(w2year->sit,       "9,999,999.99")
  23. #@ 23,18 #say tran(w2year->sit_gross,"99,999,999.99")
  24. #@ 23,32 #say employee->tax_state
  25. #formprint 1,33
  26.  
  27.