From 8fd1d4be481aec2002b4fd451b6e4573da35aa2f Mon Sep 17 00:00:00 2001 From: roberto Date: Wed, 16 Jun 2010 10:58:37 +0000 Subject: [PATCH] =?UTF-8?q?Solo=20se=20generar=C3=A1=20un=20recibo=20nuevo?= =?UTF-8?q?=20si=20el=20recibo=20modificado=20est=C3=A1=20asociado=20a=20u?= =?UTF-8?q?na=20facturaa=20y=20se=20modifica=20su=20importe?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@515 f4e31baf-9722-1c47-927c-6f952f962d4b --- .../Controller/uRecibosProveedorController.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Source/Modulos/Recibos de proveedor/Controller/uRecibosProveedorController.pas b/Source/Modulos/Recibos de proveedor/Controller/uRecibosProveedorController.pas index 512b8c6c..29a398bb 100644 --- a/Source/Modulos/Recibos de proveedor/Controller/uRecibosProveedorController.pas +++ b/Source/Modulos/Recibos de proveedor/Controller/uRecibosProveedorController.pas @@ -813,8 +813,8 @@ begin begin ShowHourglassCursor; try - //Si el importe ha cambiado se debe hacer un recibo nuevo con el importe restante - if ImporteTotalModificado(ARecibosProveedor, ImporteRestante) then + //Si el recibo está asociado a una factura y el importe ha cambiado se debe hacer un recibo nuevo con el importe restante + if (ARecibosProveedor.ID_FACTURA > 0) and (ImporteTotalModificado(ARecibosProveedor, ImporteRestante)) then begin ANuevoReciboProveedor := Duplicar(ARecibosProveedor); ANuevoReciboProveedor.Edit;