home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computer Buyer 1999 September
/
Dpcb0999.iso
/
Business
/
Empire
/
_SETUP.1
/
EmpireBuilder.exe
/
0
/
RCDATA
/
TFMZOOMPAY
/
TFMZOOMPAY.txt
Wrap
Text File
|
1999-06-21
|
9KB
|
383 lines
object fmZoomPay: TfmZoomPay
Left = 276
Top = 133
HelpContext = 110
ActiveControl = BtnClose
AutoScroll = False
Caption = 'Payment Allocations'
ClientHeight = 308
ClientWidth = 383
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
Scaled = False
Visible = True
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 120
TextHeight = 16
object Panel2: TPanel
Left = 0
Top = 263
Width = 383
Height = 45
Align = alBottom
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object BtnClose: TButton
Left = 88
Top = 8
Width = 75
Height = 30
Caption = '&Close'
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnClick = BtnCloseClick
end
object BtnDetails: TButton
Left = 8
Top = 8
Width = 75
Height = 30
Hint = 'View the details of the selected transactions'
Caption = '&Details'
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnClick = BtnDetailsClick
end
object btnHelp: TButton
Left = 300
Top = 8
Width = 75
Height = 30
Caption = '&Help'
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = btnHelpClick
end
end
object Panel1: TPanel
Left = 0
Top = 69
Width = 383
Height = 194
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = 'Panel1'
TabOrder = 1
object dbgPADist: TwwDBGrid
Left = 2
Top = 2
Width = 379
Height = 190
Selected.Strings = (
'TRANSTYPE'#9'15'#9'Transaction'
'DATE'#9'10'#9'Date'
'REF'#9'10'#9'Reference'
'PAID'#9'10'#9'Payment')
TitleColor = clBtnFace
FixedCols = 0
ShowHorzScrollBar = True
Align = alClient
DataSource = dsAPTemp
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap, dgShowFooter, dgFooter3DCells]
ReadOnly = True
TabOrder = 0
TitleAlignment = taLeftJustify
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'Arial'
TitleFont.Style = []
TitleLines = 1
TitleButtons = False
OnCalcCellColors = dbgPADistCalcCellColors
OnCalcTitleAttributes = dbgPADistCalcTitleAttributes
IndicatorColor = icBlack
OnTopRowChanged = dbgPADistTopRowChanged
FooterCellColor = clYellow
FooterHeight = 25
end
end
object Panel3: TPanel
Left = 0
Top = 0
Width = 383
Height = 69
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object lblRef: TLabel
Left = 8
Top = 12
Width = 58
Height = 16
Caption = 'Reference'
end
object Label2: TLabel
Left = 8
Top = 40
Width = 27
Height = 16
Caption = 'Date'
end
object Label3: TLabel
Left = 188
Top = 12
Width = 64
Height = 16
Caption = 'Trans Total'
end
object Label4: TLabel
Left = 188
Top = 40
Width = 70
Height = 16
Caption = 'Outstanding'
end
object dbeRef: TwwDBEdit
Left = 80
Top = 8
Width = 101
Height = 24
DataField = 'INVREF'
DataSource = dsTrans
ParentColor = True
ReadOnly = True
TabOrder = 0
UnboundDataType = wwDefault
WantReturns = False
WordWrap = False
end
object dbeDate: TwwDBEdit
Left = 80
Top = 36
Width = 101
Height = 24
DataField = 'TRANSDATE'
DataSource = dsTrans
ParentColor = True
ReadOnly = True
TabOrder = 1
UnboundDataType = wwDefault
WantReturns = False
WordWrap = False
end
object dbeTotal: TwwDBEdit
Left = 275
Top = 8
Width = 100
Height = 24
DataField = 'TOTAL'
DataSource = dsTrans
ParentColor = True
ReadOnly = True
TabOrder = 2
UnboundDataType = wwDefault
WantReturns = False
WordWrap = False
end
object CEOutstanding: TCurrencyEdit
Left = 275
Top = 36
Width = 100
Height = 24
AutoSize = False
DisplayFormat = '0.00'
ParentColor = True
ReadOnly = True
TabOrder = 3
end
end
object dsAllocPay: TwwDataSource
Left = 8
Top = 160
end
object taAllocPay: TwwTable
DatabaseName = 'EmpireBuilder'
IndexName = 'INVTRANSNO'
TableName = 'AllocPay.DBF'
SyncSQLByRange = False
NarrowSearch = False
ValidateWithMask = True
Left = 168
Top = 144
object taAllocPayACCREF: TStringField
FieldName = 'ACCREF'
Size = 10
end
object taAllocPayINVTRANSNO: TFloatField
FieldName = 'INVTRANSNO'
end
object taAllocPayPAYTRANSNO: TFloatField
FieldName = 'PAYTRANSNO'
end
object taAllocPayPAYMENT: TFloatField
FieldName = 'PAYMENT'
end
end
object dsAPTemp: TwwDataSource
DataSet = taAPTemp
Left = 56
Top = 188
end
object taAPTemp: TwwTable
SyncSQLByRange = False
NarrowSearch = False
ValidateWithMask = True
Left = 88
Top = 128
object taAPTempTRANSTYPE: TStringField
DisplayLabel = 'Transaction'
DisplayWidth = 15
FieldName = 'TRANSTYPE'
Size = 15
end
object taAPTempDATE: TDateField
DisplayLabel = 'Date'
DisplayWidth = 10
FieldName = 'DATE'
end
object taAPTempREF: TStringField
DisplayLabel = 'Reference'
DisplayWidth = 10
FieldName = 'REF'
Size = 10
end
object taAPTempPAID: TFloatField
DisplayLabel = 'Payment'
DisplayWidth = 10
FieldName = 'PAID'
DisplayFormat = '0.00'
end
object taAPTempNOMREF: TStringField
DisplayLabel = 'Bank/Cash'
DisplayWidth = 10
FieldName = 'NOMREF'
Visible = False
Size = 10
end
object taAPTempTRANSNO: TFloatField
DisplayWidth = 10
FieldName = 'TRANSNO'
Visible = False
end
end
object taTrans: TwwTable
DatabaseName = 'EmpireBuilder'
IndexName = 'TRANSNO'
TableName = 'Trans.DBF'
SyncSQLByRange = False
NarrowSearch = False
ValidateWithMask = True
Left = 168
Top = 188
object taTransTRANSNO: TFloatField
FieldName = 'TRANSNO'
end
object taTransACCREF: TStringField
FieldName = 'ACCREF'
Size = 10
end
object taTransTRANSTYPE: TStringField
FieldName = 'TRANSTYPE'
Size = 8
end
object taTransTRANSDATE: TDateField
FieldName = 'TRANSDATE'
end
object taTransINVREF: TStringField
FieldName = 'INVREF'
Size = 10
end
object taTransDETAILS: TStringField
FieldName = 'DETAILS'
Size = 30
end
object taTransNETVALUE: TFloatField
FieldName = 'NETVALUE'
end
object taTransVATVALUE: TFloatField
FieldName = 'VATVALUE'
end
object taTransTOTAL: TFloatField
FieldName = 'TOTAL'
DisplayFormat = '0.00'
end
object taTransPAYMENT: TFloatField
FieldName = 'PAYMENT'
end
object taTransBALANCE: TFloatField
FieldName = 'BALANCE'
end
object taTransQUERY: TBooleanField
FieldName = 'QUERY'
end
object taTransMODULE: TStringField
FieldName = 'MODULE'
Size = 1
end
object taTransQUERYMEMO: TMemoField
FieldName = 'QUERYMEMO'
BlobType = ftMemo
Size = 1
end
object taTransTRANLINK: TFloatField
FieldName = 'TRANLINK'
end
object taTransTERMS: TSmallintField
FieldName = 'TERMS'
end
end
object dsTrans: TwwDataSource
DataSet = taTrans
Left = 100
Top = 188
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 = 12
Top = 104
ScreenWidth = (
800)
ScreenHeight = (
600)
OriginalFormWidth = (
391)
OriginalFormHeight = (
335)
OriginalFormLeft = (
276)
OriginalFormTop = (
133)
OriginalFormPPI = (
120)
OriginalClientWidth = (
383)
OriginalClientHeight = (
308)
end
end