Index: APPS/Verpakking/OrgaluxBonOptimizer.cls.xml
===================================================================
diff -u -r72273 -r72277
--- APPS/Verpakking/OrgaluxBonOptimizer.cls.xml	(.../OrgaluxBonOptimizer.cls.xml)	(revision 72273)
+++ APPS/Verpakking/OrgaluxBonOptimizer.cls.xml	(.../OrgaluxBonOptimizer.cls.xml)	(revision 72277)
@@ -245,10 +245,15 @@
  	}
  	
  	If (BesteStapeling = "") {
-		#dim FoutOmschrijving As %String = "Geen optimale stapeling gevonden voor bon "_ ..BonId _"."
-		Do ..Logger.ErrorMail("Optimaliseer bon orgalux", FoutOmschrijving)
-		Set Exception = ##class(TECH.Exceptions.DataNotFoundException).%New(FoutOmschrijving)	
-		Do ##class(TECH.ExceptionHandler).Throw(Exception)
+	 	#dim RequestVolumeVolledigePallet As APPS.Verpakking.dto.CubeIQ.Request = ..CubeIQRequestBuilder.MaakCubeIQRequest(BoxDataLijstVanTeStapelenDozen, ..#MaximumVerpakkingBreedteVoorEuropallet, ..#MaximumVerpakkingDiepteVoorEuropallet, ..#MaximumVerpakkingHoogteVoorEuropallet)
+ 		Set BesteStapeling = ..GeefParsedCubeIQResponse(RequestVolumeVolledigePallet)
+ 		
+ 		If (BesteStapeling = "") {
+			#dim FoutOmschrijving As %String = "Geen optimale stapeling gevonden voor bon "_ ..BonId _"."
+			Do ..Logger.ErrorMail("Optimaliseer bon orgalux", FoutOmschrijving)
+			Set Exception = ##class(TECH.Exceptions.DataNotFoundException).%New(FoutOmschrijving)	
+			Do ##class(TECH.ExceptionHandler).Throw(Exception)
+ 		}
 	}
 	
  	Quit BesteStapeling