Index: vhUnitTest/DOM/PM/Maatwerk/TBX/impl/KorttekstBepaler/Test.cls.xml
===================================================================
diff -u -r67838 -r67871
--- vhUnitTest/DOM/PM/Maatwerk/TBX/impl/KorttekstBepaler/Test.cls.xml (.../Test.cls.xml) (revision 67838)
+++ vhUnitTest/DOM/PM/Maatwerk/TBX/impl/KorttekstBepaler/Test.cls.xml (.../Test.cls.xml) (revision 67871)
@@ -329,7 +329,7 @@
1
TECH.String
@@ -339,7 +339,7 @@
1
TECH.String
Index: DOM/PM/impl/MaatwerkLangtekstBepaler.cls.xml
===================================================================
diff -u -r67797 -r67871
--- DOM/PM/impl/MaatwerkLangtekstBepaler.cls.xml (.../MaatwerkLangtekstBepaler.cls.xml) (revision 67797)
+++ DOM/PM/impl/MaatwerkLangtekstBepaler.cls.xml (.../MaatwerkLangtekstBepaler.cls.xml) (revision 67871)
@@ -97,7 +97,7 @@
If ##class(TECH.StringUtils).Equals(Taal,TaalEnum.Nederlands,TaalEnum.Frans,TaalEnum.Duits,TaalEnum.Engels){
Set Langtekst = ##class(Prod.ProductTekst).GeefLangtekstObject(PRNr,Taal)
} Else {
- If ##class(TECH.StringUtils).Equals(MaatwerkProduct.GeefVariant(), Variant.LegraboxPure, Variant.Taorbox, Variant.MatStandaard, Variant.Merivobox) { //Voor Variant.TandemboxAntaro, Variant.TandemboxMengvorm ontbreken nog te veel vertalingen, daarom terugvallen op Engels, probeer maar eens deze method met product 3000783 en taal 'IT'
+ If ##class(TECH.StringUtils).Equals(MaatwerkProduct.GeefVariant(), Variant.LegraboxPure, Variant.Taorbox, Variant.MatStandaard, Variant.Merivobox) { //Voor Variant.TandemboxAntaro, Variant.TandemboxMengvorm ontbreken nog te veel vertalingen (Prod.GAMeta.BT...TaalOms tabellen), daarom terugvallen op Engels, probeer maar eens deze method met product 3000783 en taal 'IT'
Set Langtekst = ..GeefLangtekst(MaatwerkProduct.GeefIngegevenKenmerken(),Taal)
} Else {
Set Langtekst = ##class(Prod.ProductTekst).GeefLangtekstObject(PRNr,Taal)