Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/Inhoud.cls.xml =================================================================== diff -u -r66787 -r66788 --- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/Inhoud.cls.xml (.../Inhoud.cls.xml) (revision 66787) +++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/Inhoud.cls.xml (.../Inhoud.cls.xml) (revision 66788) @@ -325,7 +325,7 @@ ElseIf ($Extract(DetailLijn.GeefOmschrijving().GeefTekst(),1,5) = "Greep") { Do BoldBepaler.ZetBoldKaraktersVoorTbxGreep(DetailLijn) } ElseIf ($Extract(DetailLijn.GeefOmschrijving().GeefTekst(),1,10) = "Stalen rug") { Do BoldBepaler.ZetBoldKaraktersVoorTbxStalenRug(DetailLijn) } ElseIf ($Extract(DetailLijn.GeefOmschrijving().GeefTekst(),1,9) = "Rugstrook") { Do BoldBepaler.ZetBoldKaraktersVoorTbxRugstrook(DetailLijn) } - ElseIf ($Extract(DetailLijn.GeefOmschrijving().GeefTekst(),1,9) = "Rughouder") { Do BoldBepaler.ZetBoldKaraktersVoorTbxRugstrook(DetailLijn) } + ElseIf ($Extract(DetailLijn.GeefOmschrijving().GeefTekst(),1,9) = "Rughouder") { Do BoldBepaler.ZetBoldKaraktersVoorTbxRugHouder(DetailLijn) } ElseIf ($Extract(DetailLijn.GeefOmschrijving().GeefTekst(),1,3) = "Mat") { Do BoldBepaler.ZetBoldKaraktersVoorTbxGekoppeldeMat(DetailLijn) } } } Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/Inhoud/BoldBepaler.cls.xml =================================================================== diff -u -r66787 -r66788 --- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/Inhoud/BoldBepaler.cls.xml (.../BoldBepaler.cls.xml) (revision 66787) +++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/Inhoud/BoldBepaler.cls.xml (.../BoldBepaler.cls.xml) (revision 66788) @@ -161,7 +161,7 @@ Set LadeHoogteEnTekst = $$$Trim($Piece(DetailLijn.GeefOmschrijving().GeefTekst(),",",2)) If (##class(TECH.StringUtils).Contains(LadeHoogteEnTekst, "(voor lage rug)")) { - Set ItemNieuweOmschrijving = $Piece(DetailLijn.GeefOmschrijving().GeefTekst(),",",1)_", "_$Piece(DetailLijn.GeefOmschrijving().GeefTekst(),",",2)_", "_""_LadeHoogteEnTekst_""_$Piece(DetailLijn.GeefOmschrijving().GeefTekst(), LadeHoogteEnTekst,2) + Set ItemNieuweOmschrijving = $Piece(DetailLijn.GeefOmschrijving().GeefTekst(),",",1)_", "_""_LadeHoogteEnTekst_""_$Piece(DetailLijn.GeefOmschrijving().GeefTekst(), LadeHoogteEnTekst,2) Do DetailLijn.ZetOmschrijving(##class(APPS.common.Document.impl.TagBasedTekst).%New(ItemNieuweOmschrijving)) } ]]>