home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / commercial / acp / profesnal / !Entprise / StockData / Forms / CashCopy next >
Text File  |  1993-12-01  |  1KB  |  47 lines
  1. !  Cash Sale printout format file.
  2. !  This is designed to be added to the end of the CashSale
  3. !  form file. It should not be run alone.
  4. {\12}
  5. {("Copy Cash Sale Invoice"):=72}
  6.  
  7. {SY0:=72}
  8.  
  9.    {I41:<30} @45{SY1}
  10.    {I42:<30} @45{SY2} 
  11.    {I43:<30} @45{SY3}
  12.    {I44:<30} @45{SY4}
  13.    {I45:<30} @45{SY5}
  14.              @45Tel: {SY6}
  15.              @45Fax: {SY7}
  16. ___________________________________________________________________________
  17.  
  18.             Order No.    Invoice Date     Job Number    Invoice No.
  19.             {I38:>      }      {I29:>8}  {I47:=18} {I28}
  20. ___________________________________________________________________________
  21.  
  22.   LN Stock No.  Description          Quantity    Price  Disc%   Total  VAT
  23. ___________________________________________________________________________
  24.  
  25. #lines=0
  26. #SELECT I 1
  27. #WHILE I
  28.   {I0:>2} {I10:>8} {I11:<24} {I1:>4} {I2:>11} {I3:>3}{I5:>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}% @47Goods total   {£I30:>10}
  42.                code 1 {SY11}% @47VAT total     {£I31:>10}
  43.    Date of Issue:  {SY22:>8}  @47Invoice total {£I32:>10}
  44.  
  45. ___________________________________________________________________________
  46.  
  47.        {SY9:<34}     V.A.T. No. {SY8}