Export Email to IFS

I need to provide a button or action on the mail template to allow certain people to export an email as a text file to a shared folder on the IFS (a different iSeries than the domino server is on).

Ideally I need to prompt the user for a reference number and save the text file with the name being the reference number.

How far have I gotten? Well, I thought I’d just try to export locally first, so using @Command([FileExport]), I can export the body of the text, but not the header text (From, To, Date, Subject, etc.).

EnterRef := @Prompt([OkCancelEdit]; “Reference Number”; “Enter the reference number for this order”; " ");

RefNo := “REF” + EnterRef;

@Command([FileExport]; “ASCII Text”; “c:\”+ RefNo + “.txt”)

There must be a way to get more comprehensive results. Is there a LotusScript method I’m missing or something?