Index: APPS/Halux/common/impl/SequentieService/HoekprofielPositieBepaler.cls.xml
===================================================================
diff -u -r57148 -r57818
--- APPS/Halux/common/impl/SequentieService/HoekprofielPositieBepaler.cls.xml	(.../HoekprofielPositieBepaler.cls.xml)	(revision 57148)
+++ APPS/Halux/common/impl/SequentieService/HoekprofielPositieBepaler.cls.xml	(.../HoekprofielPositieBepaler.cls.xml)	(revision 57818)
@@ -33,16 +33,17 @@
 	#dim Bodem As DOM.PM.Maatwerk.LadeInfo.Bodem = Lade.GeefBodemIterator().Next()
 	#dim Zijkant As DOM.PM.Maatwerk.LadeInfo.Zijkant = Lade.GeefZijkantIterator().Next()
 	
-	#dim BreedteInMmBodem As TECH.Decimal = Bodem.GeefBreedteInMM()
+	#dim HoogteZijkant As DOM.PM.enu.TAORZijkantHoogte = Zijkant.GeefHoogte()
 	#dim HoogteInMmZijkant As TECH.Decimal = Zijkant.GeefHoogteInMM()
+	#dim BreedteInMmBodem As TECH.Decimal = Bodem.GeefBreedteInMM()
 	#dim BruikbareRuimte As TECH.Decimal = (BreedteInMmBodem - (HoogteInMmZijkant * 2))
 	
 	If (BruikbareRuimte < 100) {
-		Set HoekprofielPositieCode = "GEEN"		// Er zullen geen hoekprofielen gebruikt worden, maar een kartonnen strookje
+		Set HoekprofielPositieCode = "GEEN"					// Er zullen geen hoekprofielen gebruikt worden, maar een kartonnen strookje
 	} ElseIf (BruikbareRuimte < 200) {
-		Set HoekprofielPositieCode = "F*"		// Er zullen 2 hoekprofielen geschrankt gebruikt worden
+		Set HoekprofielPositieCode = HoogteZijkant_"*"		// Er zullen 2 hoekprofielen geschrankt gebruikt worden
 	} Else {
-		Set HoekprofielPositieCode = "F"		// Er zullen 2 hoekprofielen naast elkaar gebruikt worden
+		Set HoekprofielPositieCode = HoogteZijkant			// Er zullen 2 hoekprofielen naast elkaar gebruikt worden
 	}
 	
 	Quit HoekprofielPositieCode
Index: vhUnitTest/APPS/Halux/common/impl/SequentieService/HoekprofielPositieBepaler/Test.cls.xml
===================================================================
diff -u -r57462 -r57818
--- vhUnitTest/APPS/Halux/common/impl/SequentieService/HoekprofielPositieBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 57462)
+++ vhUnitTest/APPS/Halux/common/impl/SequentieService/HoekprofielPositieBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 57818)
@@ -42,7 +42,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: HoekprofielPositieCode is F* indien vrije ruimte &gt; 100 en &lt; 200">
+<Method name="Test: HoekprofielPositieCode is HoogteZijkant* indien vrije ruimte &gt; 100 en &lt; 200">
 <Implementation><![CDATA[
 	Set ..TAORKenmerken.CorpusBinnenbreedte = 500
 	Set ..TAORKenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).C()
@@ -53,11 +53,11 @@
 		
 	#dim HoekprofielPositieBepaler As APPS.Halux.common.impl.SequentieService.HoekprofielPositieBepaler = ..GeefHoekprofielPositieBepaler()
 	
-	Do $$$AssertEquals(HoekprofielPositieBepaler.GeefHoekprofielPositieCode(TAORboxStub), "F*")
+	Do $$$AssertEquals(HoekprofielPositieBepaler.GeefHoekprofielPositieCode(TAORboxStub), "C*")
 ]]></Implementation>
 </Method>
 
-<Method name="Test: HoekprofielPositieCode is F indien vrije ruimte &gt; 200">
+<Method name="Test: HoekprofielPositieCode is HoogteZijkant indien vrije ruimte &gt; 200">
 <Implementation><![CDATA[
 	Set ..TAORKenmerken.CorpusBinnenbreedte = 600
 	Set ..TAORKenmerken.LadeHoogte = ##class(DOM.PM.enu.TAORLadeHoogte).C()
@@ -68,7 +68,7 @@
 		
 	#dim HoekprofielPositieBepaler As APPS.Halux.common.impl.SequentieService.HoekprofielPositieBepaler = ..GeefHoekprofielPositieBepaler()
 	
-	Do $$$AssertEquals(HoekprofielPositieBepaler.GeefHoekprofielPositieCode(TAORboxStub), "F")
+	Do $$$AssertEquals(HoekprofielPositieBepaler.GeefHoekprofielPositieCode(TAORboxStub), "C")
 ]]></Implementation>
 </Method>