Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Se añade el campo datos bancarios para que al seleccionar recibos para una remesa se vea a que bancos se realizara

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@857 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
roberto 2009-01-22 09:27:27 +00:00
parent b7576ab9f5
commit bd430fc647
4 changed files with 55 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

60
Source/Modulos/Recibos de proveedor/Views/uEditorElegirRecibosProveedor.dfm
View File

@ -51,10 +51,12 @@ inherited fEditorElegirRecibosProveedor: TfEditorElegirRecibosProveedor
inherited TBXDock: TTBXDock inherited TBXDock: TTBXDock
Top = 171 Top = 171
Width = 654 Width = 654
Height = 72
ExplicitTop = 171 ExplicitTop = 171
ExplicitWidth = 654 ExplicitWidth = 654
ExplicitHeight = 72
inherited tbxMain: TTBXToolbar inherited tbxMain: TTBXToolbar
ExplicitWidth = 126 ExplicitWidth = 317
inherited TBXItem5: TTBXItem inherited TBXItem5: TTBXItem
Visible = False Visible = False
end end
@ -66,12 +68,12 @@ inherited fEditorElegirRecibosProveedor: TfEditorElegirRecibosProveedor
end end
end end
inherited tbxFiltro: TTBXToolbar inherited tbxFiltro: TTBXToolbar
Left = 126 Left = 317
Top = 23 Top = 23
DockPos = 104 DockPos = 104
DockRow = 1 DockRow = 1
Visible = False Visible = False
ExplicitLeft = 126 ExplicitLeft = 317
ExplicitTop = 23 ExplicitTop = 23
inherited TBXItem34: TTBXItem inherited TBXItem34: TTBXItem
Action = actQuitarFiltro2 Action = actQuitarFiltro2
@ -82,7 +84,9 @@ inherited fEditorElegirRecibosProveedor: TfEditorElegirRecibosProveedor
end end
inherited TBXTMain2: TTBXToolbar inherited TBXTMain2: TTBXToolbar
Left = 334 Left = 334
Visible = False
ExplicitLeft = 334 ExplicitLeft = 334
ExplicitHeight = 23
end end
end end
inherited StatusBar: TJvStatusBar inherited StatusBar: TJvStatusBar
@ -137,18 +141,18 @@ inherited fEditorElegirRecibosProveedor: TfEditorElegirRecibosProveedor
end end
end end
inherited frViewRecibosProveedor1: TfrViewRecibosProveedor [5] inherited frViewRecibosProveedor1: TfrViewRecibosProveedor [5]
Top = 246 Top = 243
Width = 654 Width = 654
Height = 363 Height = 366
ExplicitTop = 246 ExplicitTop = 243
ExplicitWidth = 654 ExplicitWidth = 654
ExplicitHeight = 363 ExplicitHeight = 366
inherited cxGrid: TcxGrid inherited cxGrid: TcxGrid
Width = 654 Width = 654
Height = 235 Height = 238
RootLevelOptions.DetailTabsPosition = dtpNone RootLevelOptions.DetailTabsPosition = dtpNone
ExplicitWidth = 654 ExplicitWidth = 654
ExplicitHeight = 235 ExplicitHeight = 238
inherited cxGridView: TcxGridDBTableView inherited cxGridView: TcxGridDBTableView
DataController.Summary.DefaultGroupSummaryItems = < DataController.Summary.DefaultGroupSummaryItems = <
item item
@ -178,29 +182,53 @@ inherited fEditorElegirRecibosProveedor: TfEditorElegirRecibosProveedor
Width = 654 Width = 654
ExplicitWidth = 654 ExplicitWidth = 654
inherited txtFiltroTodo: TcxTextEdit inherited txtFiltroTodo: TcxTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 273 ExplicitWidth = 273
Width = 273 Width = 273
end end
inherited edtFechaIniFiltro: TcxDateEdit inherited edtFechaIniFiltro: TcxDateEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 121 ExplicitWidth = 121
Width = 121 Width = 121
end end
inherited edtFechaFinFiltro: TcxDateEdit inherited edtFechaFinFiltro: TcxDateEdit
Left = 225
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 225
ExplicitWidth = 343 ExplicitWidth = 343
Width = 343 Width = 343
end end
inherited eLista: TcxComboBox
Left = 605
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 605
end
end end
inherited TBXAlignmentPanel1: TTBXAlignmentPanel inherited TBXAlignmentPanel1: TTBXAlignmentPanel
Width = 654 Width = 654
ExplicitWidth = 654
inherited tbxBotones: TTBXToolbar inherited tbxBotones: TTBXToolbar
Width = 644 Width = 644
ExplicitWidth = 644
end end
end end
end end
end end
inherited pnlAgrupaciones: TTBXDockablePanel inherited pnlAgrupaciones: TTBXDockablePanel
Top = 337 Top = 340
ExplicitTop = 337 ExplicitTop = 340
ExplicitWidth = 654 ExplicitWidth = 654
inherited TBXAlignmentPanel1: TTBXAlignmentPanel inherited TBXAlignmentPanel1: TTBXAlignmentPanel
Width = 654 Width = 654
@ -216,6 +244,14 @@ inherited fEditorElegirRecibosProveedor: TfEditorElegirRecibosProveedor
BuiltInReportLink = True BuiltInReportLink = True
end end
end end
inherited cxViewGridPopupMenu: TcxGridPopupMenu
PopupMenus = <
item
GridView = frViewRecibosProveedor1.cxGridView
HitTypes = [gvhtCell]
Index = 0
end>
end
end end
object pnlFiltrar: TTBXDockablePanel [6] object pnlFiltrar: TTBXDockablePanel [6]
Left = 0 Left = 0
@ -367,7 +403,7 @@ inherited fEditorElegirRecibosProveedor: TfEditorElegirRecibosProveedor
end end
inherited JvFormStorage: TJvFormStorage [13] inherited JvFormStorage: TJvFormStorage [13]
end end
inherited GridPopupMenu: TPopupMenu inherited GridPopupMenu: TPopupMenu [14]
Left = 80 Left = 80
Top = 192 Top = 192
end end

