Quitar la columna de descuento e importe neto de los detalles de albaranes de cliente.

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@461 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
David Arranz 2009-11-05 19:32:45 +00:00
parent 75152b161e
commit c189082dab
5 changed files with 79 additions and 11 deletions

View File

@ -202,9 +202,6 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
inherited TBXDock1: TTBXDock inherited TBXDock1: TTBXDock
Width = 751 Width = 751
ExplicitWidth = 751 ExplicitWidth = 751
inherited TBXToolbar1: TTBXToolbar
ExplicitWidth = 548
end
end end
end end
end end
@ -240,10 +237,10 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
ExplicitWidth = 751 ExplicitWidth = 751
ExplicitHeight = 320 ExplicitHeight = 320
inherited eIncidencias: TcxDBMemo inherited eIncidencias: TcxDBMemo
ExplicitWidth = 734 ExplicitWidth = 747
ExplicitHeight = 323 ExplicitHeight = 303
Height = 323 Height = 303
Width = 734 Width = 747
end end
end end
end end
@ -294,7 +291,11 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
inherited ImporteDto: TcxDBCurrencyEdit inherited ImporteDto: TcxDBCurrencyEdit
Left = 164 Left = 164
Top = 38 Top = 38
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 164 ExplicitLeft = 164
ExplicitTop = 38 ExplicitTop = 38
ExplicitWidth = 188 ExplicitWidth = 188
@ -304,7 +305,11 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Left = 555 Left = 555
Top = 88 Top = 88
DataBinding.DataField = '' DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 555 ExplicitLeft = 555
ExplicitTop = 88 ExplicitTop = 88
ExplicitWidth = 182 ExplicitWidth = 182
@ -313,7 +318,11 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
inherited ImporteTotal: TcxDBCurrencyEdit inherited ImporteTotal: TcxDBCurrencyEdit
Left = 485 Left = 485
Top = 142 Top = 142
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 485 ExplicitLeft = 485
ExplicitTop = 142 ExplicitTop = 142
ExplicitWidth = 252 ExplicitWidth = 252
@ -322,7 +331,11 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
inherited edtDescuento: TcxDBSpinEdit inherited edtDescuento: TcxDBSpinEdit
Left = 93 Left = 93
Top = 38 Top = 38
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93 ExplicitLeft = 93
ExplicitTop = 38 ExplicitTop = 38
end end
@ -330,14 +343,22 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Left = 484 Left = 484
Top = 88 Top = 88
DataBinding.DataField = '' DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 484 ExplicitLeft = 484
ExplicitTop = 88 ExplicitTop = 88
end end
inherited ImporteBase: TcxDBCurrencyEdit inherited ImporteBase: TcxDBCurrencyEdit
Left = 484 Left = 484
Top = 11 Top = 11
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 484 ExplicitLeft = 484
ExplicitTop = 11 ExplicitTop = 11
ExplicitWidth = 253 ExplicitWidth = 253
@ -347,7 +368,11 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Left = 484 Left = 484
Top = 115 Top = 115
DataBinding.DataField = '' DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 484 ExplicitLeft = 484
ExplicitTop = 115 ExplicitTop = 115
end end
@ -355,7 +380,11 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Left = 555 Left = 555
Top = 115 Top = 115
DataBinding.DataField = '' DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 555 ExplicitLeft = 555
ExplicitTop = 115 ExplicitTop = 115
ExplicitWidth = 182 ExplicitWidth = 182
@ -364,7 +393,11 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
inherited eImporteNeto: TcxDBCurrencyEdit inherited eImporteNeto: TcxDBCurrencyEdit
Left = 93 Left = 93
Top = 11 Top = 11
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93 ExplicitLeft = 93
ExplicitTop = 11 ExplicitTop = 11
ExplicitWidth = 259 ExplicitWidth = 259
@ -374,7 +407,11 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Left = 93 Left = 93
Top = 65 Top = 65
Properties.OnValidate = frViewTotales1ePortePropertiesValidate Properties.OnValidate = frViewTotales1ePortePropertiesValidate
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93 ExplicitLeft = 93
ExplicitTop = 65 ExplicitTop = 65
ExplicitWidth = 259 ExplicitWidth = 259
@ -384,6 +421,10 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Left = 93 Left = 93
Top = 92 Top = 92
DataBinding.DataField = '' DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93 ExplicitLeft = 93
ExplicitTop = 92 ExplicitTop = 92
ExplicitWidth = 121 ExplicitWidth = 121
@ -400,6 +441,10 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Top = 119 Top = 119
DataBinding.DataField = '' DataBinding.DataField = ''
DataBinding.DataSource = nil DataBinding.DataSource = nil
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93 ExplicitLeft = 93
ExplicitTop = 119 ExplicitTop = 119
ExplicitWidth = 259 ExplicitWidth = 259

