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:
parent
1543f2619c
commit
33bcb9038d
@ -635,11 +635,10 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
ShowHourglassCursor;
|
ShowHourglassCursor;
|
||||||
if not APedido.DESCRIPCION_GENERALIsNull then
|
|
||||||
ATituloEnvio := APedido.DESCRIPCION_GENERAL
|
// solicita por José Luís que el asunto del correo y el documento adunto sean igual que la referencia del pedido impreso
|
||||||
else
|
ATituloEnvio := Copy(APedido.REFERENCIA, 8, 8) + '-' + APedido.NOMBRE_CLIENTE + '-' + APedido.DESCRIPCION_GENERAL;
|
||||||
ATituloEnvio := 'Pedido ' + APedido.REFERENCIA;
|
|
||||||
|
|
||||||
AFicheroTMP := DarFicheroPDFTemporal(EscapeIllegalChars(ATituloEnvio));
|
AFicheroTMP := DarFicheroPDFTemporal(EscapeIllegalChars(ATituloEnvio));
|
||||||
AReportController := TPedidosProveedorReportController.Create;
|
AReportController := TPedidosProveedorReportController.Create;
|
||||||
try
|
try
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user