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 -