Index: APPS/Verpakking/DoosAanvuller.cls.xml
===================================================================
diff -u -r71616 -r72160
--- APPS/Verpakking/DoosAanvuller.cls.xml (.../DoosAanvuller.cls.xml) (revision 71616)
+++ APPS/Verpakking/DoosAanvuller.cls.xml (.../DoosAanvuller.cls.xml) (revision 72160)
@@ -46,13 +46,9 @@
Set BasisDoos.Height = ##class(TECH.Math).Round(BasisDoos.Height,0)
Set BasisDoos.Width = ##class(TECH.Math).Round(BasisDoos.Width,0)
- Try {
- //XS karton is voorlopig enkel voor kartonverpakkingen voor lades
- If (..HeeftXSKartonVoorLades(ProductId)) {
- Set BasisDoos.LogoPrint = "XS"
- }
- } Catch {
- #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+ //XS karton is voorlopig enkel voor kartonverpakkingen voor lades
+ If (..HeeftXSKartonVoorLades(ProductId)) {
+ Set BasisDoos.LogoPrint = "XS"
}
If ($$$Not(MachineId = ##class(APPS.Verpakking.enu.MachineID).VH()) && (ProductGroep = "PR") && $$$Not(BasisDoos.LogoPrint = "XS")) {
@@ -73,8 +69,7 @@
ProductId:%String
1