Index: DOM/PM/Maatwerk/TAX/impl/LosseComponentKorttekstBepaler.cls.xml =================================================================== diff -u -r55585 -r55586 --- DOM/PM/Maatwerk/TAX/impl/LosseComponentKorttekstBepaler.cls.xml (.../LosseComponentKorttekstBepaler.cls.xml) (revision 55585) +++ DOM/PM/Maatwerk/TAX/impl/LosseComponentKorttekstBepaler.cls.xml (.../LosseComponentKorttekstBepaler.cls.xml) (revision 55586) @@ -79,8 +79,7 @@ #dim FrontEindkapKleurCode As TECH.String = $Extract(##class(DOM.PM.enu.TAORFrontEindkapKleur).LogicalToDisplay(TAORKenmerken.FrontEindkapKleur), 1, 2) Set $Extract(Korttekst, 10, 11) = ##class(TECH.StringUtils).ToUpper(FrontEindkapKleurCode) } ElseIf (TAORKenmerken.ProductieWijze = ..Enum.ProductieWijze.Rug) { - #dim Rug As DOM.PM.Maatwerk.LadeInfo.impl.TAX.Rug = ..LadeInfoAPI.GeefLosseComponent(HalffabItemsBoom, TAORKenmerken, ..Enum.LosseComponent.Rug) - Set $Extract(Korttekst, 10, 11) = ##class(TECH.StringUtils).AlignRight(..GeefKantenbandKleur(Rug)," ",2) + Set $Extract(Korttekst, 10, 11) = " " } ElseIf (##class(TECH.StringUtils).Equals(TAORKenmerken.ProductieWijze, ..Enum.ProductieWijze.ZijkantLinks, ..Enum.ProductieWijze.ZijkantRechts)) { Set $Extract(Korttekst, 10, 11) = " " } Index: vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/TestLosseComponenten.cls.xml =================================================================== diff -u -r55585 -r55586 --- vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/TestLosseComponenten.cls.xml (.../TestLosseComponenten.cls.xml) (revision 55585) +++ vhUnitTest/DOM/PM/Maatwerk/TAX/impl/KorttekstBepaler/BepaalKorttekst/TestLosseComponenten.cls.xml (.../TestLosseComponenten.cls.xml) (revision 55586) @@ -141,24 +141,11 @@ ]]> - - + - - - -