Index: APPS/Verpakking/CubeIQRequestBuilder.cls.xml
===================================================================
diff -u -r72361 -r74784
--- APPS/Verpakking/CubeIQRequestBuilder.cls.xml	(.../CubeIQRequestBuilder.cls.xml)	(revision 72361)
+++ APPS/Verpakking/CubeIQRequestBuilder.cls.xml	(.../CubeIQRequestBuilder.cls.xml)	(revision 74784)
@@ -18,7 +18,7 @@
 </Property>
 
 <Property name="ProductAPI">
-<Type>DOM.PM.ProductAPI</Type>
+<Type>DOM.PM.impl.ProductAPI</Type>
 <Private>1</Private>
 </Property>
 
@@ -28,18 +28,18 @@
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..ProductAPI = ##class(DOM.DomeinContext).Instance().GeefProductAPI()
+	Set ..ProductAPI = ##class(DOM.PM.impl.ProductAPI).%New()
 	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="MaakCubeIQRequest">
-<FormalSpec>BoxDataLijst:%ListOfObjects,BreedteOverdoos:%Decimal,DiepteOverdoos:%Decimal,HoogteOverdoos:%Decimal,Partialloadonfloor:%Boolean=0,MinFillPercentage:%Decimal=0</FormalSpec>
+<FormalSpec>BoxDataLijst:%ListOfObjects,BreedteOverdoos:%Decimal,DiepteOverdoos:%Decimal,HoogteOverdoos:%Decimal,Partialloadonfloor:%Boolean=1,MinFillPercentage:%Decimal=0,CreateImages:%Boolean=0</FormalSpec>
 <ReturnType>APPS.Verpakking.dto.CubeIQ.Request</ReturnType>
 <Implementation><![CDATA[
-	Set CubeIQRequest = ##class(APPS.Verpakking.dto.CubeIQ.Request).%New()
 	#dim BoxDataIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(BoxDataLijst)
+	Set CubeIQRequest = ##class(APPS.Verpakking.dto.CubeIQ.Request).%New()
 	Set Products = ##class(APPS.Verpakking.dto.CubeIQ.Request.Products).%New()
 	Set ProductsToLoad = ##class(APPS.Verpakking.dto.CubeIQ.Request.ProductsToLoad).%New()
 	Set ProductList = ##class(%ListOfObjects).%New()
@@ -63,7 +63,7 @@
 	Set CubeIQRequest.cubeiq.settings = ..GeefCubeIQSettings()
 	Set CubeIQRequest.cubeiq.containers = ..GeefCubeIQContainers(BreedteOverdoos, DiepteOverdoos, HoogteOverdoos, Partialloadonfloor, MinFillPercentage)
 	Set CubeIQRequest.cubeiq.products = Products
-	Set CubeIQRequest.cubeiq.loads = ..GeefCubeIQLoads()
+	Set CubeIQRequest.cubeiq.loads = ..GeefCubeIQLoads(CreateImages)
 	Set CubeIQRequest.cubeiq.containerstoload = ..GeefCubeIQContainersToLoad()
 	Set CubeIQRequest.cubeiq.productstoload = ProductsToLoad
 	
@@ -82,7 +82,6 @@
 	Set CubeIQProduct.length = BoxData.Diepte + (3 * 6.7) //Grootorde kartondikte in rekening brengen
 	Set CubeIQProduct.width = BoxData.Breedte + (3 * 6.7) //Grootorde kartondikte in rekening brengen
 	Set CubeIQProduct.height = BoxData.Hoogte + (3 * 6.7) //Grootorde kartondikte in rekening brengen
-	;Set CubeIQProduct.weight = ..GeefGewichtVanProduct(BoxData.ObjRef)
 	Set CubeIQProduct.turnable = $$$True
 	Set CubeIQProduct.flatok = $$$True
 	Set CubeIQProduct.sideupok = $$$False //$Select(BoxData.Rotatie = "":$$$True, 1:##class(TECH.StringUtils).Contains(BoxData.Rotatie, "Y")) //kantelbaar op zijkant
@@ -112,6 +111,7 @@
 </Method>
 
 <Method name="GeefCubeIQLoads">
+<FormalSpec>CreateImages:%Boolean</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.Verpakking.dto.CubeIQ.Request.Loads</ReturnType>
 <Implementation><![CDATA[
@@ -120,6 +120,7 @@
 	
 	Set Load = ##class(APPS.Verpakking.dto.CubeIQ.Request.Load).%New()
 	Set Load.loadid = ..LoadId
+	Set Load.createimageoverride = CreateImages
 	
 	Do Loads.Insert(Load)
 	Set CubeIQLoads.load = Loads
@@ -164,7 +165,7 @@
 </Method>
 
 <Method name="GeefCubeIQContainers">
-<FormalSpec>Breedte:%Decimal,Diepte:%Decimal,Hoogte:%Decimal,Partialloadonfloor:%Boolean,MinFillPercentage:%Decimal=0</FormalSpec>
+<FormalSpec>Breedte:%Decimal,Diepte:%Decimal,Hoogte:%Decimal,Partialloadonfloor:%Boolean=0,MinFillPercentage:%Decimal=0</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.Verpakking.dto.CubeIQ.Request.Containers</ReturnType>
 <Implementation><![CDATA[
@@ -195,7 +196,7 @@
 <Method name="GeefKorttekst">
 <FormalSpec>ObjRef:%String</FormalSpec>
 <Private>1</Private>
-<ReturnType>TECH.Integer</ReturnType>
+<ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim Korttekst As %String = ObjRef
 	#dim BestaatProduct As DOM.PM.Product = ..ProductAPI.BestaatProduct(ObjRef)