From d4163548f07bd9adbe086b0b68121b69524f0957 Mon Sep 17 00:00:00 2001
From: roberto <rblanco@rodax-software.com>
Date: Thu, 29 Jan 2009 09:03:35 +0000
Subject: [PATCH] =?UTF-8?q?Cuando=20se=20modifica=20el=20recibo=20se=20reh?=
 =?UTF-8?q?ace=20la=20descripci=C3=B3n=20por=20si=20ha=20cambiado=20el=20i?=
 =?UTF-8?q?mporte?=
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@390 f4e31baf-9722-1c47-927c-6f952f962d4b
---
 .../Controller/uRecibosProveedorController.pas                | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/Source/Modulos/Recibos de proveedor/Controller/uRecibosProveedorController.pas b/Source/Modulos/Recibos de proveedor/Controller/uRecibosProveedorController.pas
index dc646eb6..8ae3ef85 100644
--- a/Source/Modulos/Recibos de proveedor/Controller/uRecibosProveedorController.pas	
+++ b/Source/Modulos/Recibos de proveedor/Controller/uRecibosProveedorController.pas	
@@ -790,6 +790,10 @@ begin
         ANuevoReciboProveedor.IMPORTE := ImporteRestante;
         ANuevoReciboProveedor.DESCRIPCION := 'RECIBO ' + ANuevoReciboProveedor.REFERENCIA + ' - ' + CifraToLetras(ImporteRestante);
         ANuevoReciboProveedor.Post;
+
+        ARecibosProveedor.Edit;
+        ARecibosProveedor.DESCRIPCION := 'RECIBO ' + ARecibosProveedor.REFERENCIA + ' - ' + CifraToLetras(ARecibosProveedor.IMPORTE);
+        ARecibosProveedor.Post;
       end;
 
       ARecibosProveedor.DataTable.ApplyUpdates;