Home » Archimedes archive » Acorn Computing » 1993 02 Mega Disk.adf » !_93_02 » MTrader/!MTrader/StockData/Forms/CashSale

MTrader/!MTrader/StockData/Forms/CashSale

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Acorn Computing » 1993 02 Mega Disk.adf » !_93_02
Filename: MTrader/!MTrader/StockData/Forms/CashSale
Read OK:
File size: 0913 bytes
Load address: 0000
Exec address: 0000
File contents
!  Cash Sale printout format file.
!SCREEN  The following line defines the on screen cash sale format.
!  {I0:>2} {I10:>8} {I11:<24} {I1:>4} {I2:>11} {I3:>3} {I5:>12} {I6:<1}
{("Cash Sale Invoice"):=72}

                     Acme Computer Company Limited                      
                       123, High Street, Any Town                       
                           Somewhere, AB1 2CD                           
   Tel: 012 345 6789                              Fax: 012 345 9876

   Invoice to:                                 Deliver to:
      Mrs R Walker                                12, Other Street
      27, The Vine                                Lower Town
      Kingsclere                                  ElseWhere
      Hants                                       VW9 8YZ
      RG21 8HF

___________________________________________________________________________

                 Order No.    Invoice Date     Job Number    Invoice No.
                     AZ1        30.12.89           AB12        344
___________________________________________________________________________

 LN Stock No.  Description          Quantity    Price  Disc%    Total  VAT
___________________________________________________________________________

  1   ABC123 Micro-computer              1      199.00  10       179.10 1
  2     DM27 Dot Matrix Printer          1      149.00   0       149.00 1
  3          Delivery and                1       60.00   0        60.00 1
             installation of computer
             system and additional
             work to install new
             software                                            
             Thank you for your order                                    
                                                                          













    This is a sample printout from the 'Micro-Trader' Business System

___________________________________________________________________________

   VAT Rates:  code 0 0%                       Goods total       388.10
               code 1 17.50%                   VAT total          67.91
                                               Invoice total     456.01
___________________________________________________________________________

      Co. Reg No. A-123 34 B               V.A.T. No. 123 2344 3445
