This link expires in " & H(GetAppSetting("OrderTokenExpirationHours")) & _
- " hours and can only be used once.
"
+ mail.Body = EmailShell(inner)
mail.AddRecipient "To", email
mail.Send
End Sub
@@ -55,14 +60,7 @@ Class OrderMailer_Class
Private Function BuildOrderDetailsEmailBody(order, model)
Dim html
- html = "" & _
- "
"
@@ -80,6 +78,7 @@ Class OrderMailer_Class
End If
html = html & EmailSection("Purple Ballot Envelopes", _
+ EmailRow("Permanent ballot list count", model.PurplePermanentBallotListCount) & _
EmailRow("Envelope stock", LabelEnvelopeStock(model.PurpleEnvelopeStock)) & _
EmailRow("Print option", LabelPrintOption(model.PurplePrintOption)) & _
EmailRow("Also wants KCI blue envelopes", EmailYesNo(model.PurpleWantsBlueEnvelopes)) & _
@@ -93,24 +92,25 @@ Class OrderMailer_Class
End If
If IsTrue(model.BlueWantsQuote) Then
- ' City/permit number are always collected for an own-organization permit - a
- ' permit lookup can't be done from the nonprofit authorization code alone, so
- ' that code is additional information when nonprofit status is Yes, not a
- ' replacement for city/permit number.
+ ' Nonprofit status (and the auth code that follows a "Yes") is asked for either
+ ' permit-ownership branch. City/permit number are additionally collected for an
+ ' own-organization permit - a permit lookup can't be done from the nonprofit
+ ' authorization code alone.
Dim bluePermitLine
bluePermitLine = ""
+ If CStr(model.BlueHasNonprofitStatus & "") = "Yes" Then
+ bluePermitLine = EmailRow("Nonprofit authorization code", model.BlueNonprofitAuthCode)
+ End If
If LabelPermitOwnership(model.BluePermitOwnership) = "My organization's permit" Then
- bluePermitLine = EmailRow("City of permit holder", model.BluePermitCity) & _
+ bluePermitLine = bluePermitLine & _
+ EmailRow("City of permit holder", model.BluePermitCity) & _
EmailRow("Permit number", model.BluePermitNumber)
- If IsTrue(model.BlueHasNonprofitStatus) Then
- bluePermitLine = bluePermitLine & EmailRow("Nonprofit authorization code", model.BlueNonprofitAuthCode)
- End If
End If
html = html & EmailSection("Blue AV Envelopes", _
EmailRow("Print permit", EmailYesNo(model.BluePrintPermit)) & _
EmailRow("Permit ownership", LabelPermitOwnership(model.BluePermitOwnership)) & _
- EmailRow("Confirmed nonprofit status with USPS", EmailYesNo(model.BlueHasNonprofitStatus)) & _
+ EmailRow("Confirmed nonprofit status with USPS", LabelNonprofitStatus(model.BlueHasNonprofitStatus)) & _
bluePermitLine)
End If
@@ -130,14 +130,27 @@ Class OrderMailer_Class
EmailRow("Special requests", model.SpecialRequests))
End If
- html = html & "
Questions about this order? Just reply to this email.
" & _
+ html = html & "
Questions about this order? Just reply to this email.
"
+
+ BuildOrderDetailsEmailBody = EmailShell(html)
+ End Function
+
+ ' Wraps inner body HTML in the same header/footer chrome used across the website - the
+ ' navy KCI Election Printing bar (matching the site header/footer) and white content card.
+ Private Function EmailShell(innerHtml)
+ Dim logoUrl : logoUrl = Routes().AppURL & "images/KCI%20ELECTION%20printing%20(white).png"
+ EmailShell = "" & _
+ "
"
-
- BuildOrderDetailsEmailBody = html
End Function
Private Function EmailSection(sectionTitle, rowsHtml)
diff --git a/app/models/POBO_OrderDetails.asp b/app/models/POBO_OrderDetails.asp
index 15acc9e..fe26f47 100644
--- a/app/models/POBO_OrderDetails.asp
+++ b/app/models/POBO_OrderDetails.asp
@@ -42,6 +42,7 @@ Class POBO_OrderDetails
Private pPurpleEnvelopeProvider
Private pPurpleEnvelopeStock
Private pPurpleExtraEnvelopeQty
+ Private pPurplePermanentBallotListCount
Private pPurplePrecinctCount
Private pPurplePrintOption
Private pPurplePrintStyle
@@ -85,6 +86,7 @@ Class POBO_OrderDetails
pPurpleEnvelopeProvider = Null
pPurpleEnvelopeStock = Null
pPurpleExtraEnvelopeQty = 0
+ pPurplePermanentBallotListCount = 0
pPurplePrecinctCount = 0
pPurplePrintOption = Null
pPurplePrintStyle = Null
@@ -94,7 +96,7 @@ Class POBO_OrderDetails
pSecrecySleevesQty = 0
pSpecialRequests = Null
pSubmittedAt = #1/1/1970#
- Properties = Array("BlueDeliveryDate","BlueEnvelopeProvider","BlueHasNonprofitStatus","BlueNonprofitAuthCode","BluePermitCity","BluePermitClass","BluePermitNumber","BluePermitOwnership","BluePrintPermit","BluePrintReturnAddress","BlueWantsQuote","ContactName","FutureVoterStickerRolls","IVotedStickerRolls","MailingEstimatedQuantity","MailingHasNonprofitStatus","MailingPickupDate","MailingPostageOption","MailingWantsService","MailingWantsSorting","Municipality","OrderDetailID","OrderID","Phone","PurpleBlueProvider","PurpleBlueProviderOther","PurpleColorCodingBy","PurpleColorNames","PurpleDeliveryDate","PurpleEnvelopeProvider","PurpleEnvelopeStock","PurpleExtraEnvelopeQty","PurplePrecinctCount","PurplePrintOption","PurplePrintStyle","PurpleTrackMIBallot","PurpleWantsBlueEnvelopes","PurpleWantsQuote","SecrecySleevesQty","SpecialRequests","SubmittedAt")
+ Properties = Array("BlueDeliveryDate","BlueEnvelopeProvider","BlueHasNonprofitStatus","BlueNonprofitAuthCode","BluePermitCity","BluePermitClass","BluePermitNumber","BluePermitOwnership","BluePrintPermit","BluePrintReturnAddress","BlueWantsQuote","ContactName","FutureVoterStickerRolls","IVotedStickerRolls","MailingEstimatedQuantity","MailingHasNonprofitStatus","MailingPickupDate","MailingPostageOption","MailingWantsService","MailingWantsSorting","Municipality","OrderDetailID","OrderID","Phone","PurpleBlueProvider","PurpleBlueProviderOther","PurpleColorCodingBy","PurpleColorNames","PurpleDeliveryDate","PurpleEnvelopeProvider","PurpleEnvelopeStock","PurpleExtraEnvelopeQty","PurplePermanentBallotListCount","PurplePrecinctCount","PurplePrintOption","PurplePrintStyle","PurpleTrackMIBallot","PurpleWantsBlueEnvelopes","PurpleWantsQuote","SecrecySleevesQty","SpecialRequests","SubmittedAt")
End Sub
Public Property Get PrimaryKey()
@@ -145,10 +147,10 @@ Class POBO_OrderDetails
Public Property Let BlueHasNonprofitStatus(val)
On Error Resume Next
- If IsNull(val) Then
- pBlueHasNonprofitStatus = Null
+ If IsNumeric(val) Then
+ pBlueHasNonprofitStatus = CDbl(val)
Else
- pBlueHasNonprofitStatus = CBool(val)
+ pBlueHasNonprofitStatus = val
End If
If Err.Number <> 0 Then
Err.Raise Err.Number, "POBO_OrderDetails.BlueHasNonprofitStatus", "Invalid value for BlueHasNonprofitStatus: " & Err.Description
@@ -637,6 +639,23 @@ Class POBO_OrderDetails
On Error GoTo 0
End Property
+ Public Property Get PurplePermanentBallotListCount()
+ PurplePermanentBallotListCount = pPurplePermanentBallotListCount
+ End Property
+
+ Public Property Let PurplePermanentBallotListCount(val)
+ On Error Resume Next
+ If IsNumeric(val) Then
+ pPurplePermanentBallotListCount = CDbl(val)
+ Else
+ pPurplePermanentBallotListCount = val
+ End If
+ If Err.Number <> 0 Then
+ Err.Raise Err.Number, "POBO_OrderDetails.PurplePermanentBallotListCount", "Invalid value for PurplePermanentBallotListCount: " & Err.Description
+ End If
+ On Error GoTo 0
+ End Property
+
Public Property Get PurplePrecinctCount()
PurplePrecinctCount = pPurplePrecinctCount
End Property
diff --git a/app/views/Order/continue.asp b/app/views/Order/continue.asp
index cd9064f..3d06750 100644
--- a/app/views/Order/continue.asp
+++ b/app/views/Order/continue.asp
@@ -96,6 +96,13 @@
title: "Would you like for KCI to print your purple AV envelopes?",
isRequired: true
},
+ {
+ type: "text", name: "PurplePermanentBallotListCount",
+ title: "How many are on your permanent ballot list?",
+ inputType: "number", min: 0,
+ visibleIf: "{PurpleWantsQuote} = true",
+ isRequired: true
+ },
{
type: "radiogroup", name: "PurpleEnvelopeStock",
title: "Are you planning to use KCI's purple envelopes or from your own stock?",
@@ -229,15 +236,20 @@
html: "
Please note, envelopes with KCI's permit MUST be mailed from KCI.
- Proof approval
- Review before production begins
-
-
-
-
-
-
-
- Complete production support
-
Everything needed to prepare your ballot envelopes.
-
- Choose only the services you need, from basic addressing to a
- complete data-processing and mailing workflow.
-
-
-
-
-
- 01
-
Recipient addressing
-
- Print recipient names, delivery addresses, city, state, ZIP Code,
- return-service endorsements, and optional identifiers.
-
-
-
-
- 02
-
Barcode preparation
-
- Prepare and print Intelligent Mail barcode data using the mailing
- fields and identifiers supplied for your project.
-
-
-
-
- 03
-
List processing
-
- Review column structure, remove obvious formatting problems,
- standardize capitalization, and identify incomplete records.
-
-
-
-
- 04
-
Proof and production
-
- Receive a digital sample for approval before the full envelope
- run enters production.
-
-
-
-
-
-
-
-
-
- Simple four-step workflow
-
From uploaded list to completed order.
-
-
-
-
- 1
-
Enter job details
-
Provide quantity, envelope specifications, and due date.
-
-
- 2
-
Upload your files
-
Add recipient data, artwork, instructions, or a sample envelope.
-
-
- 3
-
Approve your proof
-
Review the address placement and sample barcode before printing.
-
-
- 4
-
Production begins
-
Your approved job is addressed, checked, packed, and delivered.
-
-
-
-
-
-
-
-
- Online order request
-
Build your envelope addressing order.
-
- This form calculates an estimate. Final pricing can be confirmed
- after your data and production requirements are reviewed.
-
-
-
-
-
-
-
-
-
-
- Frequently asked questions
-
Ordering and production details.
-
-
-
-
- What file formats can I upload?
-
- CSV and Excel files are preferred. Clearly labeled columns should
- include the recipient name, delivery address, city, state, ZIP
- Code, and any barcode-related fields required for the project.
-
-
-
-
- Will I receive a proof?
-
- Yes. A digital proof can be provided before production. A printed
- physical proof can also be selected as an additional service.
-
-
-
-
- Does the estimate include postage?
-
- No. Postage depends on the mailing class, presort results, entry
- location, and current postal requirements. It should be quoted
- separately after the mailing data is reviewed.
-
-
-
-
- Can you supply the purple envelopes?
-
- Yes. Select “Please supply the envelopes” in the order form.
- Stock, color, size, window configuration, and availability will
- be confirmed before production.
-
-
-
-
-
-
-
-
-
- Need a custom production quote?
-
Large quantities and special ballot configurations are welcome.