Index: WS/AX/DocGen/OfferteService.cls.xml
===================================================================
diff -u -r67212 -r74903
--- WS/AX/DocGen/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 67212)
+++ WS/AX/DocGen/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 74903)
@@ -30,8 +30,9 @@
Do ..ControleerImageUrls(OfferteData, $$$True)
Do ..PasAanOfferteGeldigMelding(OfferteData) ; bij volgende "Grote prijswijziging" de datums hieronder aanpassen en deze lijn activeren.
- ;Do ..VoegToeMeldingLeveringenVanaf01okt(OfferteData) ; idem
+ Do ..VoegToeMeldingLeveringenVanaf01mei(OfferteData) ; idem
Do ..PasAanVermeldingStockNaarLeeg(OfferteData)
+ Do ..VervangFscTekstIndienNodig(OfferteData)
Set pxDoc = ##class(BL.Flow.Proxy.pxFlowDocs).%New()
Do pxDoc.Offertes.Insert(OfferteData)
@@ -54,36 +55,35 @@
OfferteData:BL.Flow.Proxy.pxOfferte
1
= $$$Datum01apr2022) && (CurrentDate < $$$Datum01mei2022) && $IsObject(OfferteData.MEMO) {
+ If (CurrentDate >= $$$Datum30mei2025) && (CurrentDate < $$$Datum01juli2025) && $IsObject(OfferteData.MEMO) {
Set MemoTekstIterator = ##class(TECH.ListIterator).%New(OfferteData.MEMO)
While (MemoTekstIterator.HasNext()) {
#dim MemoTag As BL.FOP.Basis.pxTekstHTML = MemoTekstIterator.Next()
If (MemoTag.Tag = "MEMO") { // && (MemoTag.Attributes.GetAt("type") = "PRIJS_GELDIG_BTWCLAUSULE")
- If (MemoTag.Tekst [ "Geldig 30 dagen" ) Set MemoTag.Tekst = ##class(TECH.StringUtils).Replace(MemoTag.Tekst, "Geldig 30 dagen" ,"Geldig tot en met 30/04/2022")
- If (MemoTag.Tekst [ "Valable 30 jours") Set MemoTag.Tekst = ##class(TECH.StringUtils).Replace(MemoTag.Tekst, "Valable 30 jours","Valable jusqu'au 30/04/2022")
- If (MemoTag.Tekst [ "Valid 30 days" ) Set MemoTag.Tekst = ##class(TECH.StringUtils).Replace(MemoTag.Tekst, "Valid 30 days" ,"Valid until 30/04/2022")
- If (MemoTag.Tekst [ "Gueltig 30 tage" ) Set MemoTag.Tekst = ##class(TECH.StringUtils).Replace(MemoTag.Tekst, "Gueltig 30 tage","Gueltig bis 30/04/2022")
+ If (MemoTag.Tekst [ "Geldig 30 dagen" ) Set MemoTag.Tekst = ##class(TECH.StringUtils).Replace(MemoTag.Tekst, "Geldig 30 dagen" ,"Geldig tot en met 30/06/2025")
+ If (MemoTag.Tekst [ "Valable 30 jours") Set MemoTag.Tekst = ##class(TECH.StringUtils).Replace(MemoTag.Tekst, "Valable 30 jours","Valable jusqu'au 30/06/2025")
+ If (MemoTag.Tekst [ "Valid 30 days" ) Set MemoTag.Tekst = ##class(TECH.StringUtils).Replace(MemoTag.Tekst, "Valid 30 days" ,"Valid until 30/06/2025")
+ If (MemoTag.Tekst [ "Gueltig 30 tage" ) Set MemoTag.Tekst = ##class(TECH.StringUtils).Replace(MemoTag.Tekst, "Gueltig 30 tage","Gueltig bis 30/06/2025")
}
}
}
]]>
-
+
Tijdelijk tekstlijn toevoegen voor de geplande prijswijzigingen vanaf 01/10/2021.
OfferteData:BL.Flow.Proxy.pxOfferte
1
@@ -116,6 +116,24 @@
]]>
+
+OfferteData:BL.Flow.Proxy.pxOfferte
+1
+
+
+
DocRef:%String,Extension:%String="pdf"
1