home *** CD-ROM | disk | FTP | other *** search
/ Windows 95 Secrets / Secrets1.iso / Finance / Book / TRS / _setup.1 / TotalRetailSystem.exe / 0 / RCDATA / TSALESENTRYFORM / TSALESENTRYFORM.txt
Encoding:
Text File  |  1997-06-09  |  13.1 KB  |  568 lines
  1. object SalesEntryForm: TSalesEntryForm
  2.   Left = 17
  3.   Top = 30
  4.   Width = 791
  5.   Height = 584
  6.   Caption = 'Sales Entry Form'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   Position = poScreenCenter
  12.   OnCreate = FormCreate
  13.   PixelsPerInch = 120
  14.   TextHeight = 16
  15.   object Panel1: TPanel
  16.     Left = 0
  17.     Top = 0
  18.     Width = 783
  19.     Height = 553
  20.     Align = alClient
  21.     BevelOuter = bvLowered
  22.     TabOrder = 0
  23.     object DateLabel: TLabel
  24.       Left = 8
  25.       Top = 16
  26.       Width = 36
  27.       Height = 20
  28.       Caption = 'Date'
  29.       Font.Color = clBlack
  30.       Font.Height = -17
  31.       Font.Name = 'MS Sans Serif'
  32.       Font.Style = []
  33.       ParentFont = False
  34.     end
  35.     object CustomerNumberLabel: TLabel
  36.       Left = 472
  37.       Top = 72
  38.       Width = 136
  39.       Height = 20
  40.       Caption = 'Customer Number'
  41.       Font.Color = clBlack
  42.       Font.Height = -17
  43.       Font.Name = 'MS Sans Serif'
  44.       Font.Style = []
  45.       ParentFont = False
  46.     end
  47.     object OrderNumberLabel: TLabel
  48.       Left = 480
  49.       Top = 16
  50.       Width = 106
  51.       Height = 20
  52.       Caption = 'Order Number'
  53.       Font.Color = clBlack
  54.       Font.Height = -17
  55.       Font.Name = 'MS Sans Serif'
  56.       Font.Style = []
  57.       ParentFont = False
  58.     end
  59.     object PickupShipLabel: TLabel
  60.       Left = 8
  61.       Top = 64
  62.       Width = 88
  63.       Height = 20
  64.       Caption = 'Pickup/Ship'
  65.       Font.Color = clBlack
  66.       Font.Height = -17
  67.       Font.Name = 'MS Sans Serif'
  68.       Font.Style = []
  69.       ParentFont = False
  70.     end
  71.     object TypeofSaleLabel: TLabel
  72.       Left = 8
  73.       Top = 104
  74.       Width = 95
  75.       Height = 20
  76.       Caption = 'Type of Sale '
  77.       Font.Color = clBlack
  78.       Font.Height = -17
  79.       Font.Name = 'MS Sans Serif'
  80.       Font.Style = []
  81.       ParentFont = False
  82.     end
  83.     object CreditCardNumberLabel: TLabel
  84.       Left = 8
  85.       Top = 176
  86.       Width = 148
  87.       Height = 20
  88.       Caption = 'Credit Card Number'
  89.       Font.Color = clBlack
  90.       Font.Height = -17
  91.       Font.Name = 'MS Sans Serif'
  92.       Font.Style = []
  93.       ParentFont = False
  94.     end
  95.     object CreditCardTypeLabel: TLabel
  96.       Left = 8
  97.       Top = 224
  98.       Width = 125
  99.       Height = 20
  100.       Caption = 'Credit Card Type'
  101.       Font.Color = clBlack
  102.       Font.Height = -17
  103.       Font.Name = 'MS Sans Serif'
  104.       Font.Style = []
  105.       ParentFont = False
  106.     end
  107.     object ProductLabel: TLabel
  108.       Left = 8
  109.       Top = 264
  110.       Width = 58
  111.       Height = 20
  112.       Caption = 'Product'
  113.       Font.Color = clBlack
  114.       Font.Height = -17
  115.       Font.Name = 'MS Sans Serif'
  116.       Font.Style = []
  117.       ParentFont = False
  118.     end
  119.     object QuantityLabel: TLabel
  120.       Left = 608
  121.       Top = 328
  122.       Width = 127
  123.       Height = 20
  124.       Caption = 'Quantity to Order'
  125.       Font.Color = clBlack
  126.       Font.Height = -17
  127.       Font.Name = 'MS Sans Serif'
  128.       Font.Style = []
  129.       ParentFont = False
  130.     end
  131.     object PriceLabel: TLabel
  132.       Left = 176
  133.       Top = 264
  134.       Width = 39
  135.       Height = 20
  136.       Caption = 'Price'
  137.       Font.Color = clBlack
  138.       Font.Height = -17
  139.       Font.Name = 'MS Sans Serif'
  140.       Font.Style = []
  141.       ParentFont = False
  142.     end
  143.     object DiscountPrice1Label: TLabel
  144.       Left = 296
  145.       Top = 264
  146.       Width = 76
  147.       Height = 20
  148.       Caption = 'Discount1'
  149.       Font.Color = clBlack
  150.       Font.Height = -17
  151.       Font.Name = 'MS Sans Serif'
  152.       Font.Style = []
  153.       ParentFont = False
  154.     end
  155.     object DiscountPrice2Label: TLabel
  156.       Left = 416
  157.       Top = 264
  158.       Width = 76
  159.       Height = 20
  160.       Caption = 'Discount2'
  161.       Font.Color = clBlack
  162.       Font.Height = -17
  163.       Font.Name = 'MS Sans Serif'
  164.       Font.Style = []
  165.       ParentFont = False
  166.     end
  167.     object DiscountPrice3Label: TLabel
  168.       Left = 544
  169.       Top = 264
  170.       Width = 76
  171.       Height = 20
  172.       Caption = 'Discount3'
  173.       Font.Color = clBlack
  174.       Font.Height = -17
  175.       Font.Name = 'MS Sans Serif'
  176.       Font.Style = []
  177.       ParentFont = False
  178.     end
  179.     object QuantityInStockLabel: TLabel
  180.       Left = 256
  181.       Top = 336
  182.       Width = 125
  183.       Height = 20
  184.       Caption = 'Quantity In Stock'
  185.       Font.Color = clBlack
  186.       Font.Height = -17
  187.       Font.Name = 'MS Sans Serif'
  188.       Font.Style = []
  189.       ParentFont = False
  190.     end
  191.     object ProductDescriptionLabel: TLabel
  192.       Left = 8
  193.       Top = 336
  194.       Width = 148
  195.       Height = 20
  196.       Caption = 'Product Description'
  197.       Font.Color = clBlack
  198.       Font.Height = -17
  199.       Font.Name = 'MS Sans Serif'
  200.       Font.Style = []
  201.       ParentFont = False
  202.     end
  203.     object Label1: TLabel
  204.       Left = 8
  205.       Top = 128
  206.       Width = 212
  207.       Height = 20
  208.       Caption = '( Cash, Credit Card,  Invoice)'
  209.       Font.Color = clBlack
  210.       Font.Height = -17
  211.       Font.Name = 'MS Sans Serif'
  212.       Font.Style = []
  213.       ParentFont = False
  214.     end
  215.     object DateDBEdit: TDBEdit
  216.       Left = 56
  217.       Top = 8
  218.       Width = 121
  219.       Height = 28
  220.       DataField = 'Date'
  221.       DataSource = SalesDataModule.SalesDataSource
  222.       Font.Color = clBlack
  223.       Font.Height = -17
  224.       Font.Name = 'MS Sans Serif'
  225.       Font.Style = []
  226.       MaxLength = 10
  227.       ParentFont = False
  228.       TabOrder = 0
  229.     end
  230.     object CustomerNumberDBEdit: TDBEdit
  231.       Left = 624
  232.       Top = 60
  233.       Width = 145
  234.       Height = 28
  235.       DataField = 'CustNum'
  236.       DataSource = ClientDataModule.ClientsDataSource
  237.       Font.Color = clBlack
  238.       Font.Height = -17
  239.       Font.Name = 'MS Sans Serif'
  240.       Font.Style = []
  241.       MaxLength = 0
  242.       ParentFont = False
  243.       ReadOnly = True
  244.       TabOrder = 1
  245.     end
  246.     object CreditCardNumberDBEdit: TDBEdit
  247.       Left = 168
  248.       Top = 168
  249.       Width = 217
  250.       Height = 28
  251.       DataField = 'CreditCardNumber'
  252.       DataSource = SalesDataModule.SalesDataSource
  253.       Font.Color = clBlack
  254.       Font.Height = -17
  255.       Font.Name = 'MS Sans Serif'
  256.       Font.Style = []
  257.       MaxLength = 20
  258.       ParentFont = False
  259.       TabOrder = 3
  260.     end
  261.     object TypeofSaleDBEdit: TDBEdit
  262.       Left = 104
  263.       Top = 96
  264.       Width = 217
  265.       Height = 28
  266.       DataField = 'TypeOfSale'
  267.       DataSource = SalesDataModule.SalesDataSource
  268.       Font.Color = clBlack
  269.       Font.Height = -17
  270.       Font.Name = 'MS Sans Serif'
  271.       Font.Style = []
  272.       MaxLength = 11
  273.       ParentFont = False
  274.       TabOrder = 2
  275.     end
  276.     object CreditCardTypeDBEdit: TDBEdit
  277.       Left = 144
  278.       Top = 216
  279.       Width = 217
  280.       Height = 28
  281.       DataField = 'CreditCardType'
  282.       DataSource = SalesDataModule.SalesDataSource
  283.       Font.Color = clBlack
  284.       Font.Height = -17
  285.       Font.Name = 'MS Sans Serif'
  286.       Font.Style = []
  287.       MaxLength = 25
  288.       ParentFont = False
  289.       TabOrder = 4
  290.     end
  291.     object PickUpShipDBEdit: TDBEdit
  292.       Left = 104
  293.       Top = 56
  294.       Width = 145
  295.       Height = 28
  296.       DataField = 'PickUpShip'
  297.       DataSource = SalesDataModule.SalesDataSource
  298.       Font.Color = clBlack
  299.       Font.Height = -17
  300.       Font.Name = 'MS Sans Serif'
  301.       Font.Style = []
  302.       MaxLength = 8
  303.       ParentFont = False
  304.       TabOrder = 5
  305.     end
  306.     object InventoryPriceDBEdit: TDBEdit
  307.       Left = 168
  308.       Top = 288
  309.       Width = 113
  310.       Height = 28
  311.       DataField = 'Price'
  312.       DataSource = DataModule2.DataSource1
  313.       Font.Color = clBlack
  314.       Font.Height = -17
  315.       Font.Name = 'MS Sans Serif'
  316.       Font.Style = []
  317.       MaxLength = 0
  318.       ParentFont = False
  319.       ReadOnly = True
  320.       TabOrder = 6
  321.     end
  322.     object QuantityToOrderEdit: TEdit
  323.       Left = 608
  324.       Top = 368
  325.       Width = 129
  326.       Height = 28
  327.       Font.Color = clBlack
  328.       Font.Height = -17
  329.       Font.Name = 'MS Sans Serif'
  330.       Font.Style = []
  331.       ParentFont = False
  332.       TabOrder = 7
  333.     end
  334.     object InventoryDiscountPrice1DBEdit: TDBEdit
  335.       Left = 296
  336.       Top = 288
  337.       Width = 113
  338.       Height = 28
  339.       DataField = 'DiscountPrice1'
  340.       DataSource = DataModule2.DataSource1
  341.       Font.Color = clBlack
  342.       Font.Height = -17
  343.       Font.Name = 'MS Sans Serif'
  344.       Font.Style = []
  345.       MaxLength = 0
  346.       ParentFont = False
  347.       ReadOnly = True
  348.       TabOrder = 8
  349.     end
  350.     object InventoryDiscountPrice2DBEdit: TDBEdit
  351.       Left = 416
  352.       Top = 288
  353.       Width = 113
  354.       Height = 28
  355.       DataField = 'DiscountPrice2'
  356.       DataSource = DataModule2.DataSource1
  357.       Font.Color = clBlack
  358.       Font.Height = -17
  359.       Font.Name = 'MS Sans Serif'
  360.       Font.Style = []
  361.       MaxLength = 0
  362.       ParentFont = False
  363.       ReadOnly = True
  364.       TabOrder = 9
  365.     end
  366.     object InventoryDiscountPrice3DBEdit: TDBEdit
  367.       Left = 544
  368.       Top = 288
  369.       Width = 113
  370.       Height = 28
  371.       DataField = 'DiscountPrice3'
  372.       DataSource = DataModule2.DataSource1
  373.       Font.Color = clBlack
  374.       Font.Height = -17
  375.       Font.Name = 'MS Sans Serif'
  376.       Font.Style = []
  377.       MaxLength = 0
  378.       ParentFont = False
  379.       ReadOnly = True
  380.       TabOrder = 10
  381.     end
  382.     object PartNumberDBEdit: TDBEdit
  383.       Left = 8
  384.       Top = 288
  385.       Width = 145
  386.       Height = 28
  387.       DataField = 'PartNumber'
  388.       DataSource = DataModule2.DataSource1
  389.       Font.Color = clBlack
  390.       Font.Height = -17
  391.       Font.Name = 'MS Sans Serif'
  392.       Font.Style = []
  393.       MaxLength = 50
  394.       ParentFont = False
  395.       ReadOnly = True
  396.       TabOrder = 11
  397.     end
  398.     object ProductDescriptionDBEdit: TDBEdit
  399.       Left = 8
  400.       Top = 368
  401.       Width = 241
  402.       Height = 28
  403.       DataField = 'Description'
  404.       DataSource = DataModule2.DataSource1
  405.       Font.Color = clBlack
  406.       Font.Height = -17
  407.       Font.Name = 'MS Sans Serif'
  408.       Font.Style = []
  409.       MaxLength = 50
  410.       ParentFont = False
  411.       ReadOnly = True
  412.       TabOrder = 12
  413.     end
  414.     object ProductQuantityInStockDBEdit: TDBEdit
  415.       Left = 256
  416.       Top = 368
  417.       Width = 121
  418.       Height = 28
  419.       DataField = 'Quantity'
  420.       DataSource = DataModule2.DataSource1
  421.       Font.Color = clBlack
  422.       Font.Height = -17
  423.       Font.Name = 'MS Sans Serif'
  424.       Font.Style = []
  425.       MaxLength = 0
  426.       ParentFont = False
  427.       ReadOnly = True
  428.       TabOrder = 13
  429.     end
  430.     object cmdAddtoOrder: TButton
  431.       Left = 8
  432.       Top = 496
  433.       Width = 129
  434.       Height = 49
  435.       Caption = 'Add to Order'
  436.       Font.Color = clBlack
  437.       Font.Height = -17
  438.       Font.Name = 'MS Sans Serif'
  439.       Font.Style = []
  440.       ParentFont = False
  441.       TabOrder = 14
  442.       OnClick = cmdAddtoOrderClick
  443.     end
  444.     object cmdFindProduct: TButton
  445.       Left = 8
  446.       Top = 448
  447.       Width = 129
  448.       Height = 49
  449.       Caption = 'Find Product'
  450.       Font.Color = clBlack
  451.       Font.Height = -17
  452.       Font.Name = 'MS Sans Serif'
  453.       Font.Style = []
  454.       ParentFont = False
  455.       TabOrder = 15
  456.       OnClick = cmdFindProductClick
  457.     end
  458.     object cmdEndofOrder: TButton
  459.       Left = 400
  460.       Top = 448
  461.       Width = 121
  462.       Height = 49
  463.       Caption = 'Print Reciept'
  464.       Font.Color = clBlack
  465.       Font.Height = -17
  466.       Font.Name = 'MS Sans Serif'
  467.       Font.Style = []
  468.       ParentFont = False
  469.       TabOrder = 16
  470.       OnClick = cmdEndofOrderClick
  471.     end
  472.     object DBNavigator1: TDBNavigator
  473.       Left = 8
  474.       Top = 408
  475.       Width = 222
  476.       Height = 33
  477.       DataSource = DataModule2.DataSource1
  478.       VisibleButtons = [nbPrior, nbNext]
  479.       TabOrder = 17
  480.     end
  481.     object OrderNumberDBEdit: TDBEdit
  482.       Left = 624
  483.       Top = 16
  484.       Width = 145
  485.       Height = 28
  486.       DataField = 'OrderNumber'
  487.       DataSource = SalesDataModule.SalesDataSource
  488.       Font.Color = clBlack
  489.       Font.Height = -17
  490.       Font.Name = 'MS Sans Serif'
  491.       Font.Style = []
  492.       MaxLength = 0
  493.       ParentFont = False
  494.       TabOrder = 18
  495.     end
  496.     object cmdEndofOrder2: TButton
  497.       Left = 272
  498.       Top = 448
  499.       Width = 129
  500.       Height = 49
  501.       Caption = 'Print Invoice'
  502.       Font.Color = clBlack
  503.       Font.Height = -17
  504.       Font.Name = 'MS Sans Serif'
  505.       Font.Style = []
  506.       ParentFont = False
  507.       TabOrder = 19
  508.       OnClick = cmdEndofOrder2Click
  509.     end
  510.     object cmdHelp: TButton
  511.       Left = 136
  512.       Top = 496
  513.       Width = 129
  514.       Height = 49
  515.       Caption = 'Help'
  516.       Font.Color = clBlack
  517.       Font.Height = -17
  518.       Font.Name = 'MS Sans Serif'
  519.       Font.Style = []
  520.       ParentFont = False
  521.       TabOrder = 20
  522.       OnClick = cmdHelpClick
  523.     end
  524.     object cmdEndofOrderWOPrint: TButton
  525.       Left = 272
  526.       Top = 496
  527.       Width = 345
  528.       Height = 49
  529.       Caption = 'End of Order w/o Printing Invoice/Reciept'
  530.       Font.Color = clBlack
  531.       Font.Height = -17
  532.       Font.Name = 'MS Sans Serif'
  533.       Font.Style = []
  534.       ParentFont = False
  535.       TabOrder = 21
  536.       OnClick = cmdEndofOrderWOPrintClick
  537.     end
  538.     object Button1: TButton
  539.       Left = 520
  540.       Top = 448
  541.       Width = 233
  542.       Height = 49
  543.       Caption = 'Exit w/o Entering an Order'
  544.       Font.Color = clBlack
  545.       Font.Height = -17
  546.       Font.Name = 'MS Sans Serif'
  547.       Font.Style = []
  548.       ParentFont = False
  549.       TabOrder = 22
  550.       OnClick = Button1Click
  551.     end
  552.   end
  553.   object RecieptReport1: TReport
  554.     ReportName = 'Reciept.rpt'
  555.     ReportDir = 'C:\Program Files\ALBERT RUGEL\DataBase Files\'
  556.     AutoUnload = True
  557.     Left = 504
  558.     Top = 128
  559.   end
  560.   object InvoiceReport: TReport
  561.     ReportName = 'invoice.rpt'
  562.     ReportDir = 'C:\Program Files\ALBERT RUGEL\DataBase Files\'
  563.     AutoUnload = True
  564.     Left = 544
  565.     Top = 128
  566.   end
  567. end
  568.