Index: DOM/PM/Maatwerk/LBX/impl/KorttekstBepaler.cls.xml
===================================================================
diff -u -r50210 -r50701
--- DOM/PM/Maatwerk/LBX/impl/KorttekstBepaler.cls.xml (.../KorttekstBepaler.cls.xml) (revision 50210)
+++ DOM/PM/Maatwerk/LBX/impl/KorttekstBepaler.cls.xml (.../KorttekstBepaler.cls.xml) (revision 50701)
@@ -133,7 +133,7 @@
If $$$Not(..IngegevenKenmerken.FrontBevestiging = "") {
Set FrontBevestigingCode = ..IngegevenKenmerken.FrontBevestiging
- Set:(FrontBevestigingCode = "E-T") FrontBevestigingCode = "?"
+ Set:(FrontBevestigingCode=##class(DOM.PM.enu.LBXFrontBevestiging).ExpandoT()) FrontBevestigingCode = "T"
}
If (..IngegevenKenmerken.IsBinnenlade) {
Index: vhUnitTest/DOM/PM/KorttekstUtils/BepaalKorttekstLBX/TestFrontBevestigingCode.cls.xml
===================================================================
diff -u -r50607 -r50701
--- vhUnitTest/DOM/PM/KorttekstUtils/BepaalKorttekstLBX/TestFrontBevestigingCode.cls.xml (.../TestFrontBevestigingCode.cls.xml) (revision 50607)
+++ vhUnitTest/DOM/PM/KorttekstUtils/BepaalKorttekstLBX/TestFrontBevestigingCode.cls.xml (.../TestFrontBevestigingCode.cls.xml) (revision 50701)
@@ -11,7 +11,7 @@
Do ..VerwachteWaarden.SetAt("Z", ##class(DOM.PM.enu.LBXFrontBevestiging).Schroef())
Do ..VerwachteWaarden.SetAt("Z", ##class(DOM.PM.enu.LBXFrontBevestiging).Drevel())
Do ..VerwachteWaarden.SetAt("Z", ##class(DOM.PM.enu.LBXFrontBevestiging).EXPANDO())
- //Do ..VerwachteWaarden.SetAt("Z", ##class(DOM.PM.enu.LBXFrontBevestiging).ExpandoT())
+ Do ..VerwachteWaarden.SetAt("Z", ##class(DOM.PM.enu.LBXFrontBevestiging).ExpandoT())
Do ..AssertWaarden(IngegevenKenmerkenDto, ##class(DOM.PM.enu.LBXFrontBevestiging).ValueListIterator(), "FrontBevestiging", 6,6)
]]>
@@ -25,7 +25,7 @@
Do ..VerwachteWaarden.SetAt("S", ##class(DOM.PM.enu.LBXFrontBevestiging).Schroef())
Do ..VerwachteWaarden.SetAt("D", ##class(DOM.PM.enu.LBXFrontBevestiging).Drevel())
Do ..VerwachteWaarden.SetAt("E", ##class(DOM.PM.enu.LBXFrontBevestiging).EXPANDO())
- //Do ..VerwachteWaarden.SetAt("???", ##class(DOM.PM.enu.LBXFrontBevestiging).ExpandoT())
+ Do ..VerwachteWaarden.SetAt("T", ##class(DOM.PM.enu.LBXFrontBevestiging).ExpandoT())
Do ..AssertWaarden(IngegevenKenmerkenDto, ##class(DOM.PM.enu.LBXFrontBevestiging).ValueListIterator(), "FrontBevestiging", 6,6)
]]>
@@ -35,12 +35,7 @@
PropertyNaam:%String,Waarde:%String
1
%Boolean
-
Index: DOM/PM/Maatwerk/TAX/impl/StandaardKorttekstBepaler.cls.xml
===================================================================
diff -u -r50218 -r50701
--- DOM/PM/Maatwerk/TAX/impl/StandaardKorttekstBepaler.cls.xml (.../StandaardKorttekstBepaler.cls.xml) (revision 50218)
+++ DOM/PM/Maatwerk/TAX/impl/StandaardKorttekstBepaler.cls.xml (.../StandaardKorttekstBepaler.cls.xml) (revision 50701)
@@ -61,7 +61,7 @@
Set:($$$Not(TAORKenmerken.FrontBevestiging = "")) FrontBevestigingCode = TAORKenmerken.FrontBevestiging
Set:(TAORKenmerken.IsBinnenlade) FrontBevestigingCode = "Z"
- Set:(FrontBevestigingCode = "E-T") FrontBevestigingCode = "?"
+ Set:(FrontBevestigingCode=##class(DOM.PM.enu.TAORFrontBevestiging).ExpandoT()) FrontBevestigingCode = "T"
Quit FrontBevestigingCode
]]>
Index: vhUnitTest/DOM/PM/KorttekstUtils/BepaalKorttekstTAOR/TestFrontBevestigingCode.cls.xml
===================================================================
diff -u -r50607 -r50701
--- vhUnitTest/DOM/PM/KorttekstUtils/BepaalKorttekstTAOR/TestFrontBevestigingCode.cls.xml (.../TestFrontBevestigingCode.cls.xml) (revision 50607)
+++ vhUnitTest/DOM/PM/KorttekstUtils/BepaalKorttekstTAOR/TestFrontBevestigingCode.cls.xml (.../TestFrontBevestigingCode.cls.xml) (revision 50701)
@@ -10,7 +10,7 @@
do ..VerwachteWaarden.SetAt("Z", ..Enum.FrontBevestiging.Schroef)
do ..VerwachteWaarden.SetAt("Z", ..Enum.FrontBevestiging.Drevel)
do ..VerwachteWaarden.SetAt("Z", ..Enum.FrontBevestiging.Expando)
- //do ..VerwachteWaarden.SetAt("Z", ..Enum.FrontBevestiging.ExpandoT)
+ do ..VerwachteWaarden.SetAt("Z", ..Enum.FrontBevestiging.ExpandoT)
do ..AssertWaarden(..TAORKenmerken, ##class(DOM.PM.enu.TAORFrontBevestiging).ValueListIterator(), ..Enum.KenmerkNaam.FrontBevestiging, 6, 6)
]]>
@@ -21,7 +21,7 @@
do ..VerwachteWaarden.SetAt("S", ..Enum.FrontBevestiging.Schroef)
do ..VerwachteWaarden.SetAt("D", ..Enum.FrontBevestiging.Drevel)
do ..VerwachteWaarden.SetAt("E", ..Enum.FrontBevestiging.Expando)
- //do ..VerwachteWaarden.SetAt("???", ..Enum.FrontBevestiging.ExpandoT)
+ do ..VerwachteWaarden.SetAt("T", ..Enum.FrontBevestiging.ExpandoT)
do ..AssertWaarden(..TAORKenmerken, ##class(DOM.PM.enu.TAORFrontBevestiging).ValueListIterator(), ..Enum.KenmerkNaam.FrontBevestiging, 6, 6)
]]>
@@ -31,12 +31,7 @@
PropertyNaam:%String,Waarde:%String
1
%Boolean
-