Jap, I saw that - but I have some troubles to understand how to use it properly.
The "OnBeforeGetEmailSubject" doesn't return any value - so how can the subject be manipulated? a little nudge would be helpful.
procedure GetEmailSubject(PostedDocNo: Code[20]; EmailDocumentName: Text[250]; ReportUsage: Integer) Subject: Text[250]
var
EmailParameter: Record "Email Parameter";
CompanyInformation: Record "Company Information";
IsHandled: Boolean;
begin
IsHandled := false;
OnBeforeGetEmailSubject(PostedDocNo, EmailDocumentName, ReportUsage, Subject, IsHandled);
if IsHandled then
exit(Subject);
if EmailParameter.GetParameterWithReportUsage(PostedDocNo, "Report Selection Usage".FromInteger(ReportUsage), EmailParameter."Parameter Type"::Subject) then
exit(CopyStr(EmailParameter.GetParameterValue(), 1, 250));
CompanyInformation.Get();
if PostedDocNo = '' then
Subject := CopyStr(
StrSubstNo(EmailSubjectPluralCapTxt, CompanyInformation.Name, EmailDocumentName), 1, MaxStrLen(Subject))
else
Subject := CopyStr(
StrSubstNo(EmailSubjectCapTxt, CompanyInformation.Name, EmailDocumentName, PostedDocNo), 1, MaxStrLen(Subject))
end;
Tom