View File

@ -195,7 +195,6 @@ var
bEsNuevo : Boolean; bEsNuevo : Boolean;
begin begin
inherited; inherited;
bEsNuevo := False;
ShowHourglassCursor; ShowHourglassCursor;
// frViewDetallesPedidoCliente1.SaveGridStatus; // frViewDetallesPedidoCliente1.SaveGridStatus;

View File

@ -100,11 +100,19 @@ inherited frViewAlbaranCliente: TfrViewAlbaranCliente
Width = 771 Width = 771
ExplicitWidth = 771 ExplicitWidth = 771
inherited edtlNombre: TcxDBTextEdit inherited edtlNombre: TcxDBTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 224 ExplicitWidth = 224
Width = 224 Width = 224
end end
inherited edtNIFCIF: TcxDBTextEdit inherited edtNIFCIF: TcxDBTextEdit
Left = 339 Left = 339
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 339 ExplicitLeft = 339
end end
inherited Button3: TBitBtn inherited Button3: TBitBtn
@ -112,9 +120,19 @@ inherited frViewAlbaranCliente: TfrViewAlbaranCliente
ExplicitLeft = 250 ExplicitLeft = 250
end end
inherited edtPersonaContacto: TcxDBTextEdit inherited edtPersonaContacto: TcxDBTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 283 ExplicitWidth = 283
Width = 283 Width = 283
end end
inherited edtDireccion: TcxMemo
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
end
inherited Button4: TButton inherited Button4: TButton
Left = 419 Left = 419
ExplicitLeft = 419 ExplicitLeft = 419
@ -533,9 +551,12 @@ inherited frViewAlbaranCliente: TfrViewAlbaranCliente
ReadOnly = False ReadOnly = False
ExplicitLeft = 22 ExplicitLeft = 22
ExplicitTop = 301 ExplicitTop = 301
ExplicitHeight = 228
inherited memObservaciones: TcxDBMemo inherited memObservaciones: TcxDBMemo
DataBinding.DataField = 'OBSERVACIONES' DataBinding.DataField = 'OBSERVACIONES'
DataBinding.DataSource = DADataSource DataBinding.DataSource = DADataSource
ExplicitHeight = 228
Height = 228
end end
end end
object dxLayoutControl1Group_Root: TdxLayoutGroup object dxLayoutControl1Group_Root: TdxLayoutGroup

View File

@ -192,8 +192,6 @@ begin
end; end;
procedure TfrViewAlbaranCliente.CustomViewCreate(Sender: TObject); procedure TfrViewAlbaranCliente.CustomViewCreate(Sender: TObject);
var
i : integer;
begin begin
inherited; inherited;
FFormasPago := Nil; FFormasPago := Nil;

View File

@ -1,8 +1,13 @@
inherited frViewDetallesAlbaranCliente: TfrViewDetallesAlbaranCliente inherited frViewDetallesAlbaranCliente: TfrViewDetallesAlbaranCliente
inherited cxGrid: TcxGrid inherited cxGrid: TcxGrid
inherited cxGridView: TcxGridDBTableView inherited cxGridView: TcxGridDBTableView
inherited cxGridViewIMPORTEPORTE: TcxGridDBColumn inherited cxGridViewDESCUENTO: TcxGridDBColumn
Visible = False Visible = False
VisibleForCustomization = False
end
inherited cxGridViewIMPORTENETO: TcxGridDBColumn
Visible = False
VisibleForCustomization = False
end end
end end
end end