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)