00000000  21 20 20 43 61 73 68 20  53 61 6c 65 20 70 72 69  |!  Cash Sale pri|
00000010  6e 74 6f 75 74 20 66 6f  72 6d 61 74 20 66 69 6c  |ntout format fil|
00000020  65 2e 0a 21 53 43 52 45  45 4e 20 20 54 68 65 20  |e..!SCREEN  The |
00000030  66 6f 6c 6c 6f 77 69 6e  67 20 6c 69 6e 65 20 64  |following line d|
00000040  65 66 69 6e 65 73 20 74  68 65 20 6f 6e 20 73 63  |efines the on sc|
00000050  72 65 65 6e 20 63 61 73  68 20 73 61 6c 65 20 66  |reen cash sale f|
00000060  6f 72 6d 61 74 2e 0a 21  20 20 7b 49 30 3a 3e 32  |ormat..!  {I0:>2|
00000070  7d 20 7b 49 31 30 3a 3e  38 7d 20 7b 49 31 31 3a  |} {I10:>8} {I11:|
00000080  3c 32 34 7d 20 7b 49 31  3a 3e 34 7d 20 7b 49 32  |<24} {I1:>4} {I2|
00000090  3a 3e 31 31 7d 20 7b 49  33 3a 3e 33 7d 20 7b 49  |:>11} {I3:>3} {I|
000000a0  35 3a 3e 31 32 7d 20 7b  49 36 3a 3c 31 7d 0a 7b  |5:>12} {I6:<1}.{|
000000b0  28 22 43 61 73 68 20 53  61 6c 65 20 49 6e 76 6f  |("Cash Sale Invo|
000000c0  69 63 65 22 29 3a 3d 37  32 7d 0a 0a 20 20 20 20  |ice"):=72}..    |
000000d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000e0  20 41 63 6d 65 20 43 6f  6d 70 75 74 65 72 20 43  | Acme Computer C|
000000f0  6f 6d 70 61 6e 79 20 4c  69 6d 69 74 65 64 20 20  |ompany Limited  |
00000100  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000110  20 20 20 20 0a 20 20 20  20 20 20 20 20 20 20 20  |    .           |
00000120  20 20 20 20 20 20 20 20  20 20 20 20 31 32 33 2c  |            123,|
00000130  20 48 69 67 68 20 53 74  72 65 65 74 2c 20 41 6e  | High Street, An|
00000140  79 20 54 6f 77 6e 20 20  20 20 20 20 20 20 20 20  |y Town          |
00000150  20 20 20 20 20 20 20 20  20 20 20 20 20 0a 20 20  |             .  |
00000160  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000170  20 20 20 20 20 20 20 20  20 53 6f 6d 65 77 68 65  |         Somewhe|
00000180  72 65 2c 20 41 42 31 20  32 43 44 20 20 20 20 20  |re, AB1 2CD     |
00000190  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001a0  20 20 20 20 20 20 0a 20  20 20 54 65 6c 3a 20 30  |      .   Tel: 0|
000001b0  31 32 20 33 34 35 20 36  37 38 39 20 20 20 20 20  |12 345 6789     |
000001c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001d0  20 20 20 20 20 20 20 20  20 46 61 78 3a 20 30 31  |         Fax: 01|
000001e0  32 20 33 34 35 20 39 38  37 36 0a 0a 20 20 20 49  |2 345 9876..   I|
000001f0  6e 76 6f 69 63 65 20 74  6f 3a 20 20 20 20 20 20  |nvoice to:      |
00000200  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000210  20 20 20 20 20 20 20 20  20 20 20 44 65 6c 69 76  |           Deliv|
00000220  65 72 20 74 6f 3a 0a 20  20 20 20 20 20 4d 72 73  |er to:.      Mrs|
00000230  20 52 20 57 61 6c 6b 65  72 20 20 20 20 20 20 20  | R Walker       |
00000240  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000250  20 20 20 20 20 20 20 20  20 31 32 2c 20 4f 74 68  |         12, Oth|
00000260  65 72 20 53 74 72 65 65  74 0a 20 20 20 20 20 20  |er Street.      |
00000270  32 37 2c 20 54 68 65 20  56 69 6e 65 20 20 20 20  |27, The Vine    |
00000280  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000290  20 20 20 20 20 20 20 20  20 20 20 20 4c 6f 77 65  |            Lowe|
000002a0  72 20 54 6f 77 6e 0a 20  20 20 20 20 20 4b 69 6e  |r Town.      Kin|
000002b0  67 73 63 6c 65 72 65 20  20 20 20 20 20 20 20 20  |gsclere         |
000002c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002d0  20 20 20 20 20 20 20 20  20 45 6c 73 65 57 68 65  |         ElseWhe|
000002e0  72 65 0a 20 20 20 20 20  20 48 61 6e 74 73 20 20  |re.      Hants  |
000002f0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000310  20 20 20 20 20 56 57 39  20 38 59 5a 0a 20 20 20  |     VW9 8YZ.   |
00000320  20 20 20 52 47 32 31 20  38 48 46 0a 0a 5f 5f 5f  |   RG21 8HF..___|
00000330  5f 5f 5f 5f 5f 5f 5f 5f  5f 5f 5f 5f 5f 5f 5f 5f  |________________|
*
00000370  5f 5f 5f 5f 5f 5f 5f 5f  0a 0a 20 20 20 20 20 20  |________..      |
00000380  20 20 20 20 20 20 20 20  20 20 20 4f 72 64 65 72  |           Order|
00000390  20 4e 6f 2e 20 20 20 20  49 6e 76 6f 69 63 65 20  | No.    Invoice |
000003a0  44 61 74 65 20 20 20 20  20 4a 6f 62 20 4e 75 6d  |Date     Job Num|
000003b0  62 65 72 20 20 20 20 49  6e 76 6f 69 63 65 20 4e  |ber    Invoice N|
000003c0  6f 2e 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |o..             |
000003d0  20 20 20 20 20 20 20 20  41 5a 31 20 20 20 20 20  |        AZ1     |
000003e0  20 20 20 33 30 2e 31 32  2e 38 39 20 20 20 20 20  |   30.12.89     |
000003f0  20 20 20 20 20 20 41 42  31 32 20 20 20 20 20 20  |      AB12      |
00000400  20 20 33 34 34 0a 5f 5f  5f 5f 5f 5f 5f 5f 5f 5f  |  344.__________|
00000410  5f 5f 5f 5f 5f 5f 5f 5f  5f 5f 5f 5f 5f 5f 5f 5f  |________________|
*
00000450  5f 0a 0a 20 4c 4e 20 53  74 6f 63 6b 20 4e 6f 2e  |_.. LN Stock No.|
00000460  20 20 44 65 73 63 72 69  70 74 69 6f 6e 20 20 20  |  Description   |
00000470  20 20 20 20 20 20 20 51  75 61 6e 74 69 74 79 20  |       Quantity |
00000480  20 20 20 50 72 69 63 65  20 20 44 69 73 63 25 20  |   Price  Disc% |
00000490  20 20 20 54 6f 74 61 6c  20 20 56 41 54 0a 5f 5f  |   Total  VAT.__|
000004a0  5f 5f 5f 5f 5f 5f 5f 5f  5f 5f 5f 5f 5f 5f 5f 5f  |________________|
*
000004e0  5f 5f 5f 5f 5f 5f 5f 5f  5f 0a 0a 20 20 31 20 20  |_________..  1  |
000004f0  20 41 42 43 31 32 33 20  4d 69 63 72 6f 2d 63 6f  | ABC123 Micro-co|
00000500  6d 70 75 74 65 72 20 20  20 20 20 20 20 20 20 20  |mputer          |
00000510  20 20 20 20 31 20 20 20  20 20 20 31 39 39 2e 30  |    1      199.0|
00000520  30 20 20 31 30 20 20 20  20 20 20 20 31 37 39 2e  |0  10       179.|
00000530  31 30 20 31 0a 20 20 32  20 20 20 20 20 44 4d 32  |10 1.  2     DM2|
00000540  37 20 44 6f 74 20 4d 61  74 72 69 78 20 50 72 69  |7 Dot Matrix Pri|
00000550  6e 74 65 72 20 20 20 20  20 20 20 20 20 20 31 20  |nter          1 |
00000560  20 20 20 20 20 31 34 39  2e 30 30 20 20 20 30 20  |     149.00   0 |
00000570  20 20 20 20 20 20 31 34  39 2e 30 30 20 31 0a 20  |      149.00 1. |
00000580  20 33 20 20 20 20 20 20  20 20 20 20 44 65 6c 69  | 3          Deli|
00000590  76 65 72 79 20 61 6e 64  20 20 20 20 20 20 20 20  |very and        |
000005a0  20 20 20 20 20 20 20 20  31 20 20 20 20 20 20 20  |        1       |
000005b0  36 30 2e 30 30 20 20 20  30 20 20 20 20 20 20 20  |60.00   0       |
000005c0  20 36 30 2e 30 30 20 31  0a 20 20 20 20 20 20 20  | 60.00 1.       |
000005d0  20 20 20 20 20 20 69 6e  73 74 61 6c 6c 61 74 69  |      installati|
000005e0  6f 6e 20 6f 66 20 63 6f  6d 70 75 74 65 72 0a 20  |on of computer. |
000005f0  20 20 20 20 20 20 20 20  20 20 20 20 73 79 73 74  |            syst|
00000600  65 6d 20 61 6e 64 20 61  64 64 69 74 69 6f 6e 61  |em and additiona|
00000610  6c 0a 20 20 20 20 20 20  20 20 20 20 20 20 20 77  |l.             w|
00000620  6f 72 6b 20 74 6f 20 69  6e 73 74 61 6c 6c 20 6e  |ork to install n|
00000630  65 77 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |ew.             |
00000640  73 6f 66 74 77 61 72 65  20 20 20 20 20 20 20 20  |software        |
00000650  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000670  20 20 20 20 0a 20 20 20  20 20 20 20 20 20 20 20  |    .           |
00000680  20 20 54 68 61 6e 6b 20  79 6f 75 20 66 6f 72 20  |  Thank you for |
00000690  79 6f 75 72 20 6f 72 64  65 72 20 20 20 20 20 20  |your order      |
000006a0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000006b0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 0a 20  |              . |
000006c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000700  20 20 20 20 20 20 20 20  20 0a 0a 0a 0a 0a 0a 0a  |         .......|
00000710  0a 0a 0a 0a 0a 0a 0a 20  20 20 20 54 68 69 73 20  |.......    This |
00000720  69 73 20 61 20 73 61 6d  70 6c 65 20 70 72 69 6e  |is a sample prin|
00000730  74 6f 75 74 20 66 72 6f  6d 20 74 68 65 20 27 4d  |tout from the 'M|
00000740  69 63 72 6f 2d 54 72 61  64 65 72 27 20 42 75 73  |icro-Trader' Bus|
00000750  69 6e 65 73 73 20 53 79  73 74 65 6d 0a 0a 5f 5f  |iness System..__|
00000760  5f 5f 5f 5f 5f 5f 5f 5f  5f 5f 5f 5f 5f 5f 5f 5f  |________________|
*
000007a0  5f 5f 5f 5f 5f 5f 5f 5f  5f 0a 0a 20 20 20 56 41  |_________..   VA|
000007b0  54 20 52 61 74 65 73 3a  20 20 63 6f 64 65 20 30  |T Rates:  code 0|
000007c0  20 30 25 20 20 20 20 20  20 20 20 20 20 20 20 20  | 0%             |
000007d0  20 20 20 20 20 20 20 20  20 20 47 6f 6f 64 73 20  |          Goods |
000007e0  74 6f 74 61 6c 20 20 20  20 20 20 20 33 38 38 2e  |total       388.|
000007f0  31 30 0a 20 20 20 20 20  20 20 20 20 20 20 20 20  |10.             |
00000800  20 20 63 6f 64 65 20 31  20 31 37 2e 35 30 25 20  |  code 1 17.50% |
00000810  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000820  20 20 56 41 54 20 74 6f  74 61 6c 20 20 20 20 20  |  VAT total     |
00000830  20 20 20 20 20 36 37 2e  39 31 0a 20 20 20 20 20  |     67.91.     |
00000840  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000860  20 20 20 20 20 20 20 20  20 20 49 6e 76 6f 69 63  |          Invoic|
00000870  65 20 74 6f 74 61 6c 20  20 20 20 20 34 35 36 2e  |e total     456.|
00000880  30 31 0a 5f 5f 5f 5f 5f  5f 5f 5f 5f 5f 5f 5f 5f  |01._____________|
00000890  5f 5f 5f 5f 5f 5f 5f 5f  5f 5f 5f 5f 5f 5f 5f 5f  |________________|
*
000008c0  5f 5f 5f 5f 5f 5f 5f 5f  5f 5f 5f 5f 5f 5f 0a 0a  |______________..|
000008d0  20 20 20 20 20 20 43 6f  2e 20 52 65 67 20 4e 6f  |      Co. Reg No|
000008e0  2e 20 41 2d 31 32 33 20  33 34 20 42 20 20 20 20  |. A-123 34 B    |
000008f0  20 20 20 20 20 20 20 20  20 20 20 56 2e 41 2e 54  |           V.A.T|
00000900  2e 20 4e 6f 2e 20 31 32  33 20 32 33 34 34 20 33  |. No. 123 2344 3|
00000910  34 34 35                                          |445|
00000913