object fmPrintTrans: TfmPrintTrans Left = 227 Top = 131 Width = 409 Height = 388 Caption = 'Print Transactions' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Arial' Font.Style = [] Position = poScreenCenter Scaled = False OnActivate = FormActivate OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object pnlCust: TPanel Left = 0 Top = 69 Width = 401 Height = 69 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object lblStartCust: TLabel Left = 12 Top = 12 Width = 115 Height = 16 Caption = 'Start Customer Ref.' end object lblFinCust: TLabel Left = 12 Top = 44 Width = 122 Height = 16 Caption = 'Finish Customer Ref.' end object rxcbeStartCust: TComboEdit Left = 182 Top = 5 Width = 120 Height = 24 Hint = 'Press F1 for help' HelpContext = 451 CharCase = ecUpperCase ButtonWidth = 24 MaxLength = 10 NumGlyphs = 1 ParentShowHint = False ShowHint = True TabOrder = 0 OnButtonClick = rxcbeStartCustButtonClick OnEnter = rxcbeStartCustEnter OnExit = rxcbeStartCustExit end object rxcbeFinCust: TComboEdit Left = 182 Top = 37 Width = 120 Height = 24 Hint = 'Press F1 for help' HelpContext = 452 CharCase = ecUpperCase ButtonWidth = 24 MaxLength = 10 NumGlyphs = 1 ParentShowHint = False ShowHint = True TabOrder = 1 OnButtonClick = rxcbeFinCustButtonClick OnEnter = rxcbeFinCustEnter OnExit = rxcbeFinCustExit end end object pnlDate: TPanel Left = 0 Top = 138 Width = 401 Height = 69 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object lblStartDate: TLabel Left = 12 Top = 12 Width = 59 Height = 16 Caption = 'Start Date' end object lblFinDate: TLabel Left = 12 Top = 44 Width = 66 Height = 16 Caption = 'Finish Date' end object rxdcbeStartDate: TDateEdit Left = 182 Top = 4 Width = 100 Height = 24 Hint = 'Press F1 for help' HelpContext = 453 NumGlyphs = 2 ParentShowHint = False ShowHint = True CalendarStyle = csDialog Weekends = [Sun, Sat] YearDigits = dyFour TabOrder = 0 end object rxdcbeFinDate: TDateEdit Left = 182 Top = 36 Width = 100 Height = 24 Hint = 'Press F1 for help' HelpContext = 454 NumGlyphs = 2 ParentShowHint = False ShowHint = True CalendarStyle = csDialog Weekends = [Sun, Sat] YearDigits = dyFour TabOrder = 1 end end object pnlButtons: TPanel Left = 0 Top = 318 Width = 401 Height = 43 Align = alBottom BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 5 object btnPrint: TButton Left = 8 Top = 8 Width = 75 Height = 30 Hint = 'Print specified transaction documents' Caption = '&Print' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = btnPrintClick end object btnCancel: TButton Left = 242 Top = 8 Width = 75 Height = 30 Caption = '&Cancel' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = btnCancelClick end object BtnPreview: TButton Left = 86 Top = 8 Width = 75 Height = 30 Hint = 'Preview a document on screen' Caption = 'P&review' ParentShowHint = False ShowHint = False TabOrder = 1 OnClick = BtnPreviewClick end object BtnEmail: TButton Left = 164 Top = 8 Width = 75 Height = 30 Hint = 'Email a document' Caption = '&Email' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = BtnEmailClick end object btnHelp: TButton Left = 320 Top = 8 Width = 75 Height = 30 Caption = '&Help' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = btnHelpClick end end object pnlInvNo: TPanel Left = 0 Top = 0 Width = 401 Height = 69 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object lblStartNo: TLabel Left = 12 Top = 12 Width = 116 Height = 16 Caption = 'Start Tranaction No.' end object lblFinNo: TLabel Left = 12 Top = 44 Width = 130 Height = 16 Caption = 'Finish Transaction No.' end object rxcbeStartNo: TComboEdit Left = 182 Top = 5 Width = 100 Height = 24 Hint = 'Press F1 for help' HelpContext = 449 CharCase = ecUpperCase ButtonWidth = 24 MaxLength = 10 NumGlyphs = 1 ParentShowHint = False ShowHint = True TabOrder = 0 OnButtonClick = rxcbeStartNoButtonClick OnEnter = rxcbeStartNoEnter OnExit = rxcbeStartNoExit end object rxcbeFinNo: TComboEdit Left = 182 Top = 37 Width = 100 Height = 24 Hint = 'Press F1 for help' HelpContext = 450 CharCase = ecUpperCase ButtonWidth = 24 MaxLength = 10 NumGlyphs = 1 ParentShowHint = False ShowHint = True TabOrder = 1 OnButtonClick = rxcbeFinNoButtonClick OnEnter = rxcbeFinNoEnter OnExit = rxcbeFinNoExit end end object pnlThisTrans: TPanel Left = 0 Top = 207 Width = 401 Height = 62 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 3 object cbCurrent: TCheckBox Left = 12 Top = 8 Width = 184 Height = 17 Hint = 'Press F1 for help' HelpContext = 455 Alignment = taLeftJustify Caption = 'Current Transaction Only' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = cbCurrentClick end object cbIgnore: TCheckBox Left = 12 Top = 36 Width = 184 Height = 17 Hint = 'Press F1 for help' HelpContext = 456 Alignment = taLeftJustify Caption = 'Ignore Printed Trans.' ParentShowHint = False ShowHint = True State = cbChecked TabOrder = 1 end end object pnlDoc: TPanel Left = 0 Top = 269 Width = 401 Height = 49 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 4 object Label1: TLabel Left = 16 Top = 16 Width = 102 Height = 16 Caption = 'Document Layout' end object cbDocName: TComboBox Left = 183 Top = 12 Width = 208 Height = 24 Hint = 'Press F1 for help' HelpContext = 457 ItemHeight = 16 ParentShowHint = False ShowHint = True TabOrder = 0 end end object ipdsUDD: TwwDataSource DataSet = iptblUDD Left = 320 Top = 4 end object iptblUDD: TwwTable DatabaseName = 'MainEB' TableName = 'Udd.DBF' SyncSQLByRange = False NarrowSearch = False ValidateWithMask = True Left = 320 Top = 36 object iptblUDDDOC_TYPE: TSmallintField FieldName = 'DOC_TYPE' end object iptblUDDITEM_NAME: TStringField FieldName = 'ITEM_NAME' Size = 30 end object iptblUDDITEM_OWNER: TStringField FieldName = 'ITEM_OWNER' Size = 6 end object iptblUDDCAN_OPEN: TBooleanField FieldName = 'CAN_OPEN' end object iptblUDDCAN_SAVE: TBooleanField FieldName = 'CAN_SAVE' end object iptblUDDCAN_DELETE: TBooleanField FieldName = 'CAN_DELETE' end object iptblUDDCREATED_DT: TStringField FieldName = 'CREATED_DT' Size = 15 end object iptblUDDCREATED_BY: TStringField FieldName = 'CREATED_BY' Size = 6 end object iptblUDDUPDATED_DT: TStringField FieldName = 'UPDATED_DT' Size = 15 end object iptblUDDUPDATED_BY: TStringField FieldName = 'UPDATED_BY' Size = 6 end object iptblUDDREP_NAME: TStringField FieldName = 'REP_NAME' Size = 40 end end object Sizer1: TSizer Enabled = True ExceptionAction = eaIgnoreControl GridColumnSizing = gcSizeAllColumns GridRowSizing = grSizeByDefaults MinimumSize = True NavigateOnEnter = True OverrideParentFont = True PerformAssertions = True ShowAssertionFailures = False StretchFonts = True StretchImages = True StretchOnResize = True ThreadProcessing = False Left = 320 Top = 76 ScreenWidth = ( 800) ScreenHeight = ( 600) OriginalFormWidth = ( 409) OriginalFormHeight = ( 388) OriginalFormLeft = ( 227) OriginalFormTop = ( 131) OriginalFormPPI = ( 120) OriginalClientWidth = ( 401) OriginalClientHeight = ( 361) end object taMainInvoice: TwwQuery DatabaseName = 'EmpireBuilder' SQL.Strings = ( 'select * from invoice' 'where (INVNO >= :STINVNO) and (INVNO <= :FININVNO) and' ' ((ACREF >= :STACC) and (ACREF <= :FINACC) or' ' (ACREF = '#39#39')) and (INVDATE >= :STADATE) and' ' (INVDATE <= :FINDATE)' ' ') Params.Data = { 01000600075354494E564E4F000304000000000000000846494E494E564E4F00 0608000000000000000000000005535441434300010200300000000646494E41 434300010200300000000753544144415445000B080000002C845D40CB420000 0746494E44415445000B080000002C845D40CB420000} ValidateWithMask = True Left = 320 Top = 118 object taMainInvoiceINVNO: TFloatField FieldName = 'INVNO' Origin = '"invoice.DBF".INVNO' end object taMainInvoiceINVTYPE: TStringField FieldName = 'INVTYPE' Origin = '"invoice.DBF".INVTYPE' Size = 11 end object taMainInvoicePAYTYPE: TStringField FieldName = 'PAYTYPE' Origin = '"invoice.DBF".PAYTYPE' Size = 8 end object taMainInvoiceBANK: TStringField FieldName = 'BANK' Origin = '"invoice.DBF".BANK' Size = 10 end object taMainInvoicePAYAMOUNT: TFloatField FieldName = 'PAYAMOUNT' Origin = '"invoice.DBF".PAYAMOUNT' end object taMainInvoiceINVDATE: TDateField FieldName = 'INVDATE' Origin = '"invoice.DBF".INVDATE' end object taMainInvoiceACREF: TStringField FieldName = 'ACREF' Origin = '"invoice.DBF".ACREF' Size = 10 end object taMainInvoiceNAME: TStringField FieldName = 'NAME' Origin = '"invoice.DBF".NAME' Size = 30 end object taMainInvoiceADDRESS1: TStringField FieldName = 'ADDRESS1' Origin = '"invoice.DBF".ADDRESS1' Size = 30 end object taMainInvoiceADDRESS2: TStringField FieldName = 'ADDRESS2' Origin = '"invoice.DBF".ADDRESS2' Size = 30 end object taMainInvoiceADDRESS3: TStringField FieldName = 'ADDRESS3' Origin = '"invoice.DBF".ADDRESS3' Size = 30 end object taMainInvoiceADDRESS4: TStringField FieldName = 'ADDRESS4' Origin = '"invoice.DBF".ADDRESS4' Size = 30 end object taMainInvoiceTELNO: TStringField FieldName = 'TELNO' Origin = '"invoice.DBF".TELNO' Size = 15 end object taMainInvoiceDELNAME: TStringField FieldName = 'DELNAME' Origin = '"invoice.DBF".DELNAME' Size = 30 end object taMainInvoiceDELADD1: TStringField FieldName = 'DELADD1' Origin = '"invoice.DBF".DELADD1' Size = 30 end object taMainInvoiceDELADD2: TStringField FieldName = 'DELADD2' Origin = '"invoice.DBF".DELADD2' Size = 30 end object taMainInvoiceDELADD3: TStringField FieldName = 'DELADD3' Origin = '"invoice.DBF".DELADD3' Size = 30 end object taMainInvoiceDELADD4: TStringField FieldName = 'DELADD4' Origin = '"invoice.DBF".DELADD4' Size = 30 end object taMainInvoiceDELTELNO: TStringField FieldName = 'DELTELNO' Origin = '"invoice.DBF".DELTELNO' Size = 15 end object taMainInvoiceCORDER: TStringField FieldName = 'CORDER' Origin = '"invoice.DBF".CORDER' Size = 15 end object taMainInvoiceNOTES: TMemoField FieldName = 'NOTES' Origin = '"invoice.DBF".NOTES' BlobType = ftMemo Size = 1 end object taMainInvoiceSETTDAYS: TSmallintField FieldName = 'SETTDAYS' Origin = '"invoice.DBF".SETTDAYS' end object taMainInvoiceSETTDISC: TFloatField FieldName = 'SETTDISC' Origin = '"invoice.DBF".SETTDISC' end object taMainInvoiceITEMSNETT: TFloatField FieldName = 'ITEMSNETT' Origin = '"invoice.DBF".ITEMSNETT' end object taMainInvoiceITEMSDISC: TFloatField FieldName = 'ITEMSDISC' Origin = '"invoice.DBF".ITEMSDISC' end object taMainInvoiceITEMSSUB: TFloatField FieldName = 'ITEMSSUB' Origin = '"invoice.DBF".ITEMSSUB' end object taMainInvoiceITEMSTAX: TFloatField FieldName = 'ITEMSTAX' Origin = '"invoice.DBF".ITEMSTAX' end object taMainInvoiceITEMSTOTAL: TFloatField FieldName = 'ITEMSTOTAL' Origin = '"invoice.DBF".ITEMSTOTAL' end object taMainInvoiceCARRIAGE: TFloatField FieldName = 'CARRIAGE' Origin = '"invoice.DBF".CARRIAGE' end object taMainInvoiceCARTAXCODE: TStringField FieldName = 'CARTAXCODE' Origin = '"invoice.DBF".CARTAXCODE' Size = 1 end object taMainInvoiceCARTAX: TFloatField FieldName = 'CARTAX' Origin = '"invoice.DBF".CARTAX' end object taMainInvoiceCARNOMINAL: TStringField FieldName = 'CARNOMINAL' Origin = '"invoice.DBF".CARNOMINAL' Size = 10 end object taMainInvoiceCARGROSS: TFloatField FieldName = 'CARGROSS' Origin = '"invoice.DBF".CARGROSS' end object taMainInvoiceTOTALNETT: TFloatField FieldName = 'TOTALNETT' Origin = '"invoice.DBF".TOTALNETT' end object taMainInvoiceTOTALDISC: TFloatField FieldName = 'TOTALDISC' Origin = '"invoice.DBF".TOTALDISC' end object taMainInvoiceTOTALSUB: TFloatField FieldName = 'TOTALSUB' Origin = '"invoice.DBF".TOTALSUB' end object taMainInvoiceTOTALTAX: TFloatField FieldName = 'TOTALTAX' Origin = '"invoice.DBF".TOTALTAX' end object taMainInvoiceINVTOTAL: TFloatField FieldName = 'INVTOTAL' Origin = '"invoice.DBF".INVTOTAL' end object taMainInvoiceSDTOPAY: TFloatField FieldName = 'SDTOPAY' Origin = '"invoice.DBF".SDTOPAY' end object taMainInvoicePOSTED: TBooleanField FieldName = 'POSTED' Origin = '"invoice.DBF".POSTED' end object taMainInvoicePRINTED: TBooleanField FieldName = 'PRINTED' Origin = '"invoice.DBF".PRINTED' end object taMainInvoicePROFIT: TFloatField FieldName = 'PROFIT' Origin = '"invoice.DBF".PROFIT' end object taMainInvoiceMARGIN: TFloatField FieldName = 'MARGIN' Origin = '"invoice.DBF".MARGIN' end object taMainInvoiceTAG1: TBooleanField FieldName = 'TAG1' Origin = '"invoice.DBF".TAG1' end object taMainInvoiceINVFORM: TStringField FieldName = 'INVFORM' Origin = '"invoice.DBF".INVFORM' Size = 1 end object taMainInvoiceTRANSNO: TFloatField FieldName = 'TRANSNO' Origin = '"invoice.DBF".TRANSNO' end end object pdTrans: TPrintDialog Left = 310 Top = 168 end end