home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1999 September / Dpcb0999.iso / Business / Empire / _SETUP.1 / EmpireBuilder.exe / 0 / RCDATA / TFMTAKINGSUMM / TFMTAKINGSUMM.txt
Text File  |  1999-06-21  |  28KB  |  992 lines
  1. object fmTakingSumm: TfmTakingSumm
  2.   Left = 70
  3.   Top = 84
  4.   HelpContext = 566
  5.   AutoScroll = False
  6.   Caption = 'Takings Summary'
  7.   ClientHeight = 432
  8.   ClientWidth = 698
  9.   Font.Charset = ANSI_CHARSET
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'Arial'
  13.   Font.Style = []
  14.   FormStyle = fsMDIChild
  15.   Position = poDefaultPosOnly
  16.   Scaled = False
  17.   Visible = True
  18.   OnActivate = FormActivate
  19.   OnClose = FormClose
  20.   OnCloseQuery = FormCloseQuery
  21.   OnCreate = FormCreate
  22.   OnDeactivate = FormDeactivate
  23.   OnShow = FormShow
  24.   PixelsPerInch = 120
  25.   TextHeight = 16
  26.   object PageControl1: TPageControl
  27.     Left = 0
  28.     Top = 52
  29.     Width = 698
  30.     Height = 380
  31.     ActivePage = TSReport
  32.     Align = alBottom
  33.     TabOrder = 1
  34.     OnChange = PageControl1Change
  35.     object TSReport: TTabSheet
  36.       Caption = 'Report'
  37.       object SpeedBar: TSpeedBar
  38.         Left = 0
  39.         Top = 0
  40.         Width = 690
  41.         Height = 49
  42.         Font.Charset = ANSI_CHARSET
  43.         Font.Color = clWindowText
  44.         Font.Height = -13
  45.         Font.Name = 'MS Sans Serif'
  46.         Font.Style = []
  47.         Options = [sbAllowDrag, sbFlatBtns, sbTransparentBtns]
  48.         BtnOffsetHorz = 3
  49.         BtnOffsetVert = 3
  50.         BtnWidth = 70
  51.         BtnHeight = 43
  52.         TabOrder = 0
  53.         InternalVer = 1
  54.         object SpeedbarSection1: TSpeedbarSection
  55.           Caption = 'Untitled (0)'
  56.         end
  57.         object BtnRepPrint: TSpeedItem
  58.           BtnCaption = 'Print'
  59.           Caption = 'Print takings summary'
  60.           Hint = 'Print takings summary'
  61.           Spacing = 1
  62.           Left = 3
  63.           Top = 3
  64.           Visible = True
  65.           OnClick = BtnRepPrintClick
  66.           SectionName = 'Untitled (0)'
  67.         end
  68.         object BtnRepEmail: TSpeedItem
  69.           BtnCaption = 'Email'
  70.           Caption = 'Email takings summary'
  71.           Hint = 'Email takings summary|'
  72.           Spacing = 1
  73.           Left = 73
  74.           Top = 3
  75.           Visible = True
  76.           OnClick = BtnRepEmailClick
  77.           SectionName = 'Untitled (0)'
  78.         end
  79.         object BtnRepClose: TSpeedItem
  80.           BtnCaption = 'Close'
  81.           Caption = 'Close Report Form'
  82.           Hint = 'Close report'
  83.           Spacing = 1
  84.           Left = 213
  85.           Top = 3
  86.           Visible = True
  87.           OnClick = BtnRepCloseClick
  88.           SectionName = 'Untitled (0)'
  89.         end
  90.         object btnHelp: TSpeedItem
  91.           BtnCaption = '&Help'
  92.           Caption = 'View help'
  93.           Glyph.Data = {
  94.             F6000000424DF600000000000000760000002800000010000000100000000100
  95.             0400000000008000000000000000000000001000000010000000000000000000
  96.             8000008000000080800080000000800080008080000080808000C0C0C0000000
  97.             FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888886446888
  98.             888888888E6648888888888888E6688888888888888888888888888888446888
  99.             8888888886664888888888888E664888888888888E6664888888888888E66648
  100.             88888888888E6664888888844888E6664888886664888E66488888E666444666
  101.             4888888E6666666668888888EE6666668888888888EEEEE88888}
  102.           Hint = 'View help|'
  103.           Spacing = 1
  104.           Left = 143
  105.           Top = 3
  106.           Visible = True
  107.           OnClick = btnHelpClick
  108.           SectionName = 'Untitled (0)'
  109.         end
  110.       end
  111.       object Panel2: TPanel
  112.         Left = 0
  113.         Top = 49
  114.         Width = 690
  115.         Height = 300
  116.         Align = alClient
  117.         Caption = 'Panel2'
  118.         TabOrder = 1
  119.         object wwDBGrid1: TwwDBGrid
  120.           Left = 1
  121.           Top = 1
  122.           Width = 688
  123.           Height = 298
  124.           Selected.Strings = (
  125.             'ACCNAME'#9'30'#9'Account Name'
  126.             'ONACC'#9'15'#9'On Account'
  127.             'CASH'#9'15'#9'Cash'
  128.             'BANK1'#9'15'#9'Bank 1'
  129.             'BANK2'#9'15'#9'Bank 2'
  130.             'BANK3'#9'15'#9'BANK3'
  131.             'BANK4'#9'15'#9'BANK4'
  132.             'BANK5'#9'15'#9'BANK5'
  133.             'BANK6'#9'15'#9'BANK6'
  134.             'BANK7'#9'15'#9'BANK7'
  135.             'BANK8'#9'15'#9'BANK8'
  136.             'BANK9'#9'15'#9'BANK9'
  137.             'BANK10'#9'15'#9'BANK10'
  138.             'CTOTAL'#9'15'#9'Total'#9'F')
  139.           TitleColor = clBtnFace
  140.           FixedCols = 1
  141.           ShowHorzScrollBar = True
  142.           Align = alClient
  143.           DataSource = dsTSTemp
  144.           KeyOptions = [dgAllowDelete]
  145.           Options = [dgTitles, dgIndicator, dgColumnResize, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap, dgShowFooter, dgFooter3DCells]
  146.           PopupMenu = pmRClick
  147.           TabOrder = 0
  148.           TitleAlignment = taLeftJustify
  149.           TitleFont.Charset = ANSI_CHARSET
  150.           TitleFont.Color = clWindowText
  151.           TitleFont.Height = -13
  152.           TitleFont.Name = 'Arial'
  153.           TitleFont.Style = []
  154.           TitleLines = 2
  155.           TitleButtons = True
  156.           OnCalcCellColors = wwDBGrid1CalcCellColors
  157.           OnCalcTitleAttributes = wwDBGrid1CalcTitleAttributes
  158.           IndicatorColor = icBlack
  159.           OnTopRowChanged = wwDBGrid1TopRowChanged
  160.           TitleImageList = ImagesDM.GenralBM
  161.           FooterCellColor = clYellow
  162.           FooterHeight = 25
  163.         end
  164.       end
  165.     end
  166.     object TSGraph: TTabSheet
  167.       Caption = 'Graph'
  168.       object SpeedBar1: TSpeedBar
  169.         Left = 0
  170.         Top = 0
  171.         Width = 0
  172.         Height = 49
  173.         Font.Charset = ANSI_CHARSET
  174.         Font.Color = clWindowText
  175.         Font.Height = -13
  176.         Font.Name = 'MS Sans Serif'
  177.         Font.Style = []
  178.         Options = [sbAllowDrag, sbFlatBtns, sbTransparentBtns]
  179.         BtnOffsetHorz = 3
  180.         BtnOffsetVert = 3
  181.         BtnWidth = 70
  182.         BtnHeight = 43
  183.         TabOrder = 0
  184.         InternalVer = 1
  185.         object Label7: TLabel
  186.           Left = 540
  187.           Top = 4
  188.           Width = 72
  189.           Height = 16
  190.           Caption = 'Graph Type'
  191.         end
  192.         object cbGraphType: TComboBox
  193.           Left = 540
  194.           Top = 20
  195.           Width = 137
  196.           Height = 24
  197.           ItemHeight = 16
  198.           Items.Strings = (
  199.             'Vertical Bar '
  200.             'Horizontal Bar'
  201.             'Pie'
  202.             'Line'
  203.             'Fast Line'
  204.             'Point'
  205.             'Area')
  206.           TabOrder = 1
  207.           Text = 'Vertical Bar'
  208.           OnChange = cbGraphTypeChange
  209.         end
  210.         object cbMarks: TCheckBox
  211.           Left = 399
  212.           Top = 20
  213.           Width = 125
  214.           Height = 17
  215.           HelpContext = 147
  216.           Alignment = taLeftJustify
  217.           Caption = '&Toggle Marks'
  218.           State = cbChecked
  219.           TabOrder = 0
  220.           OnClick = cbMarksClick
  221.         end
  222.         object SpeedbarSection2: TSpeedbarSection
  223.           Caption = 'Untitled (0)'
  224.         end
  225.         object BtnSaveGraph: TSpeedItem
  226.           BtnCaption = 'Save'
  227.           Caption = 'Save graph'
  228.           DropDownMenu = SaveGraphMenu
  229.           Hint = 'Save graph'
  230.           NumGlyphs = 2
  231.           Spacing = 1
  232.           Left = 3
  233.           Top = 3
  234.           Visible = True
  235.           SectionName = 'Untitled (0)'
  236.         end
  237.         object BtnPrintGraph: TSpeedItem
  238.           BtnCaption = 'Print'
  239.           Caption = 'Print takings summary graph'
  240.           Hint = 'Print takings summary graph'
  241.           Spacing = 1
  242.           Left = 73
  243.           Top = 3
  244.           Visible = True
  245.           OnClick = BtnPrintGraphClick
  246.           SectionName = 'Untitled (0)'
  247.         end
  248.         object BtnEmailGraph: TSpeedItem
  249.           BtnCaption = 'Email'
  250.           Caption = 'Email takings summary graph'
  251.           Hint = 'Email takings summary graph'
  252.           Spacing = 1
  253.           Left = 143
  254.           Top = 3
  255.           Visible = True
  256.           OnClick = BtnEmailGraphClick
  257.           SectionName = 'Untitled (0)'
  258.         end
  259.         object BtnCloseGraph: TSpeedItem
  260.           BtnCaption = 'Close'
  261.           Caption = 'Close'
  262.           Hint = 'Close'
  263.           Spacing = 1
  264.           Left = 283
  265.           Top = 3
  266.           Visible = True
  267.           OnClick = BtnCloseGraphClick
  268.           SectionName = 'Untitled (0)'
  269.         end
  270.         object btnHelpGraph: TSpeedItem
  271.           BtnCaption = '&Help'
  272.           Caption = 'View help'
  273.           Glyph.Data = {
  274.             F6000000424DF600000000000000760000002800000010000000100000000100
  275.             0400000000008000000000000000000000001000000010000000000000000000
  276.             8000008000000080800080000000800080008080000080808000C0C0C0000000
  277.             FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888886446888
  278.             888888888E6648888888888888E6688888888888888888888888888888446888
  279.             8888888886664888888888888E664888888888888E6664888888888888E66648
  280.             88888888888E6664888888844888E6664888886664888E66488888E666444666
  281.             4888888E6666666668888888EE6666668888888888EEEEE88888}
  282.           Hint = 'View help|'
  283.           Spacing = 1
  284.           Left = 213
  285.           Top = 3
  286.           Visible = True
  287.           OnClick = btnHelpGraphClick
  288.           SectionName = 'Untitled (0)'
  289.         end
  290.       end
  291.       object Notebook1: TNotebook
  292.         Left = 0
  293.         Top = 49
  294.         Width = 690
  295.         Height = 300
  296.         Align = alClient
  297.         TabOrder = 1
  298.         object TPage
  299.           Left = 0
  300.           Top = 0
  301.           Caption = 'nbpTotals'
  302.           object TotalsChart: TChart
  303.             Left = 0
  304.             Top = 0
  305.             Width = 690
  306.             Height = 300
  307.             BottomWall.Brush.Color = clBlue
  308.             BottomWall.Color = clWhite
  309.             Foot.Font.Charset = DEFAULT_CHARSET
  310.             Foot.Font.Color = clRed
  311.             Foot.Font.Height = -13
  312.             Foot.Font.Name = 'Arial'
  313.             Foot.Font.Style = [fsItalic]
  314.             Gradient.EndColor = 16744576
  315.             Gradient.Visible = True
  316.             LeftWall.Brush.Color = clBlue
  317.             LeftWall.Color = 16744448
  318.             LeftWall.Pen.Color = 8388863
  319.             Title.Font.Charset = ANSI_CHARSET
  320.             Title.Font.Color = clBlue
  321.             Title.Font.Height = -17
  322.             Title.Font.Name = 'Arial'
  323.             Title.Font.Style = []
  324.             Title.Text.Strings = (
  325.               'Taking Summary')
  326.             BackColor = clWhite
  327.             BottomAxis.LabelsFont.Charset = DEFAULT_CHARSET
  328.             BottomAxis.LabelsFont.Color = clBlack
  329.             BottomAxis.LabelsFont.Height = -10
  330.             BottomAxis.LabelsFont.Name = 'Arial'
  331.             BottomAxis.LabelsFont.Style = []
  332.             BottomAxis.Title.Caption = 'Category'
  333.             BottomAxis.Title.Font.Charset = ANSI_CHARSET
  334.             BottomAxis.Title.Font.Color = clBlue
  335.             BottomAxis.Title.Font.Height = -13
  336.             BottomAxis.Title.Font.Name = 'Arial Black'
  337.             BottomAxis.Title.Font.Style = []
  338.             LeftAxis.LabelsFont.Charset = DEFAULT_CHARSET
  339.             LeftAxis.LabelsFont.Color = clBlack
  340.             LeftAxis.LabelsFont.Height = -10
  341.             LeftAxis.LabelsFont.Name = 'Arial'
  342.             LeftAxis.LabelsFont.Style = []
  343.             LeftAxis.Title.Caption = 'Amount'
  344.             LeftAxis.Title.Font.Charset = ANSI_CHARSET
  345.             LeftAxis.Title.Font.Color = clBlue
  346.             LeftAxis.Title.Font.Height = -13
  347.             LeftAxis.Title.Font.Name = 'Arial Black'
  348.             LeftAxis.Title.Font.Style = []
  349.             Legend.Color = 10738885
  350.             Legend.Font.Charset = DEFAULT_CHARSET
  351.             Legend.Font.Color = clBlue
  352.             Legend.Font.Height = -10
  353.             Legend.Font.Name = 'Arial'
  354.             Legend.Font.Style = []
  355.             Legend.TextStyle = ltsLeftPercent
  356.             Legend.ShadowColor = 10485760
  357.             Legend.ShadowSize = 2
  358.             MaxPointsPerPage = 12
  359.             Align = alClient
  360.             BorderStyle = bsSingle
  361.             Color = 8388863
  362.             TabOrder = 0
  363.             object BSAllCustomer: TBarSeries
  364.               ColorEachPoint = True
  365.               Marks.Arrow.Color = clBlue
  366.               Marks.ArrowLength = 11
  367.               Marks.BackColor = 8454016
  368.               Marks.Style = smsValue
  369.               Marks.Visible = True
  370.               Title = 'Taking Summary'
  371.               SeriesColor = clRed
  372.               XValues.DateTime = False
  373.               XValues.Name = 'X'
  374.               XValues.Multiplier = 1.000000000000000000
  375.               XValues.Order = loAscending
  376.               YValues.DateTime = False
  377.               YValues.Name = 'Bar'
  378.               YValues.Multiplier = 1.000000000000000000
  379.               YValues.Order = loNone
  380.             end
  381.           end
  382.         end
  383.         object TPage
  384.           Left = 0
  385.           Top = 0
  386.           Caption = 'nbpByBank'
  387.           object SelectedCategoryChart: TChart
  388.             Left = 0
  389.             Top = 0
  390.             Width = 690
  391.             Height = 300
  392.             BottomWall.Color = clWhite
  393.             Foot.Font.Charset = DEFAULT_CHARSET
  394.             Foot.Font.Color = clRed
  395.             Foot.Font.Height = -13
  396.             Foot.Font.Name = 'Arial'
  397.             Foot.Font.Style = [fsItalic]
  398.             Gradient.EndColor = 4227072
  399.             Gradient.Visible = True
  400.             LeftWall.Color = 16744448
  401.             LeftWall.Pen.Color = 8388863
  402.             Title.Font.Charset = ANSI_CHARSET
  403.             Title.Font.Color = clBlue
  404.             Title.Font.Height = -17
  405.             Title.Font.Name = 'Arial'
  406.             Title.Font.Style = []
  407.             Title.Text.Strings = (
  408.               'Taking Summary')
  409.             BackColor = clWhite
  410.             BottomAxis.Title.Caption = 'Banks'
  411.             BottomAxis.Title.Font.Charset = ANSI_CHARSET
  412.             BottomAxis.Title.Font.Color = clBlue
  413.             BottomAxis.Title.Font.Height = -13
  414.             BottomAxis.Title.Font.Name = 'Arial Black'
  415.             BottomAxis.Title.Font.Style = []
  416.             LeftAxis.Title.Caption = 'Amount'
  417.             LeftAxis.Title.Font.Charset = ANSI_CHARSET
  418.             LeftAxis.Title.Font.Color = clBlue
  419.             LeftAxis.Title.Font.Height = -13
  420.             LeftAxis.Title.Font.Name = 'Arial Black'
  421.             LeftAxis.Title.Font.Style = []
  422.             Legend.TextStyle = ltsRightValue
  423.             MaxPointsPerPage = 4
  424.             Align = alClient
  425.             BorderStyle = bsSingle
  426.             Color = 8388863
  427.             TabOrder = 0
  428.             object BSSelectedCustomer: TBarSeries
  429.               ColorEachPoint = True
  430.               Marks.Arrow.Color = clBlue
  431.               Marks.ArrowLength = 11
  432.               Marks.BackColor = 8454016
  433.               Marks.Style = smsValue
  434.               Marks.Visible = True
  435.               Title = 'AgedDebtor'
  436.               SeriesColor = clRed
  437.               XValues.DateTime = False
  438.               XValues.Name = 'X'
  439.               XValues.Multiplier = 1.000000000000000000
  440.               XValues.Order = loAscending
  441.               YValues.DateTime = False
  442.               YValues.Name = 'Bar'
  443.               YValues.Multiplier = 1.000000000000000000
  444.               YValues.Order = loNone
  445.             end
  446.           end
  447.         end
  448.       end
  449.     end
  450.   end
  451.   object Panel1: TPanel
  452.     Left = 0
  453.     Top = 0
  454.     Width = 698
  455.     Height = 52
  456.     Align = alClient
  457.     TabOrder = 0
  458.     object Label1: TLabel
  459.       Left = 24
  460.       Top = 4
  461.       Width = 88
  462.       Height = 16
  463.       Caption = 'Start Customer'
  464.     end
  465.     object Label2: TLabel
  466.       Left = 152
  467.       Top = 4
  468.       Width = 95
  469.       Height = 16
  470.       Caption = 'Finish Customer'
  471.     end
  472.     object Label5: TLabel
  473.       Left = 408
  474.       Top = 4
  475.       Width = 66
  476.       Height = 16
  477.       Caption = 'Finish Date'
  478.     end
  479.     object Label6: TLabel
  480.       Left = 292
  481.       Top = 4
  482.       Width = 59
  483.       Height = 16
  484.       Caption = 'Start Date'
  485.     end
  486.     object DBCDlgStCustRef: TComboEdit
  487.       Left = 8
  488.       Top = 20
  489.       Width = 120
  490.       Height = 24
  491.       Hint = 'Press F1 for help'
  492.       HelpContext = 617
  493.       ButtonHint = 'Search'
  494.       CharCase = ecUpperCase
  495.       ClickKey = 16467
  496.       ButtonWidth = 24
  497.       MaxLength = 16
  498.       NumGlyphs = 1
  499.       ParentShowHint = False
  500.       ShowHint = True
  501.       TabOrder = 0
  502.       OnButtonClick = DBCDlgStCustReCustomDlg
  503.       OnEnter = DBCDlgStCustRefEnter
  504.       OnExit = DBCDlgStCustRefExit
  505.     end
  506.     object DBCDlgFiCustRef: TComboEdit
  507.       Left = 140
  508.       Top = 20
  509.       Width = 120
  510.       Height = 24
  511.       Hint = 'Press F1 for help'
  512.       HelpContext = 618
  513.       ButtonHint = 'Search'
  514.       CharCase = ecUpperCase
  515.       ClickKey = 16467
  516.       ButtonWidth = 24
  517.       MaxLength = 16
  518.       NumGlyphs = 1
  519.       ParentShowHint = False
  520.       ShowHint = True
  521.       TabOrder = 1
  522.       OnButtonClick = DBCDlgFiCustReCustomDlg
  523.       OnEnter = DBCDlgFiCustRefEnter
  524.       OnExit = DBCDlgFiCustRefExit
  525.     end
  526.     object DEStartDate: TDateEdit
  527.       Left = 276
  528.       Top = 20
  529.       Width = 100
  530.       Height = 24
  531.       Hint = 'Press F1 for help'
  532.       HelpContext = 619
  533.       ButtonHint = 'Calendar'
  534.       NumGlyphs = 2
  535.       ParentShowHint = False
  536.       ShowHint = True
  537.       CalendarStyle = csDialog
  538.       Weekends = [Sun, Sat]
  539.       YearDigits = dyFour
  540.       TabOrder = 2
  541.       OnAcceptDate = DEStartDateAcceptDate
  542.       OnEnter = DEStartDateEnter
  543.       OnExit = DEStartDateExit
  544.     end
  545.     object DEFinDate: TDateEdit
  546.       Left = 392
  547.       Top = 20
  548.       Width = 100
  549.       Height = 24
  550.       Hint = 'Press F1 for help'
  551.       HelpContext = 620
  552.       ButtonHint = 'Calendar'
  553.       NumGlyphs = 2
  554.       ParentShowHint = False
  555.       ShowHint = True
  556.       CalendarStyle = csDialog
  557.       Weekends = [Sun, Sat]
  558.       YearDigits = dyFour
  559.       TabOrder = 3
  560.       OnAcceptDate = DEFinDateAcceptDate
  561.       OnEnter = DEFinDateEnter
  562.       OnExit = DEFinDateExit
  563.     end
  564.     object cbIncVAT: TCheckBox
  565.       Left = 512
  566.       Top = 24
  567.       Width = 173
  568.       Height = 17
  569.       Hint = 'Press F1 for help'
  570.       HelpContext = 622
  571.       Alignment = taLeftJustify
  572.       Caption = 'Include VAT Amounts'
  573.       ParentShowHint = False
  574.       ShowHint = True
  575.       State = cbChecked
  576.       TabOrder = 4
  577.       OnClick = cbIncVATClick
  578.     end
  579.   end
  580.   object Sizer1: TSizer
  581.     Enabled = True
  582.     ExceptionAction = eaIgnoreControl
  583.     GridColumnSizing = gcSizeAllColumns
  584.     GridRowSizing = grSizeByDefaults
  585.     MinimumSize = True
  586.     NavigateOnEnter = True
  587.     OverrideParentFont = True
  588.     PerformAssertions = True
  589.     ShowAssertionFailures = False
  590.     StretchFonts = True
  591.     StretchImages = True
  592.     StretchOnResize = True
  593.     ThreadProcessing = True
  594.     Left = 660
  595.     Top = 313
  596.     ScreenWidth = (
  597.       800)
  598.     ScreenHeight = (
  599.       600)
  600.     OriginalFormWidth = (
  601.       706)
  602.     OriginalFormHeight = (
  603.       459)
  604.     OriginalFormLeft = (
  605.       70)
  606.     OriginalFormTop = (
  607.       84)
  608.     OriginalFormPPI = (
  609.       120)
  610.     OriginalClientWidth = (
  611.       698)
  612.     OriginalClientHeight = (
  613.       432)
  614.   end
  615.   object SaveGraphMenu: TRxPopupMenu
  616.     LeftMargin = 30
  617.     Style = msOwnerDraw
  618.     ShowCheckMarks = False
  619.     OnDrawMargin = SaveGraphMenuDrawMargin
  620.     Left = 474
  621.     Top = 354
  622.     object pmSaveAsBitmap: TMenuItem
  623.       Caption = 'Save As &Bitmap'
  624.       OnClick = pmSaveAsBitmapClick
  625.     end
  626.     object pmSaveAsMetafile: TMenuItem
  627.       Caption = 'Save As &Metafile'
  628.       OnClick = pmSaveAsMetafileClick
  629.     end
  630.     object pmCopyToClipboard: TMenuItem
  631.       Caption = 'Copy To &Clipboard'
  632.       OnClick = pmCopyToClipboardClick
  633.     end
  634.   end
  635.   object taTSTemp: TwwTable
  636.     SyncSQLByRange = False
  637.     NarrowSearch = False
  638.     ValidateWithMask = True
  639.     OnFilter = taTSTempFilter
  640.     Left = 576
  641.     Top = 295
  642.     object taTSTempACCNAME: TStringField
  643.       DisplayLabel = 'Account Name'
  644.       DisplayWidth = 30
  645.       FieldName = 'ACCNAME'
  646.       Size = 30
  647.     end
  648.     object taTSTempONACC: TFloatField
  649.       DisplayLabel = 'On Account'
  650.       DisplayWidth = 15
  651.       FieldName = 'ONACC'
  652.       DisplayFormat = '0.00'
  653.     end
  654.     object taTSTempCASH: TFloatField
  655.       DisplayLabel = 'Cash'
  656.       DisplayWidth = 15
  657.       FieldName = 'CASH'
  658.       DisplayFormat = '0.00'
  659.     end
  660.     object taTSTempBANK1: TFloatField
  661.       DisplayLabel = 'Bank 1'
  662.       DisplayWidth = 15
  663.       FieldName = 'BANK1'
  664.       DisplayFormat = '0.00'
  665.     end
  666.     object taTSTempBANK2: TFloatField
  667.       DisplayLabel = 'Bank 2'
  668.       DisplayWidth = 15
  669.       FieldName = 'BANK2'
  670.       DisplayFormat = '0.00'
  671.     end
  672.     object taTSTempBANK3: TFloatField
  673.       DisplayWidth = 15
  674.       FieldName = 'BANK3'
  675.       DisplayFormat = '0.00'
  676.     end
  677.     object taTSTempBANK4: TFloatField
  678.       DisplayWidth = 15
  679.       FieldName = 'BANK4'
  680.       DisplayFormat = '0.00'
  681.     end
  682.     object taTSTempBANK5: TFloatField
  683.       DisplayWidth = 15
  684.       FieldName = 'BANK5'
  685.       DisplayFormat = '0.00'
  686.     end
  687.     object taTSTempBANK6: TFloatField
  688.       DisplayWidth = 15
  689.       FieldName = 'BANK6'
  690.       DisplayFormat = '0.00'
  691.     end
  692.     object taTSTempBANK7: TFloatField
  693.       DisplayWidth = 15
  694.       FieldName = 'BANK7'
  695.       DisplayFormat = '0.00'
  696.     end
  697.     object taTSTempBANK8: TFloatField
  698.       DisplayWidth = 15
  699.       FieldName = 'BANK8'
  700.       DisplayFormat = '0.00'
  701.     end
  702.     object taTSTempBANK9: TFloatField
  703.       DisplayWidth = 15
  704.       FieldName = 'BANK9'
  705.       DisplayFormat = '0.00'
  706.     end
  707.     object taTSTempBANK10: TFloatField
  708.       DisplayWidth = 15
  709.       FieldName = 'BANK10'
  710.       DisplayFormat = '0.00'
  711.     end
  712.     object taTSTempCTOTAL: TFloatField
  713.       DisplayLabel = 'Total'
  714.       DisplayWidth = 15
  715.       FieldName = 'CTOTAL'
  716.       DisplayFormat = '0.00'
  717.     end
  718.     object taTSTempACREF: TStringField
  719.       DisplayLabel = 'Account'
  720.       DisplayWidth = 10
  721.       FieldName = 'ACREF'
  722.       Visible = False
  723.       Size = 10
  724.     end
  725.   end
  726.   object dsTSTemp: TwwDataSource
  727.     DataSet = taTSTemp
  728.     Left = 496
  729.     Top = 291
  730.   end
  731.   object wwDataSource1: TwwDataSource
  732.     Left = 492
  733.     Top = 148
  734.   end
  735.   object taMainInvoice: TwwTable
  736.     DatabaseName = 'EmpireBuilder'
  737.     IndexName = 'INVNO'
  738.     TableName = 'Invoice.DBF'
  739.     SyncSQLByRange = False
  740.     NarrowSearch = False
  741.     ValidateWithMask = True
  742.     Left = 576
  743.     Top = 168
  744.     object taMainInvoiceINVNO: TFloatField
  745.       FieldName = 'INVNO'
  746.     end
  747.     object taMainInvoiceINVTYPE: TStringField
  748.       FieldName = 'INVTYPE'
  749.       Size = 11
  750.     end
  751.     object taMainInvoicePAYTYPE: TStringField
  752.       FieldName = 'PAYTYPE'
  753.       Size = 8
  754.     end
  755.     object taMainInvoiceBANK: TStringField
  756.       FieldName = 'BANK'
  757.       Size = 10
  758.     end
  759.     object taMainInvoicePAYAMOUNT: TFloatField
  760.       FieldName = 'PAYAMOUNT'
  761.     end
  762.     object taMainInvoiceINVDATE: TDateField
  763.       FieldName = 'INVDATE'
  764.     end
  765.     object taMainInvoiceACREF: TStringField
  766.       FieldName = 'ACREF'
  767.       Size = 10
  768.     end
  769.     object taMainInvoiceNAME: TStringField
  770.       FieldName = 'NAME'
  771.       Size = 30
  772.     end
  773.     object taMainInvoiceADDRESS1: TStringField
  774.       FieldName = 'ADDRESS1'
  775.       Size = 30
  776.     end
  777.     object taMainInvoiceADDRESS2: TStringField
  778.       FieldName = 'ADDRESS2'
  779.       Size = 30
  780.     end
  781.     object taMainInvoiceADDRESS3: TStringField
  782.       FieldName = 'ADDRESS3'
  783.       Size = 30
  784.     end
  785.     object taMainInvoiceADDRESS4: TStringField
  786.       FieldName = 'ADDRESS4'
  787.       Size = 30
  788.     end
  789.     object taMainInvoiceTELNO: TStringField
  790.       FieldName = 'TELNO'
  791.       Size = 15
  792.     end
  793.     object taMainInvoiceDELNAME: TStringField
  794.       FieldName = 'DELNAME'
  795.       Size = 30
  796.     end
  797.     object taMainInvoiceDELADD1: TStringField
  798.       FieldName = 'DELADD1'
  799.       Size = 30
  800.     end
  801.     object taMainInvoiceDELADD2: TStringField
  802.       FieldName = 'DELADD2'
  803.       Size = 30
  804.     end
  805.     object taMainInvoiceDELADD3: TStringField
  806.       FieldName = 'DELADD3'
  807.       Size = 30
  808.     end
  809.     object taMainInvoiceDELADD4: TStringField
  810.       FieldName = 'DELADD4'
  811.       Size = 30
  812.     end
  813.     object taMainInvoiceDELTELNO: TStringField
  814.       FieldName = 'DELTELNO'
  815.       Size = 15
  816.     end
  817.     object taMainInvoiceCORDER: TStringField
  818.       FieldName = 'CORDER'
  819.       Size = 15
  820.     end
  821.     object taMainInvoiceNOTES: TMemoField
  822.       FieldName = 'NOTES'
  823.       BlobType = ftMemo
  824.       Size = 1
  825.     end
  826.     object taMainInvoiceSETTDAYS: TSmallintField
  827.       FieldName = 'SETTDAYS'
  828.     end
  829.     object taMainInvoiceSETTDISC: TFloatField
  830.       FieldName = 'SETTDISC'
  831.     end
  832.     object taMainInvoiceITEMSNETT: TFloatField
  833.       FieldName = 'ITEMSNETT'
  834.     end
  835.     object taMainInvoiceITEMSDISC: TFloatField
  836.       FieldName = 'ITEMSDISC'
  837.     end
  838.     object taMainInvoiceITEMSSUB: TFloatField
  839.       FieldName = 'ITEMSSUB'
  840.     end
  841.     object taMainInvoiceITEMSTAX: TFloatField
  842.       FieldName = 'ITEMSTAX'
  843.     end
  844.     object taMainInvoiceITEMSTOTAL: TFloatField
  845.       FieldName = 'ITEMSTOTAL'
  846.     end
  847.     object taMainInvoiceCARRIAGE: TFloatField
  848.       FieldName = 'CARRIAGE'
  849.     end
  850.     object taMainInvoiceCARTAXCODE: TStringField
  851.       FieldName = 'CARTAXCODE'
  852.       Size = 1
  853.     end
  854.     object taMainInvoiceCARTAX: TFloatField
  855.       FieldName = 'CARTAX'
  856.     end
  857.     object taMainInvoiceCARNOMINAL: TStringField
  858.       FieldName = 'CARNOMINAL'
  859.       Size = 10
  860.     end
  861.     object taMainInvoiceCARGROSS: TFloatField
  862.       FieldName = 'CARGROSS'
  863.     end
  864.     object taMainInvoiceTOTALNETT: TFloatField
  865.       FieldName = 'TOTALNETT'
  866.     end
  867.     object taMainInvoiceTOTALDISC: TFloatField
  868.       FieldName = 'TOTALDISC'
  869.     end
  870.     object taMainInvoiceTOTALSUB: TFloatField
  871.       FieldName = 'TOTALSUB'
  872.     end
  873.     object taMainInvoiceTOTALTAX: TFloatField
  874.       FieldName = 'TOTALTAX'
  875.     end
  876.     object taMainInvoiceINVTOTAL: TFloatField
  877.       FieldName = 'INVTOTAL'
  878.     end
  879.     object taMainInvoiceSDTOPAY: TFloatField
  880.       FieldName = 'SDTOPAY'
  881.     end
  882.     object taMainInvoicePOSTED: TBooleanField
  883.       FieldName = 'POSTED'
  884.     end
  885.     object taMainInvoicePRINTED: TBooleanField
  886.       FieldName = 'PRINTED'
  887.     end
  888.     object taMainInvoicePROFIT: TFloatField
  889.       FieldName = 'PROFIT'
  890.     end
  891.     object taMainInvoiceMARGIN: TFloatField
  892.       FieldName = 'MARGIN'
  893.     end
  894.     object taMainInvoiceTAG1: TBooleanField
  895.       FieldName = 'TAG1'
  896.     end
  897.     object taMainInvoiceINVFORM: TStringField
  898.       FieldName = 'INVFORM'
  899.       Size = 1
  900.     end
  901.   end
  902.   object wwDataSource2: TwwDataSource
  903.     Left = 492
  904.     Top = 240
  905.   end
  906.   object taLineInvoice: TwwTable
  907.     DatabaseName = 'EmpireBuilder'
  908.     IndexName = 'INVNO'
  909.     TableName = 'Invoice2.DBF'
  910.     SyncSQLByRange = False
  911.     NarrowSearch = False
  912.     ValidateWithMask = True
  913.     Left = 588
  914.     Top = 232
  915.     object taLineInvoiceINVNO: TFloatField
  916.       FieldName = 'INVNO'
  917.     end
  918.     object taLineInvoiceSTOCKCODE: TStringField
  919.       FieldName = 'STOCKCODE'
  920.       Size = 16
  921.     end
  922.     object taLineInvoiceDESC: TMemoField
  923.       FieldName = 'DESC'
  924.       BlobType = ftMemo
  925.       Size = 1
  926.     end
  927.     object taLineInvoiceQUAN: TFloatField
  928.       FieldName = 'QUAN'
  929.     end
  930.     object taLineInvoicePRICE: TFloatField
  931.       FieldName = 'PRICE'
  932.     end
  933.     object taLineInvoiceDISC: TFloatField
  934.       FieldName = 'DISC'
  935.     end
  936.     object taLineInvoiceTAXCODE: TStringField
  937.       FieldName = 'TAXCODE'
  938.       Size = 1
  939.     end
  940.     object taLineInvoiceNOMINAL: TStringField
  941.       FieldName = 'NOMINAL'
  942.       Size = 10
  943.     end
  944.     object taLineInvoiceCOSTPRICE: TFloatField
  945.       FieldName = 'COSTPRICE'
  946.     end
  947.     object taLineInvoicePROFIT: TFloatField
  948.       FieldName = 'PROFIT'
  949.     end
  950.     object taLineInvoiceMARGIN: TFloatField
  951.       FieldName = 'MARGIN'
  952.     end
  953.     object taLineInvoiceNETT: TFloatField
  954.       FieldName = 'NETT'
  955.     end
  956.     object taLineInvoiceDISCOUNT: TFloatField
  957.       FieldName = 'DISCOUNT'
  958.     end
  959.     object taLineInvoiceSUBTOTAL: TFloatField
  960.       FieldName = 'SUBTOTAL'
  961.     end
  962.     object taLineInvoiceTAX: TFloatField
  963.       FieldName = 'TAX'
  964.     end
  965.     object taLineInvoiceTOTAL: TFloatField
  966.       FieldName = 'TOTAL'
  967.     end
  968.   end
  969.   object pmRClick: TRxPopupMenu
  970.     Style = msOwnerDraw
  971.     ShowCheckMarks = False
  972.     OnGetItemParams = pmRClickGetItemParams
  973.     Left = 436
  974.     Top = 209
  975.     object pmPrint: TMenuItem
  976.       Caption = 'Print'
  977.       OnClick = BtnRepPrintClick
  978.     end
  979.     object pmEmail: TMenuItem
  980.       Caption = 'Email'
  981.       OnClick = BtnRepEmailClick
  982.     end
  983.     object N4: TMenuItem
  984.       Caption = '-'
  985.     end
  986.     object pmiGridColor: TMenuItem
  987.       Caption = 'Change Grid Colour'
  988.       OnClick = pmiGridColorClick
  989.     end
  990.   end
  991. end
  992.