home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1999 September / Dpcb0999.iso / Business / Empire / _SETUP.1 / EmpireBuilder.exe / 0 / RCDATA / TFMNOMDAYBOOKS / TFMNOMDAYBOOKS.txt
Text File  |  1999-06-21  |  25KB  |  818 lines
  1. object fmNomDayBooks: TfmNomDayBooks
  2.   Left = 57
  3.   Top = 106
  4.   AutoScroll = False
  5.   Caption = 'Financial Accounts Daybook'
  6.   ClientHeight = 432
  7.   ClientWidth = 698
  8.   Font.Charset = ANSI_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'Arial'
  12.   Font.Style = []
  13.   FormStyle = fsMDIChild
  14.   Position = poDefaultPosOnly
  15.   Scaled = False
  16.   Visible = True
  17.   OnActivate = FormActivate
  18.   OnClose = FormClose
  19.   OnCloseQuery = FormCloseQuery
  20.   OnCreate = FormCreate
  21.   OnDeactivate = FormDeactivate
  22.   OnShow = FormShow
  23.   PixelsPerInch = 120
  24.   TextHeight = 16
  25.   object Panel1: TPanel
  26.     Left = 0
  27.     Top = 0
  28.     Width = 698
  29.     Height = 53
  30.     Align = alTop
  31.     TabOrder = 0
  32.     object Label1: TLabel
  33.       Left = 28
  34.       Top = 4
  35.       Width = 80
  36.       Height = 16
  37.       Caption = 'Start Account'
  38.     end
  39.     object Label2: TLabel
  40.       Left = 156
  41.       Top = 4
  42.       Width = 87
  43.       Height = 16
  44.       Caption = 'Finish Account'
  45.     end
  46.     object Label3: TLabel
  47.       Left = 280
  48.       Top = 4
  49.       Width = 99
  50.       Height = 16
  51.       Caption = 'Start Trans. Date'
  52.     end
  53.     object Label5: TLabel
  54.       Left = 392
  55.       Top = 4
  56.       Width = 106
  57.       Height = 16
  58.       Caption = 'Finish Trans. Date'
  59.     end
  60.     object Label4: TLabel
  61.       Left = 512
  62.       Top = 4
  63.       Width = 57
  64.       Height = 16
  65.       Caption = 'Include ...'
  66.     end
  67.     object DEStartTrans: TDateEdit
  68.       Left = 280
  69.       Top = 20
  70.       Width = 100
  71.       Height = 24
  72.       Hint = 'Press F1 for help'
  73.       HelpContext = 102
  74.       ClickKey = 16452
  75.       NumGlyphs = 2
  76.       ParentShowHint = False
  77.       ShowHint = True
  78.       CalendarStyle = csDialog
  79.       Weekends = [Sun, Sat]
  80.       YearDigits = dyFour
  81.       TabOrder = 2
  82.       OnAcceptDate = DEStartTransAcceptDate
  83.       OnEnter = DEStartTransEnter
  84.       OnExit = DEStartTransExit
  85.     end
  86.     object DEFinTrans: TDateEdit
  87.       Left = 396
  88.       Top = 20
  89.       Width = 100
  90.       Height = 24
  91.       Hint = 'Press F1 for help'
  92.       HelpContext = 103
  93.       ClickKey = 16452
  94.       NumGlyphs = 2
  95.       ParentShowHint = False
  96.       ShowHint = True
  97.       CalendarStyle = csDialog
  98.       Weekends = [Sun, Sat]
  99.       YearDigits = dyFour
  100.       TabOrder = 3
  101.       OnAcceptDate = DEFinTransAcceptDate
  102.       OnEnter = DEFinTransEnter
  103.       OnExit = DEFinTransExit
  104.     end
  105.     object AICBTransType: TComboBox
  106.       Left = 512
  107.       Top = 20
  108.       Width = 181
  109.       Height = 24
  110.       Hint = 'Press F1 for help'
  111.       HelpContext = 316
  112.       DropDownCount = 12
  113.       ItemHeight = 16
  114.       Items.Strings = (
  115.         'All Transactions'
  116.         'Journals'
  117.         'Bank/Cash Payments'
  118.         'Bank/Cash Receipts'
  119.         'Customer Invoices'
  120.         'Customer Credit Notes'
  121.         'Customer Payments'
  122.         'Customer Refunds'
  123.         'Customer Discounts'
  124.         'Supplier Invoices'
  125.         'Supplier Credit Notes'
  126.         'Supplier Payments'
  127.         'Supplier Refunds'
  128.         'Supplier Discounts')
  129.       ParentShowHint = False
  130.       ShowHint = True
  131.       TabOrder = 4
  132.       Text = 'All Transactions'
  133.       OnChange = AICBTransTypeChange
  134.     end
  135.     object DBCDlgStAccRef: TComboEdit
  136.       Left = 8
  137.       Top = 20
  138.       Width = 120
  139.       Height = 24
  140.       Hint = 'Press F1 for help'
  141.       HelpContext = 285
  142.       CharCase = ecUpperCase
  143.       ClickKey = 16467
  144.       ButtonWidth = 24
  145.       MaxLength = 16
  146.       NumGlyphs = 1
  147.       ParentShowHint = False
  148.       ShowHint = True
  149.       TabOrder = 0
  150.       OnButtonClick = DBCDlgStAccRefButtonClick
  151.       OnEnter = DBCDlgStAccRefEnter
  152.       OnExit = DBCDlgStAccRefExit
  153.     end
  154.     object DBCDlgFiAccRef: TComboEdit
  155.       Left = 144
  156.       Top = 20
  157.       Width = 120
  158.       Height = 24
  159.       Hint = 'Press F1 for help'
  160.       HelpContext = 286
  161.       CharCase = ecUpperCase
  162.       ClickKey = 16467
  163.       ButtonWidth = 24
  164.       MaxLength = 16
  165.       NumGlyphs = 1
  166.       ParentShowHint = False
  167.       ShowHint = True
  168.       TabOrder = 1
  169.       OnButtonClick = DBCDlgFiAccRefButtonClick
  170.       OnEnter = DBCDlgFiAccRefEnter
  171.       OnExit = DBCDlgFiAccRefExit
  172.     end
  173.   end
  174.   object Panel2: TPanel
  175.     Left = 0
  176.     Top = 53
  177.     Width = 698
  178.     Height = 379
  179.     Align = alClient
  180.     TabOrder = 1
  181.     object SpeedBar: TSpeedBar
  182.       Left = 1
  183.       Top = 1
  184.       Width = 696
  185.       Height = 49
  186.       Font.Charset = ANSI_CHARSET
  187.       Font.Color = clWindowText
  188.       Font.Height = -13
  189.       Font.Name = 'MS Sans Serif'
  190.       Font.Style = []
  191.       Options = [sbAllowDrag, sbFlatBtns, sbTransparentBtns]
  192.       BtnOffsetHorz = 3
  193.       BtnOffsetVert = 3
  194.       BtnWidth = 70
  195.       BtnHeight = 43
  196.       TabOrder = 0
  197.       InternalVer = 1
  198.       object SpeedbarSection1: TSpeedbarSection
  199.         Caption = 'Untitled (0)'
  200.       end
  201.       object BtnZoomIn: TSpeedItem
  202.         BtnCaption = 'Zoom In'
  203.         Caption = 'Transaction zoom-in'
  204.         DropDownMenu = PUZoomMenu
  205.         Hint = 'Transaction zoom-in'
  206.         Spacing = 1
  207.         Left = 3
  208.         Top = 3
  209.         Visible = True
  210.         SectionName = 'Untitled (0)'
  211.       end
  212.       object BtnPrint: TSpeedItem
  213.         BtnCaption = 'Print'
  214.         Caption = 'Print daybook report'
  215.         Hint = 'Print daybook report'
  216.         Spacing = 1
  217.         Left = 143
  218.         Top = 3
  219.         Visible = True
  220.         OnClick = BtnPrintClick
  221.         SectionName = 'Untitled (0)'
  222.       end
  223.       object BtnEmail: TSpeedItem
  224.         BtnCaption = 'Email'
  225.         Caption = 'Email daybook report'
  226.         Hint = 'Email daybook report|'
  227.         Spacing = 1
  228.         Left = 213
  229.         Top = 3
  230.         Visible = True
  231.         OnClick = BtnEmailClick
  232.         SectionName = 'Untitled (0)'
  233.       end
  234.       object BtnClose: TSpeedItem
  235.         BtnCaption = 'Close'
  236.         Caption = 'Close'
  237.         Hint = 'Close report'
  238.         Spacing = 1
  239.         Left = 423
  240.         Top = 3
  241.         Visible = True
  242.         OnClick = BtnCloseClick
  243.         SectionName = 'Untitled (0)'
  244.       end
  245.       object BtnSearch: TSpeedItem
  246.         BtnCaption = 'Search'
  247.         Caption = 'Search for a transaction'
  248.         Hint = 'Search for a transaction|'
  249.         Spacing = 1
  250.         Left = 283
  251.         Top = 3
  252.         Visible = True
  253.         OnClick = BtnSearchClick
  254.         SectionName = 'Untitled (0)'
  255.       end
  256.       object btnHelp: TSpeedItem
  257.         BtnCaption = '&Help'
  258.         Caption = 'View full help on this window'
  259.         Glyph.Data = {
  260.           52050000424D5205000000000000420000002800000024000000120000000100
  261.           1000030000001005000000000000000000000000000000000000007C0000E003
  262.           00001F0000000042004200420042004200420042004210021002004200420042
  263.           004200420042004200420042004200420042004200420042FF7FFF7F00420042
  264.           0042004200420042004200420042004200420042004200420042004210021000
  265.           1000100200420042004200420042004200420042004200420042004200420042
  266.           10421042FF7F0042004200420042004200420042004200420042004200420042
  267.           00420042FF031002100210000042004200420042004200420042004200420042
  268.           0042004200421042FF7F00421042FF7F00420042004200420042004200420042
  269.           0042004200420042004200420042FF0310021002004200420042004200420042
  270.           00420042004200420042004200421042FF7FFF7F1042FF7F0042004200420042
  271.           0042004200420042004200420042004200420042004200420042004200420042
  272.           0042004200420042004200420042004200420042004200421042104200420042
  273.           0042004200420042004200420042004200420042004200420042004200421000
  274.           1000100200420042004200420042004200420042004200420042004200420042
  275.           0042FF7FFF7F0042004200420042004200420042004200420042004200420042
  276.           0042004210021002100210000042004200420042004200420042004200420042
  277.           0042004200420042104210421042FF7F00420042004200420042004200420042
  278.           004200420042004200420042FF03100210021000004200420042004200420042
  279.           00420042004200420042004200421042FF7F00421042FF7F0042004200420042
  280.           0042004200420042004200420042004200420042FF0310021002100210000042
  281.           004200420042004200420042004200420042004200421042FF7F00421042FF7F
  282.           004200420042004200420042004200420042004200420042004200420042FF03
  283.           1002100210021000004200420042004200420042004200420042004200421042
  284.           FF7F004200421042FF7F00420042004200420042004200420042004200420042
  285.           0042004200420042FF0310021002100210000042004200420042004200420042
  286.           00420042004200421042FF7F004200421042FF7F004200420042004200420042
  287.           004200420042004210001000004200420042FF03100210021002100000420042
  288.           004200420042004200420042FF7F004200421042FF7F004200421042FF7F0042
  289.           00420042004200420042004200421002100210021000004200420042FF031002
  290.           10021000004200420042004200420042004210421042FF7F004200421042FF7F
  291.           004200421042FF7F0042004200420042004200420042FF031002100210021000
  292.           1000100010021002100210000042004200420042004200421042FF7F00421042
  293.           FF7FFF7FFF7F1042004200421042FF7F00420042004200420042004200420042
  294.           FF03100210021002100210021002100210021002004200420042004200420042
  295.           1042FF7F004200421042104210420042004200421042FF7F0042004200420042
  296.           00420042004200420042FF03FF03100210021002100210021002004200420042
  297.           004200420042004200421042FF7FFF7F00420042004200420042004210420042
  298.           00420042004200420042004200420042004200420042FF03FF03FF03FF03FF03
  299.           004200420042004200420042004200420042004210421042FF7FFF7FFF7FFF7F
  300.           FF7F104200420042004200420042004200420042004200420042004200420042
  301.           0042004200420042004200420042004200420042004200420042004200420042
  302.           10421042104210421042004200420042004200420042}
  303.         Hint = 'View full help on this window|'
  304.         NumGlyphs = 2
  305.         Spacing = 1
  306.         Left = 353
  307.         Top = 3
  308.         Visible = True
  309.         OnClick = btnHelpClick
  310.         SectionName = 'Untitled (0)'
  311.       end
  312.       object BtnOptions: TSpeedItem
  313.         BtnCaption = 'Options'
  314.         Caption = 'Options menu'
  315.         DropDownMenu = pmOptions
  316.         Glyph.Data = {
  317.           F6000000424DF600000000000000760000002800000010000000100000000100
  318.           0400000000008000000000000000000000001000000010000000000000000000
  319.           8000008000000080800080000000800080008080000080808000C0C0C0000000
  320.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
  321.           8888844888888844888884A4888884A48888884A48884A4888888884A484A488
  322.           888888884A4A48888888888884A48888888888884A4A488884884444A484A488
  323.           4C48444448884A444CC448844888844CC4488884488884CCC4888844488844CC
  324.           C48888888844CC44488888888884444888888888888888888888}
  325.         Hint = 'Options menu|'
  326.         Spacing = 1
  327.         Left = 73
  328.         Top = 3
  329.         Visible = True
  330.         SectionName = 'Untitled (0)'
  331.       end
  332.     end
  333.     object wwDBGrid1: TwwDBGrid
  334.       Left = 1
  335.       Top = 50
  336.       Width = 696
  337.       Height = 328
  338.       Selected.Strings = (
  339.         'LONGMOD'#9'20'#9'Transaction Type'
  340.         'NOMREF'#9'10'#9'Account '
  341.         'TARNSDATE'#9'10'#9'Date'
  342.         'TRANSREF'#9'10'#9'Ref.'
  343.         'DETAILS'#9'25'#9'Details'
  344.         'POSTVALUE'#9'10'#9'Total'
  345.         'DEBIT'#9'13'#9'Debit'
  346.         'CREDIT'#9'13'#9'Credit'
  347.         'NATVALUE'#9'10'#9'Trans. Net~Value'
  348.         'VATVALUE'#9'10'#9'Trans. VAT~Value'
  349.         'TOTALVALUE'#9'10'#9'Trans. Total~Value'
  350.         'BALANCE'#9'13'#9'Balance~Forward'
  351.         'RECONBANK'#9'5'#9'Bank~Reconciled'
  352.         'RECONVAT'#9'5'#9'VAT~Reconciled')
  353.       TitleColor = clBtnFace
  354.       FixedCols = 0
  355.       ShowHorzScrollBar = True
  356.       Align = alClient
  357.       DataSource = dsNomTrans
  358.       Options = [dgTitles, dgIndicator, dgColumnResize, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap, dgShowFooter, dgFooter3DCells]
  359.       PopupMenu = pmRClick
  360.       TabOrder = 1
  361.       TitleAlignment = taLeftJustify
  362.       TitleFont.Charset = ANSI_CHARSET
  363.       TitleFont.Color = clWindowText
  364.       TitleFont.Height = -13
  365.       TitleFont.Name = 'Arial'
  366.       TitleFont.Style = []
  367.       TitleLines = 2
  368.       TitleButtons = True
  369.       OnCalcCellColors = wwDBGrid1CalcCellColors
  370.       OnCalcTitleAttributes = wwDBGrid1CalcTitleAttributes
  371.       OnTitleButtonClick = wwDBGrid1TitleButtonClick
  372.       OnDblClick = puiTDClick
  373.       IndicatorColor = icBlack
  374.       OnTopRowChanged = wwDBGrid1TopRowChanged
  375.       OnCalcTitleImage = wwDBGrid1CalcTitleImage
  376.       TitleImageList = ImagesDM.GenralBM
  377.       FooterCellColor = clYellow
  378.       FooterHeight = 25
  379.     end
  380.   end
  381.   object Sizer1: TSizer
  382.     Enabled = True
  383.     ExceptionAction = eaIgnoreControl
  384.     GridColumnSizing = gcSizeAllColumns
  385.     GridRowSizing = grSizeByDefaults
  386.     MinimumSize = True
  387.     NavigateOnEnter = True
  388.     OverrideParentFont = True
  389.     PerformAssertions = True
  390.     ShowAssertionFailures = False
  391.     StretchFonts = True
  392.     StretchImages = True
  393.     StretchOnResize = True
  394.     ThreadProcessing = False
  395.     Left = 604
  396.     Top = 69
  397.     ScreenWidth = (
  398.       800)
  399.     ScreenHeight = (
  400.       600)
  401.     OriginalFormWidth = (
  402.       706)
  403.     OriginalFormHeight = (
  404.       459)
  405.     OriginalFormLeft = (
  406.       57)
  407.     OriginalFormTop = (
  408.       106)
  409.     OriginalFormPPI = (
  410.       120)
  411.     OriginalClientWidth = (
  412.       698)
  413.     OriginalClientHeight = (
  414.       432)
  415.   end
  416.   object SRW: TSRW
  417.     About.HelpContext = 1033
  418.     About.HelpCaption = '&Creating Reports'
  419.     About.HelpFile = 'SRWHELP.HLP'
  420.     Active = False
  421.     Extension = 'SRW'
  422.     Grid.FooterFont.Charset = DEFAULT_CHARSET
  423.     Grid.FooterFont.Color = clWindowText
  424.     Grid.FooterFont.Height = -13
  425.     Grid.FooterFont.Name = 'MS Sans Serif'
  426.     Grid.FooterFont.Style = []
  427.     Grid.RecordFont.Charset = DEFAULT_CHARSET
  428.     Grid.RecordFont.Color = clWindowText
  429.     Grid.RecordFont.Height = -13
  430.     Grid.RecordFont.Name = 'MS Sans Serif'
  431.     Grid.RecordFont.Style = []
  432.     Grid.SubTitleFont.Charset = DEFAULT_CHARSET
  433.     Grid.SubTitleFont.Color = clWindowText
  434.     Grid.SubTitleFont.Height = -13
  435.     Grid.SubTitleFont.Name = 'MS Sans Serif'
  436.     Grid.SubTitleFont.Style = []
  437.     Grid.TitleFont.Charset = DEFAULT_CHARSET
  438.     Grid.TitleFont.Color = clWindowText
  439.     Grid.TitleFont.Height = -13
  440.     Grid.TitleFont.Name = 'MS Sans Serif'
  441.     Grid.TitleFont.Style = []
  442.     Page.FormatCurrency = '$#,#.00'
  443.     Page.FormatDate = 'ddddd'
  444.     Page.FormatDateTime = 'c'
  445.     Page.FormatFloat = '#,#.00'
  446.     Page.FormatTime = 't'
  447.     Page.LabelsActive = False
  448.     Page.LabelsAcross = 0
  449.     Page.LabelsDown = 0
  450.     Page.LayoutOptions = [srwShowMargins, srwShowSections, srwShowGuides]
  451.     Page.MarginBottom = 0.300000011920929000
  452.     Page.MarginLeft = 0.300000011920929000
  453.     Page.MarginRight = 0.300000011920929000
  454.     Page.MarginTop = 0.300000011920929000
  455.     Page.PaperType = srwPaperLetter
  456.     Page.PaperHeight = 11.000000000000000000
  457.     Page.PaperWidth = 8.500000000000000000
  458.     Page.PaperOrientation = poPortrait
  459.     Page.PaperCopies = 1
  460.     Query.AliasFields = False
  461.     Query.AllowAggregates = True
  462.     Query.AllowCartesians = False
  463.     Query.AllowEditCode = True
  464.     Query.AsAlias = False
  465.     Query.BooleanQuote = '"'
  466.     Query.CacheResults = False
  467.     Query.DatabaseType = srwDbase
  468.     Query.DatabaseDetect = True
  469.     Query.DateFormat = 'mm"/"dd"/"yyyy'
  470.     Query.DateQuote = '"'
  471.     Query.DefaultOptional = True
  472.     Query.GroupBySelect = False
  473.     Query.IsLocal = True
  474.     Query.OrderByAlias = True
  475.     Query.OriginalDateOrder = srwUnknown
  476.     Query.VerifyNames = True
  477.     Query.UniqueRecords = False
  478.     ReportName = 'Untitled'
  479.     TempMode = srwTempOptional
  480.     Window.CaptionCode = 'View S&QL'
  481.     Window.CaptionLayout = '&Layout Page'
  482.     Window.CaptionLink = 'Link &Tables'
  483.     Window.CaptionMain = 'Shazam Report Wizard'
  484.     Window.CaptionPreview = '&Preview Report'
  485.     Window.CaptionQuery = 'Define Sea&rch'
  486.     Window.LinksShareQueryTab = True
  487.     Window.IsChild = False
  488.     Window.IsModal = False
  489.     Window.MenuEdit = [srwEditAddField, srwEditAddTable, srwEditCutCopyPaste, srwEditDeleteField, srwEditDeleteTable, srwEditDeleteLink, srwEditFieldProperties, srwEditSetupReport, srwEditVisible]
  490.     Window.MenuFile = [srwFileExport, srwFileNew, srwFileOpen, srwFilePrint, srwFileSave, srwFileVisible]
  491.     Window.MenuHelp = [srwHelpContents, srwHelpSearch, srwHelpAbout, srwHelpVisible]
  492.     Window.MenuView = [srwViewAlias, srwViewCode, srwViewLayout, srwViewLink, srwViewPages, srwViewPreview, srwViewQuery, srwViewVisible]
  493.     Window.PreviewMode = srwPreviewGrid
  494.     Window.Visible = True
  495.     Window.State = wsNormal
  496.     Window.ShowToolbar = True
  497.     OnBeforePrint = SRWBeforePrint
  498.     OnBeforeReport = SRWBeforeReport
  499.     Left = 513
  500.     Top = 69
  501.   end
  502.   object PUZoomMenu: TRxPopupMenu
  503.     LeftMargin = 30
  504.     Style = msOwnerDraw
  505.     OnDrawMargin = PUZoomMenuDrawMargin
  506.     Left = 572
  507.     Top = 71
  508.     object puiTD: TMenuItem
  509.       Caption = 'Transaction Details'
  510.       OnClick = puiTDClick
  511.     end
  512.     object puiDED: TMenuItem
  513.       Caption = 'Double Entry Distribution'
  514.       OnClick = puiDEDClick
  515.     end
  516.     object puiCST: TMenuItem
  517.       Caption = 'Customer/Supplier Transaction'
  518.       OnClick = puiCSTClick
  519.     end
  520.     object puiOD: TMenuItem
  521.       Caption = 'Original Document'
  522.       OnClick = puiODClick
  523.     end
  524.     object puiVATBD: TMenuItem
  525.       Caption = 'VAT Breakdown'
  526.       OnClick = puiVATBDClick
  527.     end
  528.   end
  529.   object dsNomTrans: TwwDataSource
  530.     DataSet = taNomTrans
  531.     Left = 659
  532.     Top = 131
  533.   end
  534.   object pmRClick: TRxPopupMenu
  535.     OnPopup = pmRClickPopup
  536.     Style = msOwnerDraw
  537.     ShowCheckMarks = False
  538.     OnGetItemParams = pmRClickGetItemParams
  539.     Left = 543
  540.     Top = 71
  541.     object pmiTD: TMenuItem
  542.       Caption = 'Transaction Details'
  543.       OnClick = puiTDClick
  544.     end
  545.     object pmiDED: TMenuItem
  546.       Caption = 'Double Entry '
  547.       OnClick = puiDEDClick
  548.     end
  549.     object pmiCST: TMenuItem
  550.       Caption = 'Cust/Supp Transaction'
  551.       OnClick = puiCSTClick
  552.     end
  553.     object pmiOD: TMenuItem
  554.       Caption = 'Original Document'
  555.       OnClick = puiODClick
  556.     end
  557.     object pmiVATBD: TMenuItem
  558.       Caption = 'VAT Breakdown'
  559.       OnClick = puiVATBDClick
  560.     end
  561.     object N1: TMenuItem
  562.       Caption = '-'
  563.     end
  564.     object pmPrint: TMenuItem
  565.       Caption = 'Print'
  566.       OnClick = BtnPrintClick
  567.     end
  568.     object pmEmail: TMenuItem
  569.       Caption = 'Email'
  570.       OnClick = BtnEmailClick
  571.     end
  572.     object N2: TMenuItem
  573.       Caption = '-'
  574.     end
  575.     object pmiUndo: TMenuItem
  576.       Caption = 'Undo Transaction'
  577.       OnClick = pmiUndoClick
  578.     end
  579.     object N4: TMenuItem
  580.       Caption = '-'
  581.     end
  582.     object pmiGridColor: TMenuItem
  583.       Caption = 'Change Grid Colour'
  584.       OnClick = pmiGridColorClick
  585.     end
  586.   end
  587.   object taNomTrans: TwwQuery
  588.     AfterScroll = taNomTransAfterScroll
  589.     OnCalcFields = taNomTransCalcFields
  590.     DatabaseName = 'EmpireBuilder'
  591.     SQL.Strings = (
  592.       'select * from nomtrans '
  593.       
  594.         'where (postvalue <> 0) and (tarnsdate >= :STDATE) and (tarnsdate' +
  595.         ' <= :FINDATE) and'
  596.       '            (nomref >= :STNOM) and (nomref <= :FINNOM) '
  597.       '         ')
  598.     Params.Data = {
  599.       0100040006535444415445000904005A950A0000000746494E44415445000904
  600.       005A950A0000000553544E4F4D00010200300000000646494E4E4F4D00010200
  601.       30000000}
  602.     ControlType.Strings = (
  603.       'RECONBANK;CheckBox;Yes;No'
  604.       'RECONVAT;CheckBox;Yes;No')
  605.     ValidateWithMask = True
  606.     Left = 662
  607.     Top = 104
  608.     object taNomTransLONGMOD: TStringField
  609.       DisplayLabel = 'Transaction Type'
  610.       DisplayWidth = 20
  611.       FieldName = 'LONGMOD'
  612.       Calculated = True
  613.     end
  614.     object taNomTransNOMREF: TStringField
  615.       DisplayLabel = 'Account '
  616.       DisplayWidth = 10
  617.       FieldName = 'NOMREF'
  618.       Origin = '"NomTrans.DBF".NOMREF'
  619.       Size = 10
  620.     end
  621.     object taNomTransTARNSDATE: TDateField
  622.       DisplayLabel = 'Date'
  623.       DisplayWidth = 10
  624.       FieldName = 'TARNSDATE'
  625.       Origin = '"NomTrans.DBF".TARNSDATE'
  626.     end
  627.     object taNomTransTRANSREF: TStringField
  628.       DisplayLabel = 'Ref.'
  629.       DisplayWidth = 10
  630.       FieldName = 'TRANSREF'
  631.       Origin = '"NomTrans.DBF".TRANSREF'
  632.       Size = 10
  633.     end
  634.     object taNomTransDETAILS: TStringField
  635.       DisplayLabel = 'Details'
  636.       DisplayWidth = 25
  637.       FieldName = 'DETAILS'
  638.       Origin = '"NomTrans.DBF".DETAILS'
  639.       Size = 30
  640.     end
  641.     object taNomTransPOSTVALUE: TFloatField
  642.       DisplayLabel = 'Total'
  643.       DisplayWidth = 10
  644.       FieldName = 'POSTVALUE'
  645.       Origin = '"NomTrans.DBF".POSTVALUE'
  646.       DisplayFormat = '0.00'
  647.     end
  648.     object taNomTransDEBIT: TFloatField
  649.       DisplayLabel = 'Debit'
  650.       DisplayWidth = 13
  651.       FieldName = 'DEBIT'
  652.       DisplayFormat = '0.00'
  653.       Calculated = True
  654.     end
  655.     object taNomTransCREDIT: TFloatField
  656.       DisplayLabel = 'Credit'
  657.       DisplayWidth = 13
  658.       FieldName = 'CREDIT'
  659.       DisplayFormat = '0.00'
  660.       Calculated = True
  661.     end
  662.     object taNomTransNATVALUE: TFloatField
  663.       DisplayLabel = 'Trans. Net~Value'
  664.       DisplayWidth = 10
  665.       FieldName = 'NATVALUE'
  666.       Origin = '"NomTrans.DBF".NATVALUE'
  667.       DisplayFormat = '0.00'
  668.     end
  669.     object taNomTransVATVALUE: TFloatField
  670.       DisplayLabel = 'Trans. VAT~Value'
  671.       DisplayWidth = 10
  672.       FieldName = 'VATVALUE'
  673.       Origin = '"NomTrans.DBF".VATVALUE'
  674.       DisplayFormat = '0.00'
  675.     end
  676.     object taNomTransTOTALVALUE: TFloatField
  677.       DisplayLabel = 'Trans. Total~Value'
  678.       DisplayWidth = 10
  679.       FieldName = 'TOTALVALUE'
  680.       Origin = '"NomTrans.DBF".TOTALVALUE'
  681.       DisplayFormat = '0.00'
  682.     end
  683.     object taNomTransBALANCE: TFloatField
  684.       DisplayLabel = 'Balance~Forward'
  685.       DisplayWidth = 13
  686.       FieldName = 'BALANCE'
  687.       Origin = '"NomTrans.DBF".BALANCE'
  688.       DisplayFormat = '0.00'
  689.     end
  690.     object taNomTransRECONBANK: TBooleanField
  691.       DisplayLabel = 'Bank~Reconciled'
  692.       DisplayWidth = 5
  693.       FieldName = 'RECONBANK'
  694.       Origin = '"NomTrans.DBF".RECONBANK'
  695.     end
  696.     object taNomTransRECONVAT: TBooleanField
  697.       DisplayLabel = 'VAT~Reconciled'
  698.       DisplayWidth = 5
  699.       FieldName = 'RECONVAT'
  700.       Origin = '"NomTrans.DBF".RECONVAT'
  701.     end
  702.     object taNomTransVATCODE: TStringField
  703.       DisplayLabel = 'VC'
  704.       DisplayWidth = 1
  705.       FieldName = 'VATCODE'
  706.       Origin = '"NomTrans.DBF".VATCODE'
  707.       Visible = False
  708.       Size = 1
  709.     end
  710.     object taNomTransTRANSNO: TFloatField
  711.       FieldName = 'TRANSNO'
  712.       Origin = '"NomTrans.DBF".TRANSNO'
  713.       Visible = False
  714.     end
  715.     object taNomTransTTRANSNO: TFloatField
  716.       FieldName = 'TTRANSNO'
  717.       Origin = '"NomTrans.DBF".TTRANSNO'
  718.       Visible = False
  719.     end
  720.     object taNomTransTRANSTYPE: TStringField
  721.       FieldName = 'TRANSTYPE'
  722.       Origin = '"NomTrans.DBF".TRANSTYPE'
  723.       Visible = False
  724.       Size = 8
  725.     end
  726.     object taNomTransGROUPREF: TStringField
  727.       FieldName = 'GROUPREF'
  728.       Origin = '"NomTrans.DBF".GROUPREF'
  729.       Visible = False
  730.       Size = 10
  731.     end
  732.     object taNomTransPOSTTYPE: TStringField
  733.       FieldName = 'POSTTYPE'
  734.       Origin = '"NomTrans.DBF".POSTTYPE'
  735.       Visible = False
  736.       Size = 1
  737.     end
  738.     object taNomTransMODULE: TStringField
  739.       FieldName = 'MODULE'
  740.       Origin = '"NomTrans.DBF".MODULE'
  741.       Visible = False
  742.       Size = 1
  743.     end
  744.     object taNomTransPAYMENT: TFloatField
  745.       FieldName = 'PAYMENT'
  746.       Origin = '"NomTrans.DBF".PAYMENT'
  747.       Visible = False
  748.     end
  749.     object taNomTransHTRANSNO: TFloatField
  750.       FieldName = 'HTRANSNO'
  751.       Origin = '"NomTrans.DBF".HTRANSNO'
  752.       Visible = False
  753.     end
  754.     object taNomTransVATCACHE: TFloatField
  755.       FieldName = 'VATCACHE'
  756.       Origin = '"NomTrans.DBF".VATCACHE'
  757.       Visible = False
  758.     end
  759.     object taNomTransTRANLINK: TFloatField
  760.       FieldName = 'TRANLINK'
  761.       Origin = '"NomTrans.DBF".TRANLINK'
  762.       Visible = False
  763.     end
  764.   end
  765.   object taNTSumm1: TwwQuery
  766.     DatabaseName = 'EmpireBuilder'
  767.     SQL.Strings = (
  768.       'select sum(postvalue) from nomtrans'
  769.       
  770.         'where (postvalue <> 0) and (posttype = '#39'D'#39') and (tarnsdate >= :S' +
  771.         'TDATE) and '
  772.       '            (tarnsdate <= :FINDATE) and (nomref >= :STNOM) and '
  773.       '           (nomref <= :FINNOM) ')
  774.     Params.Data = {
  775.       0100040006535444415445000904005A950A0000000746494E44415445000904
  776.       005A950A0000000553544E4F4D00010200300000000646494E4E4F4D00010200
  777.       30000000}
  778.     ValidateWithMask = True
  779.     Left = 636
  780.     Top = 69
  781.     object taNTSumm1SUM_OF_POS: TFloatField
  782.       FieldName = 'SUM_OF_POS'
  783.     end
  784.   end
  785.   object taNTSumm2: TwwQuery
  786.     DatabaseName = 'EmpireBuilder'
  787.     SQL.Strings = (
  788.       'select sum(postvalue) from nomtrans'
  789.       
  790.         'where (postvalue <> 0) and (posttype = '#39'C'#39') and (tarnsdate >= :S' +
  791.         'TDATE) and '
  792.       '            (tarnsdate <= :FINDATE) and (nomref >= :STNOM) and '
  793.       '           (nomref <= :FINNOM) ')
  794.     Params.Data = {
  795.       0100040006535444415445000904005A950A0000000746494E44415445000904
  796.       005A950A0000000553544E4F4D00010200300000000646494E4E4F4D00010200
  797.       30000000}
  798.     ValidateWithMask = True
  799.     Left = 666
  800.     Top = 69
  801.     object taNTSumm2SUM_OF_POS: TFloatField
  802.       FieldName = 'SUM_OF_POS'
  803.     end
  804.   end
  805.   object pmOptions: TRxPopupMenu
  806.     OnPopup = pmOptionsPopup
  807.     LeftMargin = 20
  808.     Style = msOwnerDraw
  809.     ShowCheckMarks = False
  810.     Left = 502
  811.     Top = 213
  812.     object pmiUndoTrans: TMenuItem
  813.       Caption = 'Undo Transaction'
  814.       OnClick = pmiUndoClick
  815.     end
  816.   end
  817. end
  818.