Share
Report
5Buenos tardes
Estoy intentando crear un proceso para adjuntar dos documentos este es el codigo pero no funciona, si adjunto cada unos por separado funciona pero los dos no, alguien puede ayudarnos???
SendEMAILWEB(VendorNo : Code[20])
RutaInforme := SaveReportAsPDFWEB(VendorNo);
IF COMPANYNAME = ‘IC Construction’ THEN
RutaManual := ‘\\navision\FTP\IC\ManualWEB.pdf’
ELSE
RutaManual := ‘\\navision\FTP\EFFI\ManualWEB.pdf’;
IF ( CompanyInformation.GET() = TRUE ) THEN;
Vend.GET(VendorNo);
Filename1 := ‘ManualWeb.pdf’;
WITH EmailItem DO BEGIN
Init;
VALIDATE(“Send to”,Vend.”E-Mail”);
Subject := SubjectTxt;
SetBodyText(STRSUBSTNO(BodyTexto, CompanyInformation.Name));
“Attachment File Path 2” := RutaInforme;
“Attachment Name 2” := STRSUBSTNO(FileName,VendorNo);
“Attachment File Path” := RutaManual;
“Attachment Name” := STRSUBSTNO(Filename1,VendorNo );
Send(FALSE);
END;
All responses (
Answers (
