Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/TBXLadeCodeBepaler.cls.xml
===================================================================
diff -u -r35863 -r36122
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/TBXLadeCodeBepaler.cls.xml	(.../TBXLadeCodeBepaler.cls.xml)	(revision 35863)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/TBXLadeCodeBepaler.cls.xml	(.../TBXLadeCodeBepaler.cls.xml)	(revision 36122)
@@ -32,7 +32,12 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim Index = Klasse_"-"_Uittrekbaarheid_"-"_IsBinnenlade_"-"_ZijkantHoogte_"-"_RugHoogte
+	#dim LadeType As %String = "L"
+	If IsBinnenlade {
+		Set LadeType = "B"
+	}
+	
+	#dim Index = Klasse_"-"_Uittrekbaarheid_"-"_LadeType_"-"_ZijkantHoogte_"-"_RugHoogte
 
 	#dim LadeCode As %String = ""
 	#dim idxLadeCode As %String = ""
@@ -43,6 +48,7 @@
 			Set LadeCode = idxLadeCode
 		}
 	}
+	
 	Quit LadeCode
 ]]></Implementation>
 </Method>