Cambio para el calculo de porte, en este caso no se desglosa por articulo sino que se suma a la base imponible

git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@182 c93665c3-c93d-084d-9b98-7d5f4a9c3376
This commit is contained in:
roberto 2007-12-03 18:51:09 +00:00
parent d63c591242
commit 608f28bb9f
2 changed files with 20 additions and 24 deletions

View File

@ -6,7 +6,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
ClientWidth = 765
OnClose = CustomEditorClose
ExplicitWidth = 773
ExplicitHeight = 619
ExplicitHeight = 612
PixelsPerInch = 96
TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader
@ -200,10 +200,6 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
object pagInicidencias: TTabSheet
Caption = 'Incidencias'
ImageIndex = 2
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
inline frViewIncidenciasCli: TfrViewIncidencias
Left = 0
Top = 0
@ -285,20 +281,20 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
ExplicitWidth = 73
end
inherited Bevel3: TBevel
Left = 368
Left = 369
Top = 11
Width = 7
Height = 54
ExplicitLeft = 368
ExplicitLeft = 369
ExplicitTop = 11
ExplicitWidth = 7
ExplicitHeight = 54
end
inherited Bevel4: TBevel
Left = 484
Left = 485
Top = 92
Width = 192
ExplicitLeft = 484
ExplicitLeft = 485
ExplicitTop = 92
ExplicitWidth = 192
end
@ -312,20 +308,20 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Width = 93
end
inherited ImporteIVA: TcxDBCurrencyEdit
Left = 555
Left = 556
Top = 38
DataBinding.DataField = ''
Style.IsFontAssigned = True
ExplicitLeft = 555
ExplicitLeft = 556
ExplicitTop = 38
ExplicitWidth = 137
Width = 137
end
inherited ImporteTotal: TcxDBCurrencyEdit
Left = 485
Left = 486
Top = 112
Style.IsFontAssigned = True
ExplicitLeft = 485
ExplicitLeft = 486
ExplicitTop = 112
ExplicitWidth = 137
Width = 137
@ -338,36 +334,36 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
ExplicitTop = 112
end
inherited edtIVA: TcxDBSpinEdit
Left = 484
Left = 485
Top = 38
DataBinding.DataField = ''
Style.IsFontAssigned = True
ExplicitLeft = 484
ExplicitLeft = 485
ExplicitTop = 38
end
inherited ImporteBase: TcxDBCurrencyEdit
Left = 484
Left = 485
Top = 11
Style.IsFontAssigned = True
ExplicitLeft = 484
ExplicitLeft = 485
ExplicitTop = 11
ExplicitWidth = 92
Width = 92
end
inherited edtRE: TcxDBSpinEdit
Left = 484
Left = 485
Top = 65
DataBinding.DataField = ''
Style.IsFontAssigned = True
ExplicitLeft = 484
ExplicitLeft = 485
ExplicitTop = 65
end
inherited ImporteRE: TcxDBCurrencyEdit
Left = 555
Left = 556
Top = 65
DataBinding.DataField = ''
Style.IsFontAssigned = True
ExplicitLeft = 555
ExplicitLeft = 556
ExplicitTop = 65
ExplicitWidth = 56
Width = 56
@ -401,9 +397,9 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Width = 81
end
inherited bTiposIVA: TButton
Left = 220
Left = 221
Top = 38
ExplicitLeft = 220
ExplicitLeft = 221
ExplicitTop = 38
end
inherited cbRecargoEquivalencia: TcxDBCheckBox

View File

@ -174,7 +174,7 @@ begin
else
FAlbaran.IMPORTE_PORTE := 0;
RecalcularPortePorUnidad;
// RecalcularPortePorUnidad; Aqui no se desglosa el porte a nivel de articulo
end;
function TfEditorAlbaranCliente.GetController: IAlbaranesClienteController;