Arreglo temporal de pedido de proveedor para poder hacer la subida mañana

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@740 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
roberto 2008-11-06 18:57:12 +00:00
parent 0cdfb0a201
commit 100a6a501e

View File

@ -372,7 +372,11 @@ begin
APedido.DataTable.FieldByName(fld_PedidosProveedorID_ALMACEN).AsVariant := NULL;
if (APedido.ID_OBRA = 0) then
begin
APedido.DataTable.DisableEventHandlers; //Arreglo temporal
APedido.DataTable.FieldByName(fld_PedidosProveedorID_OBRA).AsVariant := NULL;
APedido.DataTable.EnableEventHandlers;
end;
Result := True;
finally