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))
}
]]>