Hi BC Community,
I would like to email an entire POs lines to a user.
I can populate a list to include all lines, however, I can not figure out how to email this list using strsubstno.
The current issue is that even though I include the listdata variable into the StrSubstNo function, in AddBodyMessage that element is blank, and subsequent email text is blank.
My code below:
if userEmail <> '' then begin purchaseLine.SetRange(purchaseLine."Document Type", PurchaseHeader."Document Type"); purchaseLine.SetRange(purchaseLine."Document No.", PurchaseHeader."No."); if purchaseLine.FindSet() then begin repeat listData.Add(purchaseLine.Description); counter := counter 1; until purchaseLine.next = 0; end; BodyMessage := 'Dear %1,
%2 has been fully approved.
Vendor:%3
Total($):%4
%5'; subjectMessage := 'Your request %1 has been fully approved'; AddBodyMessage := StrSubstNo(BodyMessage, userName, purchaseHeader."No.", purchaseHeader."Buy-from Vendor Name", purchaseHeader.Amount, listData.GetRange(1,listData.Count)); addUserSubject := StrSubstNo(subjectMessage, purchaseHeader."No."); EmailMessage.Create(userEmail, addUserSubject, AddBodyMessage, true);
Thanks as always