home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / CLIPPER / MISC / SELLMOR2.ZIP / UPS.RPT < prev    next >
Encoding:
Text File  |  1991-10-30  |  645 b   |  17 lines
  1. * this file must be named UPS.RPT
  2. #FUNC lucode("support",clients->client,"serial_num",0,0,"","",2)
  3. #@  1,25  #say  support->project
  4. #@  3,12  #say  "  Bonnie Carver                             LTR"
  5. #@  6,63  #say  "X"
  6. #@  6,92  #say  "9 00"
  7. #@ 11,12  #say  trim(clients->fname)+" "+trim(clients->lname)
  8. #@ 11,30  #say  " " + clients->wphone
  9. #@ 12,56  #say  "X"
  10. #@ 13,12  #say  trim(clients->company)
  11. #@ 14,92  #say  "9 00"
  12. #@ 15,12  #say  trim(clients->add1) + iif(''<>trim(clients->add2)," / " + clients->add2,"")
  13. #@ 17,12  #say  trim(clients->city)  
  14. #@ 17,30  #say  clients->state
  15. #@ 17,38  #say  clients->zip
  16. #formprint 1,22
  17.