Unsubscription Notification Email Does Not Contain Reason (4382285)

When a request is unsubscribed, the notification email sent to the affected person does not contain the reason for the unsubscription.

For comparison:

• New request notifications show the reason
• Denied request notifications show the reason
• Unsubscription notifications do not show the reason

Normally, the ReasonHead field on the request object (PersonWantsOrg) is populated and can be used in email templates.

However, in case of unsubscriptions, the ReasonHead field on PersonWantsOrg is empty, so it cannot be used in the mail template.

This behavior is by is by design and it is not a product defect.

To include the unsubscription reason in notification emails, a custom script can be created to read the value from PWODecisionHistory.

Step 1: Create Custom Script in Designer

Create a new script in Designer with the following content:

<BaseObjectTypeAttribute("PersonWantsOrg")>
Public Overridable Function CCC_ITShopGetReasonHead(ByVal dbPersonWantsOrg As IEntity) As String

    Dim qHistory = Query.From("PWODecisionHistory") _
        .Where(Function(c) c.Column("UID_PersonWantsOrg") = dbPersonWantsOrg.GetValue("UID_PersonWantsOrg").String) _
        .Where(Function(c) c.Column("DecisionType") = "Unsubscribe") _
        .Select("ReasonHead") _
        .OrderBy("XDateInserted desc") _
        .Take(1)

    Dim colHistory = Session.Source().GetCollection(qHistory.GetQuery(), EntityCollectionLoadType.BulkReadOnly)

    If (colHistory.Count = 0) Then
        Return String.Empty
    End If

    Return colHistory(0).GetValue("ReasonHead").String

End Function

Step 2: Compile the Database

After saving the script, perform a database compilation.

Step 3: Adjust mail template in Manager

Use the new script function in the email template to display the reason.