Index: WSimpl/AX/DocGen/RappelService/RenderRappel.cls.xml
===================================================================
diff -u
--- WSimpl/AX/DocGen/RappelService/RenderRappel.cls.xml	(revision 0)
+++ WSimpl/AX/DocGen/RappelService/RenderRappel.cls.xml	(revision 51571)
@@ -0,0 +1,68 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.AX.DocGen.RappelService.RenderRappel">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="FlowRappelDoc">
+<Type>BL.Flow.Rappel.Doc</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Utils">
+<Type>WSimpl.AX.DocGen.Utils</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>FlowRappelDoc:BL.Flow.Rappel.Doc="",Utils:WSimpl.AX.DocGen.Utils=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..FlowRappelDoc = $$$Inject(FlowRappelDoc, ##class(BL.Flow.Rappel.Doc).%New())
+	Set ..Utils = $$$Inject(Utils, ##class(WSimpl.AX.DocGen.Utils).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="RenderRappel">
+<FormalSpec>RappelData:BL.Flow.Proxy.pxRappel</FormalSpec>
+<ReturnType>WS.AX.DocGen.dto.RenderResultaat</ReturnType>
+<Implementation><![CDATA[
+	#dim KlantNr As %String = $ZSTRIP($$$Trim(RappelData.KLANTNR),"*C")
+	If KlantNr = "" {
+		Do ##class(TECH.Exceptions.InvalidInputException).Throw("The field KLANTNR is empty or invalid ('"_$$$LCVT(RappelData.KLANTNR)_"').")
+	}
+	
+	Do ..ControleerSlottekstTag(RappelData, $$$True)
+	
+	Set pxDoc = ##class(BL.Flow.Proxy.pxFlowDocs).%New()
+	Do pxDoc.Rappels.Insert(RappelData)
+	
+	#dim FilePath As %String = "" // Nog te implementeren: ..DefaultPDFName(KlantNr)
+	#dim sc As %Status = $$$OK // Nog te implementeren: ..FlowFactuurDoc.RenderAndFileDocFromDto(pxDoc, .FilePath, FactuurNr, KlantNr)
+	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(sc)
+	/*
+    If ..MoetDocBasePrinten(Destination) {
+		#dim scPrintToPPOD As %Status = ..MaakFopTaakVoorPrintFacturen(FactuurData,(NrOfCopies\1))
+		Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(scPrintToPPOD)
+	}
+	*/
+	; voorlopig voorbeeld bestand meegeven voor test cnext
+	Set RenderResultaat = ##class(WS.AX.DocGen.dto.RenderResultaat).%New()
+	Set RenderResultaat.DocumentNaam = FilePath
+	Quit RenderResultaat
+]]></Implementation>
+</Method>
+
+<Method name="ControleerSlottekstTag">
+<FormalSpec>RappelData:BL.Flow.Proxy.pxRappel,FixWhenDollarC0:%Boolean</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	Do ..Utils.ControleerTekstHTMLTag(RappelData.SLOTTEKST, RappelData.KLANTNR, FixWhenDollarC0)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/AX/DocGen/Utils.cls.xml
===================================================================
diff -u -r51569 -r51571
--- WSimpl/AX/DocGen/Utils.cls.xml	(.../Utils.cls.xml)	(revision 51569)
+++ WSimpl/AX/DocGen/Utils.cls.xml	(.../Utils.cls.xml)	(revision 51571)
@@ -19,7 +19,7 @@
 <Implementation><![CDATA[
 	If (TekstHTMLTag.Tekst = $C(0)) {
 		If FixWhenDollarC0 {
-			Do ##class(vhLib.Logger).%New("").WarningMail("ControleerMemoTags","One of the MEMO-tags for document '"_DocumentOmschrijving_"' is emtpy : $C(0) " _$$$CRLF_$$$CRLF
+			Do ##class(vhLib.Logger).%New("").WarningMail("ControleerTekstHTMLTag","A TekstHTML-tag for reference '"_DocumentOmschrijving_"' is emtpy : $C(0) " _$$$CRLF_$$$CRLF
 																_ $$ObjToText^vhLib(TekstHTMLTag)_$$$CRLF
 																_"Gelieve dit te rapporteren aan de verantwoordelijke van BizTalk, aangezien dit onverwacht gedrag is."_$$$CRLF
 																_"De waarde van [Tekst] wordt aangepast (leeggemaakt), zodat het document verder kan verwerkt worden.")