Tecsitel_FactuGES2/Source/Modulos/Recibos de cliente/Views/uEditorReciboCliente.dfm
2007-11-05 17:59:28 +00:00

363 lines
11 KiB
Plaintext

inherited fEditorReciboCliente: TfEditorReciboCliente
Caption = 'Recibo de cliente'
ClientHeight = 530
ClientWidth = 691
OnClose = CustomEditorClose
ExplicitTop = -110
ExplicitWidth = 699
ExplicitHeight = 564
PixelsPerInch = 96
TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader
Width = 691
Caption = 'Recibo de cliente'
ExplicitWidth = 691
inherited Image1: TImage
Left = 664
Picture.Data = {
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001800
0000180806000000E0773DF80000000970485973000017120000171201679FD2
520000000467414D410000B18E7CFB51930000022E4944415478DA63FCFFFF3F
032D01E3D0B760D9965334B321CAC78C116C41A4B729491AFFFCFDCFF0F7EF3F
869FBFFE80E93FFFFE8169301B887FFDFECB109E5EC7707EE774840589270D09
1AFC17189CBFFEFE65F8F5E70F98FEF2EB17840FC2404B607245BF9633CC5BBA
09D382F9E6E7512C927EEBCDD0E4D98C61D13FA06120ECB9DA9EE123CF03B0E1
97025E3028AD14045B52F17715A605AAAB85196E87BE051B006283C0CD903760
FA02E37906E393C6400120479D81E1ACF95906CD1F5A0CBF803E1058CE0F56F3
3F1D12958C33191926736D47B58056910CB6106601AD221AC5025A44348605D4
8E68AC168000888D6C38BE880EDAE2C1F094FD36C38DE0D760B5628BB919EA18
D6E2F701CC70E6534C0C7FCDFE816990E167E3CE3218CF035AA4CDC0F059E70B
03EF151E86D72A6F18C277FA32EC8D3AC620BC880BEC8376968DD82D400F1AE6
E5400B2281162C668218BECC98E16C14909E65CCF021E22383C0167E86172E2F
19A2F604305CF873011E1FBDEC5B88B400D9075781121C40FC8301EC83B76AEF
18846F09313C9179C210773094E1D4CFB3700B6079016F2A8259F217A8E132CB
25481C5C044AE843E240EEAD3CC3CF1F3F300C0701B805200EAEE202A458F183
1F438D732DD8927FE0B4FE178E41FCE8BD8170C37FA6FC01E764BC16C0003C6D
03F1BBEFDF51F8C818391F2003AC16A0E7D23FD09CF9EDC72F243E50EE1F420E
9E93A17C901C085CB97907D382298B775056F0A001140BBA27CFA7AAE13030F4
2B7D0062D74EABC521DC370000000049454E44AE426082}
ExplicitLeft = 574
end
end
inherited TBXDock: TTBXDock
Width = 691
ExplicitWidth = 691
inherited tbxMain: TTBXToolbar
ExplicitWidth = 425
end
inherited tbxMenu: TTBXToolbar
ExplicitWidth = 691
end
end
inherited pgPaginas: TPageControl
Width = 691
Height = 335
ExplicitWidth = 691
ExplicitHeight = 335
inherited pagGeneral: TTabSheet
ExplicitLeft = 4
ExplicitTop = 24
ExplicitWidth = 683
ExplicitHeight = 307
inline frViewReciboCliente1: TfrViewReciboCliente
Left = 0
Top = 0
Width = 683
Height = 335
Align = alTop
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 0
ReadOnly = False
ExplicitWidth = 683
ExplicitHeight = 335
inherited dxLayoutControl1: TdxLayoutControl
Width = 683
Height = 335
ExplicitWidth = 683
ExplicitHeight = 335
DesignSize = (
683
335)
inherited eReferencia: TcxDBTextEdit
ExplicitWidth = 217
Width = 217
end
inherited eSituacion: TcxDBTextEdit
ExplicitWidth = 217
Width = 217
end
inherited edtFechaVencimiento: TcxDBDateEdit
ExplicitWidth = 217
Width = 217
end
inherited memObservaciones: TcxDBMemo
ExplicitWidth = 293
ExplicitHeight = 44
Height = 44
Width = 293
end
inherited eFechaEmision: TcxDBTextEdit
Left = 441
ExplicitLeft = 441
ExplicitWidth = 253
Width = 253
end
inherited eFormaPago: TcxDBTextEdit
Left = 441
ExplicitLeft = 441
ExplicitWidth = 253
Width = 253
end
inherited eImporteTotal: TcxDBCurrencyEdit
Left = 441
Style.IsFontAssigned = True
ExplicitLeft = 441
ExplicitWidth = 253
Width = 253
end
inherited eNombreCliente: TcxDBTextEdit
Left = 441
ExplicitLeft = 441
ExplicitWidth = 286
Width = 286
end
inherited eNifCif: TcxDBTextEdit
Left = 441
ExplicitLeft = 441
ExplicitWidth = 286
Width = 286
end
inherited eEntidad: TcxDBTextEdit
Left = 441
ExplicitLeft = 441
ExplicitWidth = 84
Width = 84
end
inherited eSucursal: TcxDBTextEdit
Left = 544
ExplicitLeft = 544
ExplicitWidth = 81
Width = 81
end
inherited eDC: TcxDBTextEdit
Left = 624
ExplicitLeft = 624
ExplicitWidth = 37
Width = 37
end
inherited eCuenta: TcxDBTextEdit
Left = 441
ExplicitLeft = 441
ExplicitWidth = 286
Width = 286
end
inherited eRemesa: TcxDBTextEdit
ExplicitWidth = 217
Width = 217
end
inherited edtFechaEmision: TcxDBDateEdit
DataBinding.DataField = 'FECHA_EMISION'
ExplicitWidth = 217
Width = 217
end
inherited rRefReciboCompensado: TcxDBTextEdit
ExplicitWidth = 191
Width = 191
end
end
end
end
object pagPagos: TTabSheet
Caption = 'Pagos'
ImageIndex = 2
inline frViewPagosCliente1: TfrViewPagosCliente
Left = 0
Top = 0
Width = 683
Height = 307
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 0
ReadOnly = False
ExplicitWidth = 683
ExplicitHeight = 307
inherited dxLayoutControl1: TdxLayoutControl
Width = 683
Height = 307
ExplicitWidth = 683
ExplicitHeight = 307
end
inherited dxLayoutControl2: TdxLayoutControl
Width = 683
Height = 307
ExplicitWidth = 683
ExplicitHeight = 307
inherited ToolBar1: TToolBar
Width = 666
ExplicitWidth = 666
end
inherited ListaPagosCliente: TcxGrid
Width = 605
Height = 262
ExplicitWidth = 605
ExplicitHeight = 262
inherited ListaPagosClienteDBTableView1: TcxGridDBTableView
inherited ListaPagosClienteDBTableView1TIPO: TcxGridDBColumn
IsCaptionAssigned = True
end
end
end
end
inherited ActionListContenido: TActionList
inherited actAnadir: TAction
OnExecute = frViewPagosCliente1actAnadirExecute
OnUpdate = frViewPagosCliente1actAnadirUpdate
end
inherited actModificar: TAction
OnExecute = frViewPagosCliente1actModificarExecute
OnUpdate = frViewPagosCliente1actModificarUpdate
end
inherited actEliminar: TAction
OnExecute = frViewPagosCliente1actEliminarExecute
OnUpdate = frViewPagosCliente1actEliminarUpdate
end
end
end
end
object pagCompensados: TTabSheet
Caption = 'Recibos compensados'
ImageIndex = 1
inline frViewRecibosCliCompensados1: TfrViewRecibosCliCompensados
Left = 0
Top = 0
Width = 683
Height = 307
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 0
ReadOnly = False
ExplicitWidth = 683
ExplicitHeight = 307
inherited cxGrid: TcxGrid
Width = 683
Height = 282
ExplicitWidth = 683
ExplicitHeight = 282
inherited cxGridView: TcxGridDBTableView
DataController.Summary.FooterSummaryItems = <
item
Format = ',0.00 '#8364';-,0.00 '#8364
Kind = skSum
Column = frViewRecibosCliCompensados1.cxGridViewIMPORTE_TOTAL
end>
DataController.Summary.OnAfterSummary = frViewRecibosCompensados1cxGridViewDataControllerSummaryAfterSummary
end
end
inherited ToolBar1: TToolBar
Width = 683
ExplicitWidth = 683
inherited ToolButton3: TToolButton
ExplicitWidth = 98
end
inherited ToolButton8: TToolButton
ExplicitWidth = 99
end
end
end
end
end
inherited StatusBar: TJvStatusBar
Top = 511
Width = 691
Panels = <
item
Width = 200
end>
ExplicitTop = 511
ExplicitWidth = 691
end
inline frViewReciboCliImportes1: TfrViewReciboCliImportes [4]
Left = 0
Top = 411
Width = 691
Height = 100
Align = alBottom
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 4
ReadOnly = False
ExplicitTop = 411
ExplicitWidth = 691
inherited dxLayoutControl1: TdxLayoutControl
Width = 691
ExplicitWidth = 691
inherited eImporte: TcxDBCurrencyEdit
DataBinding.DataSource = dsDataTable
Properties.OnEditValueChanged = frViewReciboCliImportes1eImportePropertiesEditValueChanged
ExplicitWidth = 150
Width = 150
end
inherited eOtrosGastos: TcxDBCurrencyEdit
DataBinding.DataSource = dsDataTable
end
inherited eImporteTotalRecibo: TcxCurrencyEdit
ExplicitWidth = 183
Width = 183
end
end
end
inherited EditorActionList: TActionList [5]
Top = 96
inherited actNuevo: TAction
Enabled = False
Visible = False
end
inherited actModificar: TAction
Enabled = False
Visible = False
end
inherited actEliminar: TAction
Enabled = False
Visible = False
end
end
inherited SmallImages: TPngImageList [6]
end
inherited LargeImages: TPngImageList [7]
end
inherited JvFormStorage: TJvFormStorage [8]
OnSavePlacement = JvFormStorageSavePlacement
OnRestorePlacement = JvFormStorageRestorePlacement
end
inherited dsDataTable: TDADataSource [9]
Left = 8
Top = 168
end
inherited JvAppRegistryStorage: TJvAppRegistryStorage [10]
end
object DADataSource1: TDADataSource
OnDataChange = dsDataTableDataChange
Left = 80
Top = 112
end
end