home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / commercial / acp / profesnal / !Entprise / SalesData / Forms / SalesAccnt < prev    next >
Text File  |  1992-09-15  |  2KB  |  47 lines
  1. !     Sales Account Report Format File
  2. !     Lists all transactions for selected account.
  3. ===========================================================================
  4.  
  5.                        *******************************
  6.                        *SALES LEDGER - ACCOUNT REPORT*
  7.                        *******************************
  8.  
  9.     {SY0:<34}                   Date {SY22    }
  10. ===========================================================================
  11. #SELECT SL U2
  12.  
  13.    {SL0:<8} {SL1:<30} Statement date       {SL11:>7}
  14.             {SL2:<30} Settlement discount  {SL14:>7}%
  15.             {SL3:<30} Settlement period     {SL13:<3}Days
  16.             {SL4:<30} Credit limit    £{SL10:>12}
  17.             {SL5:<30}
  18.                                              Total balance £{£SL6+SL7+SL8+SL9:>12}  
  19.  
  20.            3 Months:-     2 Months:-     1 Month:-     Current:-
  21.        {SL9:>12}   {SL8:>12}  {SL7:>12}  {SL6:>12}
  22.  
  23. #tran = SL15                                                
  24. ---------------------------------------------------------------------------
  25.       Date  Reference  T/x    Goods value    VAT value     Total    Batch
  26. ---------------------------------------------------------------------------
  27. #stat = SL17
  28. #SELECT ST stat
  29. #totalbal = ST3+ST4
  30.                                   Brought forward  {£totalbal:>  }
  31. #WHILE tran
  32. #  SELECT ST tran
  33. #  IF !(tran=stat)
  34. #    total = ST3+ST4
  35. #    IF ST7=5
  36.                                                         ----------
  37. #    ELSE
  38. #       totalbal & total
  39. #    ENDIF
  40.     {ST2:<8}  {ST1:<8} {ST7:>3}  {ST3:>12} {ST4:>12} {£total:>12}  {ST6:>4}
  41. #  ENDIF
  42. #  tran = ST8
  43. #LOOP
  44.                                                         ==========
  45.                                   Total balance    {£totalbal:>  }
  46.     Report complete.
  47.