Index: BL/Prod/OptiBox/Diverse.cls.xml
===================================================================
diff -u -r70254 -r70436
--- BL/Prod/OptiBox/Diverse.cls.xml	(.../Diverse.cls.xml)	(revision 70254)
+++ BL/Prod/OptiBox/Diverse.cls.xml	(.../Diverse.cls.xml)	(revision 70436)
@@ -106,12 +106,8 @@
     . Quit:Aantal<1
 	. 
 	. If Type="OPTI" Do
-	. . If ((MachineID = "?") && (SnijPrioriteit = "-1")) { //Komt voor bij 'herbereken verpakking' opdracht via admin
-	. . 	Set pxStatus=##class(BL.Prod.OptiBox.Optimize).OneBox($$$bdgProduct, PRNr, , Aantal, BasisRef , PRNr,.CallBack,SnijPrioriteit,PPSOutput,MachineID)
-	. . } Else {
-	. . 	Set DoosService = ##class(APPS.Verpakking.DoosService).%New()
-	. . 	Do DoosService.GeefDoos($$$bdgProduct, "", MachineID, Aantal, "", PRNr, SnijPrioriteit, BasisRef, .CallBack, "")
-	. . }
+	. . Set DoosService = ##class(APPS.Verpakking.DoosService).%New()
+	. . Do DoosService.GeefDoos($$$bdgProduct, "", MachineID, Aantal, "", PRNr, SnijPrioriteit, BasisRef, .CallBack, "")
  	.
  	. If Type="KAD" Do
  	. . Set pxStatus=##class(BL.PPS.KAD.OptiBox).%New().SnijOne(PRNr, Aantal , 1, BasisRef, .CallBack, SnijPrioriteit, PPSOutput, MachineID)
Index: APPS/Verpakking/DoosFactory.cls.xml
===================================================================
diff -u -r70302 -r70436
--- APPS/Verpakking/DoosFactory.cls.xml	(.../DoosFactory.cls.xml)	(revision 70302)
+++ APPS/Verpakking/DoosFactory.cls.xml	(.../DoosFactory.cls.xml)	(revision 70436)
@@ -28,7 +28,7 @@
 		ElseIf (ReceptNaam = "Vouw errond doos") { Set Doos = ##class(APPS.Verpakking.dto.VouwErrondDoos).%New() }
 	
 	} ElseIf ((ProductGroep = "OL") || (ProductGroep = "PR")) {
-		If (##class(TECH.StringUtils).Equals(ReceptNaam, "Afval los groep", "Antislipmat groep", "Kruidenrek groep", "Zilverbestekhouder groep")) { Set Doos = ##class(APPS.Verpakking.dto.VouwErrondDoos).%New() } 
+		If (##class(TECH.StringUtils).Equals(ReceptNaam, "Subvolume", "Afval los groep", "Antislipmat groep", "Kruidenrek groep", "Zilverbestekhouder groep")) { Set Doos = ##class(APPS.Verpakking.dto.VouwErrondDoos).%New() } 
 		ElseIf ((ReceptNaam = "FILLER") || (ReceptNaam = "Vulstuk")) { Set Doos = ##class(APPS.Verpakking.dto.Vulstuk).%New() }
 		ElseIf ((ReceptNaam = "FILLER SMALL") || (ReceptNaam = "Vulstuk klein")) { Set Doos = ##class(APPS.Verpakking.dto.VulstukKlein).%New() }
 		ElseIf ((ReceptNaam = "WRAPAROUND BUFFER") || (ReceptNaam = "Vouw errond doos met buffer")) { Set Doos = ##class(APPS.Verpakking.dto.VouwErrondDoosBuffer).%New() }