4
Source/Modulos/Recibos de proveedor/Views/uEditorElegirRecibosProveedor.pas
View File

@ -1,4 +1,4 @@
{ {
=============================================================================== ===============================================================================
Copyright (©) 2007. Rodax Software. Copyright (©) 2007. Rodax Software.
=============================================================================== ===============================================================================
@ -37,7 +37,7 @@ uses
uViewRecibosProveedor, uEditorRecibosProveedor, uBizRecibosProveedor, uIEditorElegirRecibosProveedor, uViewRecibosProveedor, uEditorRecibosProveedor, uBizRecibosProveedor, uIEditorElegirRecibosProveedor,
Buttons, cxRadioGroup, cxMaskEdit, cxDropDownEdit, cxCalendar, cxControls, Buttons, cxRadioGroup, cxMaskEdit, cxDropDownEdit, cxCalendar, cxControls,
cxContainer, cxEdit, cxTextEdit, TBXDkPanels, JSDialog; cxContainer, cxEdit, cxTextEdit, TBXDkPanels, JSDialog, uDAInterfaces;
type type

4
Source/Modulos/Recibos de proveedor/Views/uViewRecibosProveedor.dfm
View File

@ -144,6 +144,10 @@ inherited frViewRecibosProveedor: TfrViewRecibosProveedor
DataBinding.FieldName = 'REFERENCIA_REMESA' DataBinding.FieldName = 'REFERENCIA_REMESA'
Visible = False Visible = False
end end
object cxGridViewDATOS_BANCARIOS: TcxGridDBColumn
Caption = 'Banco'
DataBinding.FieldName = 'DATOS_BANCARIOS'
end
end end
inherited cxGridLevel: TcxGridLevel inherited cxGridLevel: TcxGridLevel
Caption = 'Todos' Caption = 'Todos'

1
Source/Modulos/Recibos de proveedor/Views/uViewRecibosProveedor.pas
View File

@ -49,6 +49,7 @@ type
cxGridViewREFERENCIA_FACTURA_PROV: TcxGridDBColumn; cxGridViewREFERENCIA_FACTURA_PROV: TcxGridDBColumn;
cxGridViewID_RECIBO_COMPENSADO: TcxGridDBColumn; cxGridViewID_RECIBO_COMPENSADO: TcxGridDBColumn;
cxGridViewREFERENCIA_REC_COMPENSADO: TcxGridDBColumn; cxGridViewREFERENCIA_REC_COMPENSADO: TcxGridDBColumn;
cxGridViewDATOS_BANCARIOS: TcxGridDBColumn;
procedure cxGridViewICONOCustomDrawCell(Sender: TcxCustomGridTableView; procedure cxGridViewICONOCustomDrawCell(Sender: TcxCustomGridTableView;
ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
var ADone: Boolean); var ADone: Boolean);