Cambio en el onvalidate del porte porque peta cuando es null, hay que hacer una busqueda masiva de varisnull(displayvalue).

git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@180 c93665c3-c93d-084d-9b98-7d5f4a9c3376
This commit is contained in:
roberto 2007-12-03 18:49:46 +00:00
parent 152281482b
commit a94fd23879
2 changed files with 3 additions and 3 deletions

View File

@ -6,7 +6,7 @@ inherited fEditorPedidoProveedor: TfEditorPedidoProveedor
ClientWidth = 765
OnClose = CustomEditorClose
ExplicitWidth = 773
ExplicitHeight = 651
ExplicitHeight = 644
PixelsPerInch = 96
TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader

View File

@ -147,8 +147,8 @@ procedure TfEditorPedidoProveedor.frViewTotales1ePortePropertiesValidate(
var Error: Boolean);
begin
inherited;
if not VarIsNull(DisplayValue) then
FPedido.IMPORTE_PORTE := DisplayValue
if (not VarIsNull(DisplayValue)) and (VarToStr(DisplayValue) <> '') then
FPedido.IMPORTE_PORTE := DisplayValue
else
FPedido.IMPORTE_PORTE := 0;