Index: BL/PR/GA/TandemBox.cls.xml
===================================================================
diff -u -r98 -r104
--- BL/PR/GA/TandemBox.cls.xml	(.../TandemBox.cls.xml)	(revision 98)
+++ BL/PR/GA/TandemBox.cls.xml	(.../TandemBox.cls.xml)	(revision 104)
@@ -712,6 +712,22 @@
 ]]></Implementation>
 </Method>
 
+<Method name="RHFromLC">
+<Description>
+Geeft de RugHoogte vertrekkende van de LadeCode  
+Bijvoorbeeld :  voor LC = "MY/Z"  geeft RugHoogte = "M"  
+                voor LC = "DLS2"  geeft RugHoogte = "D" </Description>
+<ClassMethod>1</ClassMethod>
+<FormalSpec>LadeCode:%String</FormalSpec>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Set objLade=##class(Prod.GAMeta.BT.LadeCode).%OpenId(LadeCode)
+	Quit:('$IsObject(objLade)) ""
+	Quit objLade.TBKenm.GetAt("TBRugHoogte")
+]]></Implementation>
+</Method>
+
 <Method name="CalcSPZijwandHoogte">
 <Description>
 Geeft de hoogte van de binnenzijwand van een spoelbaklade.