home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / commercial / acp / profesnal / !Entprise / StockData / Forms / Turnover < prev   
Text File  |  1992-09-07  |  1KB  |  38 lines
  1. !     Turnover of Stock Items Format File
  2. !     List the turnover for each stock item (filtered by selection)
  3. ===========================================================================
  4.  
  5.                       *******************************
  6.                       *STOCK CONTROL - TURNOVER LIST*
  7.                       *******************************
  8.  
  9.     {SY0:<32}                     Date {SY22}
  10. ===========================================================================
  11. !#IF !(R5="All items")
  12.  
  13.          Selection: {R5}
  14.  
  15. ---------------------------------------------------------------------------
  16. !#ENDIF
  17.   Reference    Details                      Turnover     Sell       Value
  18. ---------------------------------------------------------------------------
  19. #totalt=0
  20. #totalcv=0
  21. #totalsv=0
  22. #SELECT SK 0
  23. #NEXT SS
  24. #WHILE SK
  25.  {SK0:<14} {SK1:<28}{SK9:>7}{SK7:>12}{£(SK7*SK9/100):>12}
  26. #totalt & SK9
  27. #totalcv & (SK9*SK6/100)
  28. #totalsv & (SK9*SK7/100)
  29. #NEXT SS
  30. #LOOP
  31.  
  32.                               Totals:      Units       At Cost     At Sell
  33.                                            ========    ========    ========
  34.                                             {%totalt:>7}{£totalcv:>12}{£totalsv:>12}
  35.                                            ========    ========    ========
  36.  
  37.      Report complete.
  38.