From 33bcb9038de504c4c8d15c173f9686a34ee1c723 Mon Sep 17 00:00:00 2001
From: roberto <rblanco@rodax-software.com>
Date: Tue, 27 Nov 2018 16:12:02 +0000
Subject: [PATCH] =?UTF-8?q?Se=20solicita=20por=20Jos=C3=A9=20Lu=C3=ADs=20q?=
 =?UTF-8?q?ue=20el=20asunto=20del=20correo=20y=20el=20nombre=20del=20docum?=
 =?UTF-8?q?ento=20adjunto=20del=20pedido=20a=20proveedor=20sea=20igual=20q?=
 =?UTF-8?q?ue=20la=20refencia=20del=20pedido=20a=20proveedor=20impreso?=
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@673 f4e31baf-9722-1c47-927c-6f952f962d4b
---
 .../Controller/uPedidosProveedorController.pas           | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/Source/Modulos/Pedidos a proveedor/Controller/uPedidosProveedorController.pas b/Source/Modulos/Pedidos a proveedor/Controller/uPedidosProveedorController.pas
index 1a1907b9..9e5a4288 100644
--- a/Source/Modulos/Pedidos a proveedor/Controller/uPedidosProveedorController.pas	
+++ b/Source/Modulos/Pedidos a proveedor/Controller/uPedidosProveedorController.pas	
@@ -635,11 +635,10 @@ begin
   end;
 
   ShowHourglassCursor;
-  if not APedido.DESCRIPCION_GENERALIsNull then
-    ATituloEnvio := APedido.DESCRIPCION_GENERAL
-  else
-    ATituloEnvio := 'Pedido ' + APedido.REFERENCIA;
-    
+
+  // solicita por José Luís que el asunto del correo y el documento adunto sean igual que la referencia del pedido impreso
+  ATituloEnvio := Copy(APedido.REFERENCIA, 8, 8) + '-' + APedido.NOMBRE_CLIENTE + '-' + APedido.DESCRIPCION_GENERAL;
+
   AFicheroTMP := DarFicheroPDFTemporal(EscapeIllegalChars(ATituloEnvio));
   AReportController := TPedidosProveedorReportController.Create;
   try