home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / commercial / acp / profesnal / !Entprise / SalesData / Forms / TextCopy < prev    next >
Text File  |  1993-12-01  |  2KB  |  52 lines
  1. !  Copy Text Invoice printout format file.
  2. !  This is designed to be added to the end of the TextInv
  3. !  form file. It should not be run alone.
  4. {\12}
  5. {("Copy "+I33):=72}
  6.  
  7. {SY0:=72}
  8.  
  9.    {I41} @45{SY1}
  10.    {I42} @45{SY2} 
  11.    {I43} @45{SY3}
  12.    {I44} @45{SY4}
  13.    {I45} @45{SY5}
  14.          @45Tel: {SY6}
  15.          @45Fax: {SY7}
  16. ___________________________________________________________________________
  17.  
  18.     Account No.   Order No.    Invoice Date      Job Number    Invoice No.
  19.      {SL0:>8} {I38:>      }      {I29:>8}   {I47:=18} {I28}
  20. ___________________________________________________________________________
  21.  
  22.   LN     Description                                  Qnty     Price  VAT
  23. ___________________________________________________________________________
  24.  
  25. #lines=0
  26. #SELECT I 1
  27. #WHILE I
  28.   {I0:>2} {I11:<48} {I1:>3} {I2:>12} {I6:<1}
  29. #lines & 1
  30. #NEXT I
  31. #LOOP
  32. #WHILE lines<30
  33.  
  34. #lines & 1
  35. #LOOP
  36. #IF !(I35=0)
  37.           Trade discount at {I34:>5}%                        {I35:>12}
  38. #ENDIF
  39. ___________________________________________________________________________
  40.  
  41.    VAT Rates:  code 0 {SY10}% @46Goods total   {I30:>10}
  42.                code 1 {SY11}% @46VAT total     {I31:>10}
  43.    Date of Issue:  {SY22:>8}  @46Invoice total {£I32:>10}
  44.  
  45. #IF !(I36=0)
  46.    Note: A discount of {I36}% ({£I37}) may be deducted, if this invoice
  47.          is paid in full within {SL13} days of invoice date.
  48. #ENDIF
  49. ___________________________________________________________________________
  50.  
  51.        {SY9:<34}     V.A.T. No. {SY8}
  52.