Se solicita por José Luís que el asunto del correo y el nombre del documento adjunto del pedido a proveedor sea igual que la refencia del pedido a proveedor impreso

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@673 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
roberto 2018-11-27 16:12:02 +00:00
parent 1543f2619c
commit 33bcb9038d

View File

@ -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