Index: vhUnitTest/APPS/TRANSP/Stapeling/impl/ColliOpPalletStapelaar/Optibox/RequestComposer/Compose/Test.cls.xml
===================================================================
diff -u -r35962 -r36132
--- vhUnitTest/APPS/TRANSP/Stapeling/impl/ColliOpPalletStapelaar/Optibox/RequestComposer/Compose/Test.cls.xml	(.../Test.cls.xml)	(revision 35962)
+++ vhUnitTest/APPS/TRANSP/Stapeling/impl/ColliOpPalletStapelaar/Optibox/RequestComposer/Compose/Test.cls.xml	(.../Test.cls.xml)	(revision 36132)
@@ -49,7 +49,7 @@
 	
 	Do $$$AssertEquals(cubeiqrequest.packagestoload.Count(),1)
 	Do $$$AssertEquals(cubeiqrequest.packagestoload.GetAt(1).id,"Packagetoload.1")
-	Do $$$AssertEquals(cubeiqrequest.packagestoload.GetAt(1).solutionid,"Stapelaar.Solution")
+	Do $$$AssertEquals(cubeiqrequest.packagestoload.GetAt(1).solutionid,"Referentie")
 	Do $$$AssertEquals(cubeiqrequest.packagestoload.GetAt(1).auto,"1")
 	Do $$$AssertEquals(cubeiqrequest.packagestoload.GetAt(1).packageid,"Package.1")
 	Do $$$AssertEquals(cubeiqrequest.packagestoload.GetAt(1).quantity,"2")
@@ -216,7 +216,7 @@
 	#dim cubeiqrequest As APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.cubeiq = RequestComposer.Compose(CollisOpPallet)
 	
 	Do $$$AssertEquals(cubeiqrequest.solutions.id, "Referentie")
-	Do $$$AssertEquals(cubeiqrequest.solutions.solutionid, "Stapelaar.Solution")
+	Do $$$AssertEquals(cubeiqrequest.solutions.solutionid, "Referentie")
 	Do $$$AssertContains(cubeiqrequest.solutions.date, ..GeefHuidigeDatum())
 	Do $$$AssertEquals(cubeiqrequest.solutions.stage, "1")
 ]]></Implementation>
@@ -230,14 +230,14 @@
 	#dim cubeiqrequest As APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.cubeiq = RequestComposer.Compose(CollisOpPallet)
 	
 	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(1).id, "Stapelaar.EuroPallet")
-	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(1).solutionid, "Stapelaar.Solution")
+	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(1).solutionid, "Referentie")
 	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(1).auto, "0")
 	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(1).containerid, "Stapelaar.EuroPallet")
 	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(1).containernum, "1")
 	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(1).sequence, "1")
 
 	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(2).id, "Stapelaar.WegwerpPallet")
-	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(2).solutionid, "Stapelaar.Solution")
+	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(2).solutionid, "Referentie")
 	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(2).auto, "0")
 	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(2).containerid, "Stapelaar.WegwerpPallet")
 	Do $$$AssertEquals(cubeiqrequest.containerstoload.GetAt(2).containernum, "2")
Index: APPS/TRANSP/Stapeling/impl/ColliOpPalletStapelaar/Optibox/RequestComposer.cls.xml
===================================================================
diff -u -r35962 -r36132
--- APPS/TRANSP/Stapeling/impl/ColliOpPalletStapelaar/Optibox/RequestComposer.cls.xml	(.../RequestComposer.cls.xml)	(revision 35962)
+++ APPS/TRANSP/Stapeling/impl/ColliOpPalletStapelaar/Optibox/RequestComposer.cls.xml	(.../RequestComposer.cls.xml)	(revision 36132)
@@ -32,15 +32,15 @@
 	Set Requestcubeiq.containers = ..VoegToePalletFormaten(CollisOpPallet.Settings.PalletFormaten)
 	
 	Set Requestcubeiq.solutions = ..GeefSolution(CollisOpPallet.Referentie)
