Index: DOM/PM/Maatwerk/MVX/impl/KorttekstBepaler.cls.xml
===================================================================
diff -u -r64369 -r64398
--- DOM/PM/Maatwerk/MVX/impl/KorttekstBepaler.cls.xml (.../KorttekstBepaler.cls.xml) (revision 64369)
+++ DOM/PM/Maatwerk/MVX/impl/KorttekstBepaler.cls.xml (.../KorttekstBepaler.cls.xml) (revision 64398)
@@ -131,7 +131,7 @@
} ElseIf (IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.Probox) {
Set VerpakkingCode = "X"
} If (IngegevenKenmerken.VerpakkingType = ..Enum.VerpakkingType.V1) {
- Set VerpakkingCode = ""
+ Set VerpakkingCode = " "
}
Quit VerpakkingCode
Index: vhUnitTest/DOM/PM/Maatwerk/MVX/impl/KorttekstBepaler/Test.cls.xml
===================================================================
diff -u -r64370 -r64398
--- vhUnitTest/DOM/PM/Maatwerk/MVX/impl/KorttekstBepaler/Test.cls.xml (.../Test.cls.xml) (revision 64370)
+++ vhUnitTest/DOM/PM/Maatwerk/MVX/impl/KorttekstBepaler/Test.cls.xml (.../Test.cls.xml) (revision 64398)
@@ -277,6 +277,7 @@
Set EindPositie = $$$If((EindPositie = 0), BeginPositie, EindPositie)
+ Do $$$AssertEquals($Length(Korttekst), 25)
Do $$$AssertEquals($Extract(Korttekst, BeginPositie, EindPositie), ControleKorttekst)
]]>
Index: DOM/PM/impl/MVXLangtekstCreator.cls.xml
===================================================================
diff -u -r64368 -r64398
--- DOM/PM/impl/MVXLangtekstCreator.cls.xml (.../MVXLangtekstCreator.cls.xml) (revision 64368)
+++ DOM/PM/impl/MVXLangtekstCreator.cls.xml (.../MVXLangtekstCreator.cls.xml) (revision 64398)
@@ -195,7 +195,7 @@
If (..IngegevenKenmerken.ZijwandType = ..Enum.ZijwandType.Boxcover) {
If (..IsInschuifElementZijkantNietMeegeleverd()) {
- Set ZijwandInfo = ZijwandInfo _ ..Vertaler.GeefVertaling(..GeefZijkantVertaalSleutelEigenInschuifElement())
+ Set ZijwandInfo = ZijwandInfo _ ..Vertaler.GeefVertaling("Reling_EigenInschuifElement")
} Else {
Set ZijwandInfo = ZijwandInfo _..Vertaler.GeefVertaling("BoxCover") _ " " _ ..Vertaler.GeefVertaling("MVXFreeMetGlasDiamant")
}
@@ -205,7 +205,7 @@
Set ZijwandInfo = ZijwandInfo _..Vertaler.GeefVertaling("Reling")
} ElseIf (..IngegevenKenmerken.ZijwandType = ..Enum.ZijwandType.RelingEnInschuifElement) {
If (..IsRelingZijkantNietMeegeleverd()) {
- Set ZijwandInfo = ZijwandInfo _ ..Vertaler.GeefVertaling(..GeefZijkantVertaalSleutelEigenInschuifElement())
+ Set ZijwandInfo = ZijwandInfo _ ..Vertaler.GeefVertaling("Reling_EigenInschuifElement")
} Else {
Set ZijwandInfo = ZijwandInfo _..Vertaler.GeefVertaling("Reling")
}
@@ -216,13 +216,6 @@
]]>
-
-1
-%String
-
-
-
1
%String
@@ -233,19 +226,19 @@
Set VoorwandVertaalSleutel = "Voorstuk_Gesloten"
} ElseIf (..IngegevenKenmerken.VoorwandType = ..Enum.VoorwandType.Reling) {
If ( ..IsInschuifElementVoorNietMeegeleverd()) {
- Set VoorwandVertaalSleutel = ..GeefVoorwandVertaalSleutelEigenRelingVooraan()
+ Set VoorwandVertaalSleutel = "Voorstuk_EigenReling"
} Else {
Set VoorwandVertaalSleutel = "Voorstuk_metReling"
}
} ElseIf (..IngegevenKenmerken.VoorwandType = ..Enum.VoorwandType.GlasHoog) {
If ( ..IsInschuifElementVoorNietMeegeleverd()) {
- Set VoorwandVertaalSleutel = ..GeefVoorwandVertaalSleutelEigenInschuifElement()
+ Set VoorwandVertaalSleutel = "Voorstuk_EigenInschuifElement"
} Else {
Set VoorwandVertaalSleutel = "Voorstuk_metHoogInschuifElement"
}
} ElseIf (..IngegevenKenmerken.VoorwandType = ..Enum.VoorwandType.GlasLaag) {
If ( ..IsInschuifElementVoorNietMeegeleverd()) {
- Set VoorwandVertaalSleutel = ..GeefVoorwandVertaalSleutelEigenInschuifElement()
+ Set VoorwandVertaalSleutel = "Voorstuk_EigenInschuifElement"
} Else {
Set VoorwandVertaalSleutel = "Voorstuk_metLaagInschuifElement"
}
@@ -255,29 +248,13 @@
]]>
-
-1
-%String
-
-
-
-
-1
-%String
-
-
-
1
%String