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

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

Browse Source 
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
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Source/Modulos/Pedidos a proveedor/Controller/uPedidosProveedorController.pas
View File

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