-	Set Requestcubeiq.containerstoload = ..GeefContainersToLoad()
+	Set Requestcubeiq.containerstoload = ..GeefContainersToLoad(CollisOpPallet.Referentie)
 	
 	#dim CollisOpPalletIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(CollisOpPallet.Collis)
 	while CollisOpPalletIterator.HasNext()
 	{
 		#dim ColliOpPallet As APPS.TRANSP.Stapeling.dto.ColliOpPallet = CollisOpPalletIterator.Next()
 		
 		Do Requestcubeiq.packages.Insert(..MaakPackage(ColliOpPallet))
-		Do Requestcubeiq.packagestoload.Insert(..MaakPackageToLoad(ColliOpPallet))
+		Do Requestcubeiq.packagestoload.Insert(..MaakPackageToLoad(ColliOpPallet, CollisOpPallet.Referentie))
 		Set Requestcubeiq.orientations = ..MaakOrientations(ColliOpPallet)
 	}
 	
@@ -99,13 +99,13 @@
 </Method>
 
 <Method name="MaakPackageToLoad">
-<FormalSpec>ColliOpPallet:APPS.TRANSP.Stapeling.dto.ColliOpPallet</FormalSpec>
+<FormalSpec>ColliOpPallet:APPS.TRANSP.Stapeling.dto.ColliOpPallet,Referentie:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.packagetoload</ReturnType>
 <Implementation><![CDATA[
 	#dim cubeiqPackageToLoad As APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.packagetoload = ##class(APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.packagetoload).%New()
 	Set cubeiqPackageToLoad.id = "Packagetoload." _ColliOpPallet.ProductID
-	Set cubeiqPackageToLoad.solutionid = "Stapelaar.Solution"
+	Set cubeiqPackageToLoad.solutionid = Referentie
 	Set cubeiqPackageToLoad.auto = "1"
 	Set cubeiqPackageToLoad.packageid = "Package." _ColliOpPallet.ProductID
 	Set cubeiqPackageToLoad.quantity = ColliOpPallet.Aantal
@@ -247,14 +247,15 @@
 <Implementation><![CDATA[
 	#dim solution As APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.solution = ##class(APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.solution).%New()
 	Set solution.id = Referentie
-	Set solution.solutionid = "Stapelaar.Solution"
+	Set solution.solutionid = Referentie
 	Set solution.date = ..GeefHuidigeDatum()
 	Set solution.stage = "1"
 	Quit solution
 ]]></Implementation>
 </Method>
 
 <Method name="GeefContainersToLoad">
+<FormalSpec>Referentie:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
@@ -264,7 +265,7 @@
 	#dim ContainerToLoad As APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.containertoload = ##class(APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.containertoload).%New()
 	Set ContainerToLoad.id = "Stapelaar.EuroPallet"
 	Set ContainerToLoad.containerid = "Stapelaar.EuroPallet"
-	Set ContainerToLoad.solutionid = "Stapelaar.Solution"
+	Set ContainerToLoad.solutionid = Referentie
 	Set ContainerToLoad.auto = "0"
 	Set ContainerToLoad.containernum = "1"
 	Set ContainerToLoad.sequence = "1"
@@ -273,7 +274,7 @@
 	Set ContainerToLoad = ##class(APPS.TRANSP.Stapeling.impl.ColliOpPalletStapelaar.Optibox.XML.Request.containertoload).%New()
 	Set ContainerToLoad.id = "Stapelaar.WegwerpPallet"
 	Set ContainerToLoad.containerid = "Stapelaar.WegwerpPallet"
-	Set ContainerToLoad.solutionid = "Stapelaar.Solution"
+	Set ContainerToLoad.solutionid = Referentie
 	Set ContainerToLoad.auto = "0"
 	Set ContainerToLoad.containernum = "2"
 	Set ContainerToLoad.sequence = "2"