Trying to e-mail with record in PDF attached

Hi Mel,

My coded button in the Invoices table is:

if 'INVOICE TO'.'RELATION TYPE' = 1 then
let x := Id;
let xCust := 'INVOICE TO';
let xPDF := printAndSaveRecord(this, "INVOICE");
let xFile := 'INVOICE NUMBER' + ".pdf";
importFile(this, xPDF, xFile);
for a in select CONTACTS where RELATIONS = xCust and STATUS = 1 and 'E-MAIL INVOICES' = true do
sendEmail({
from: userEmail(),
to: a.'E-MAIL',
subject: 'INVOICE NUMBER',
text: " ",
attachments: file(this, xFile),
html: "Dear " + a.TITLE + " " + a.'LAST NAME' + ",<br><br>Please find attached invoice " + ".<br><br>Thank you and best regards,<br><br>" + user() + "<br><br><b><u>ATTACHMENTS:</u></b><ul><li>" + 'INVOICE NUMBER' + "</li></ul>"
})
end;
STATUS := 3;
SENT := true
else
if 'INVOICE TO'.'RELATION TYPE' = 2 then
let x := Id;
let xCust := 'INVOICE TO';
let a := (select RELATIONS where Id = xCust and 'E-MAIL INVOICES' = true);
let xPDF := printAndSaveRecord(this, "INVOICE");
let xFile := 'INVOICE NUMBER' + ".pdf";
importFile(this, xPDF, xFile);
sendEmail({
from: userEmail(),
to: a.'GENERAL E-MAIL',
subject: 'INVOICE NUMBER',
text: " ",
attachments: file(this, xFile),
html: "Dear " + a.TITLE + " " + a.'LAST NAME' + ",<br><br>Please find attached invoice " + ".<br><br>Thank you and best regards,<br><br>" + user() + "<br><br><b><u>ATTACHMENTS:</u></b><ul><li>" + 'INVOICE NUMBER' + "</li></ul>"
});
STATUS := 3;
SENT := true
end
end;

The code in the Shipments table is actually the same (it's a Shipment form instead of an Invoice form obviously). Only difference is that in the Shipments table it is a 'trigger after update' event and not a button. In the Shipments table, the E-mail is sent, but the attachment is not there.

Code is:

if 'WAREHOUSE STATUS' = 1 then
'SHADOW WAREHOUSE STATUS' := 1
else
if 'WAREHOUSE STATUS' = 2 then
'WAREHOUSE IN' := now();
'SHADOW WAREHOUSE STATUS' := 2
else
if 'WAREHOUSE STATUS' = 3 then
'SHADOW WAREHOUSE STATUS' := 3;
let x := Id;
let i := (create LOG);
i.(SHIPMENTS := x);
i.('LOG NUMBER' := text(record(COUNTERS,6).RESULT));
let c := record(COUNTERS,6).(COUNTER + 1);
record(COUNTERS,6).(COUNTER := c);
i.('CREATED BY' := upper(text(user())));
popupRecord(i)
else
if 'WAREHOUSE STATUS' = 4 then
if 'INCO TERM' = null then
let x := 'SHADOW WAREHOUSE STATUS';
alert("INCO TERM EMPTY");
'WAREHOUSE STATUS' := x
else
'SHADOW WAREHOUSE STATUS' := 'WAREHOUSE STATUS'
end
else
if 'WAREHOUSE STATUS' = 5 then
'SHADOW WAREHOUSE STATUS' := 5
else
if 'WAREHOUSE STATUS' = 6 then
'SHADOW WAREHOUSE STATUS' := 6
end
end
end
end
end
end;
if CUSTOMER.'RELATION TYPE' = 1 then
let x := Id;
let xCust := CUSTOMER;
for a in select CONTACTS where RELATIONS = xCust and STATUS = 1 and 'E-MAIL SHIPMENT INFO' = true do
do as server
let xPDF := printAndSaveRecord(this, "INVOICE FORM");
let xFile := 'SHIPMENT NUMBER' + ".pdf";
importFile(this, xPDF, xFile);
sendEmail({
from: userEmail(),
to: a.'E-MAIL',
subject: 'SHIPMENT NUMBER' + ": STATUS UPDATE",
text: " ",
html: "Dear " + a.TITLE + " " + a.'LAST NAME' + ",<br><br>Please be informed that the status of shipment " + 'SHIPMENT NUMBER' + " has been changed to:<br><br><b>" + 'WAREHOUSE STATUS' + "</b><br><br>Best regards,<br>" + user() + "<br><br><b><u>ATTACHMENTS:</u></b><br><ul><li>" + 'SHIPMENT NUMBER' + "</li></ul>",
attachment: file(this, xFile)
})
end
end
end

Hi John,

Thank you... I really can't discover why it doesn't work. The e-mail from my Invoices table is indeed being sent. But it gives an error every first time I use the button. The second time it works.

I have tried other constructions for the Shipment table and in all cases the attachment is NOT sent with the e-mail. Do you have any ideas on that?

Yes, the RELATIONS table is indeed the INVOICE TO field.

The array created is necessarry. I want the e-mail to be sent to all the contacts within the company (Relations type = 1) that still work at the company (status = 1) and are the ones that need to receive inoices ('e-mail invoices = true') or in case the customer is a private person (Relations type = 2): relations that need to receive invoices ('e-mail invoices' = true).

Hi John, 

further to the above: did you test in a browser or in the mac app? I just did a complete a-z test run in browser and emailing invoices went ok (mailing from shipment table still not!). Then I retried from the Mac app and got the error mailing invoices again:

Also I noticed that several functions I have build in the Mac app do not function properly in the browser... minor things as a properly working loop up field referring to another table did not work well in safari window.

Am I the only one facing these things? If not: is it not strange that some things don't work well in the app and do work in browser or vice versa?