Index: WS/AX/DocGen/ProxyDataHelper.cls.xml
===================================================================
diff -u
--- WS/AX/DocGen/ProxyDataHelper.cls.xml	(revision 0)
+++ WS/AX/DocGen/ProxyDataHelper.cls.xml	(revision 65287)
@@ -0,0 +1,83 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WS.AX.DocGen.ProxyDataHelper">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="VoegToeOfferteMeldingLeveringenVanaf01okt">
+<FormalSpec>OfferteData:BL.Flow.Proxy.pxOfferte</FormalSpec>
+<Implementation><![CDATA[	Do ..VoegToeMeldingLeveringenVanaf01okt(OfferteData.LIJNEN, OfferteData.TAAL)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeOrderMeldingLeveringenVanaf01okt">
+<FormalSpec>OrderData:BL.Flow.Proxy.pxOrder</FormalSpec>
+<Implementation><![CDATA[	Do ..VoegToeMeldingLeveringenVanaf01okt(OrderData.LIJNEN, OrderData.TAAL)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeMeldingLeveringenVanaf01okt">
+<Description>
+Tijdelijk tekstlijn vooraan toevoegen voor prijswijziging : tussen 15/08 en 30/09/2021 wordt de melding toegevoegd, vanwege de geplande prijswijzigingen vanaf 01/10/2021. 
+Na deze datum zal de tekst niet meer toegevoegd worden (wordt automatisch uitgeschakeld). </Description>
+<FormalSpec>OrderLijnen:%ListOfObjects(ELEMENTTYPE="BL.Flow.Proxy.pxOrderLijn"),Taal:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#define Datum15aug2021   65971
+	#define Datum01okt2021   66018
+	
+	#dim CurrentDate As %Date = +$H 
+	
+	If (CurrentDate >= $$$Datum15aug2021) && (CurrentDate < $$$Datum01okt2021) && $IsObject(OrderLijnen) {
+		#dim TekstLeveringenVanaf01okt As %String = ..GeefTekstLeveringenVanaf01okt(Taal)
+		#dim TekstLijn As BL.Flow.Proxy.pxTekstLijn = ..MaakTekstLijnLeveringenVanaf01okt(TekstLeveringenVanaf01okt)
+		Do OrderLijnen.InsertAt(TekstLijn,1)   ; Voeg tekstlijn VOORAAN toe 
+	}
+]]></Implementation>
+</Method>
+
+<Method name="MaakTekstLijnLeveringenVanaf01okt">
+<FormalSpec>TekstLeveringenVanaf01okt:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>BL.Flow.Proxy.pxTekstLijn</ReturnType>
+<Implementation><![CDATA[
+	#dim HtmlTekst As %String = TekstLeveringenVanaf01okt   ; Input tekst is GEEN Html 
+	Set HtmlTekst = ##class(TECH.StringUtils).Replace(HtmlTekst, $$$CRLF, "<BR/>")
+	Set HtmlTekst = "<B>" _ HtmlTekst _ "</B>"
+	
+	Quit ##class(BL.Flow.Proxy.pxTekstLijn).BuildHTML(HtmlTekst, $$$False, $$$True)   ; HtmlTekst is wel Html
+]]></Implementation>
+</Method>
+
+<Method name="GeefTekstLeveringenVanaf01okt">
+<FormalSpec>Taal:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Set:($$$Trim(Taal) = "") Taal = "N"
+	
+	#dim TekstLeveringenVanaf01okt As %String = ""
+	If (Taal = "N") {
+		Set TekstLeveringenVanaf01okt = "De vermelde prijzen zijn geldig voor leveringen vóór 1 oktober 2021."
+										_ $$$CRLF _ "Voor leveringen vanaf 1 oktober 2021 gelden de geactualiseerde prijzen."
+	} 
+	ElseIf (Taal = "F") {
+		Set TekstLeveringenVanaf01okt = "Les prix indiqués sont valables pour des livraisons avant le 1er octobre 2021."
+										_ $$$CRLF _ "Pour les livraisons à partir du 1er octobre 2021, les prix actualisés s'appliquent."
+	}
+	ElseIf (Taal = "D") {
+		Set TekstLeveringenVanaf01okt = "Die angegebenen Preise gelten für Lieferungen vor dem 1. Oktober 2021."
+										_ $$$CRLF _ "Für Lieferungen ab 1. Oktober 2021 gelten die aktualisierten Preise."
+	}
+	Else {
+		// (Taal = "E")
+		Set TekstLeveringenVanaf01okt = "The prices shown are valid for deliveries before 1 October 2021."
+										_ $$$CRLF _ "For deliveries from 1 October 2021 the updated prices apply."
+	}
+	
+	Quit TekstLeveringenVanaf01okt
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>