Index: DOM/OV/impl/DataM/DataMBonlijnFactory.cls.xml
===================================================================
diff -u -r734 -r903
--- DOM/OV/impl/DataM/DataMBonlijnFactory.cls.xml	(.../DataMBonlijnFactory.cls.xml)	(revision 734)
+++ DOM/OV/impl/DataM/DataMBonlijnFactory.cls.xml	(.../DataMBonlijnFactory.cls.xml)	(revision 903)
@@ -1,9 +1,9 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:00:58">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-03-07 20:00:15">
 <Class name="DOM.OV.impl.DataM.DataMBonlijnFactory">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
-<TimeChanged>62109,43381.209616</TimeChanged>
+<TimeChanged>62157,72086.54276</TimeChanged>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="Create">
@@ -12,7 +12,7 @@
 <ReturnType>DOM.OV.Orderlijn</ReturnType>
 <Implementation><![CDATA[
 	Set Bonlijn = ""
-	Set Type = $P(LijnInfo,"\",17)
+	Set Type = $P($P(LijnInfo,"\",17),"#")
 	If (Type = ##class(DOM.OV.enu.BonlijnType).Product())
 	{
 		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMProductOrderlijn).%New(LijnNummer, LijnInfo)
@@ -27,12 +27,11 @@
 	}
 	ElseIf (Type [ ##class(DOM.OV.enu.BonlijnType).OrderVerwijzing())
 	{
-		// Moet nog een eigen klasse krijgen
-		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMOrderlijn).%New(LijnNummer, LijnInfo)
+		Set Orderlijn = ##class(DOM.OV.impl.DataM.DataMOrderVerwijzingOrderlijn).%New(LijnNummer, LijnInfo)
 	}
 	Quit Orderlijn
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="2175275529"/>
+<Checksum value="2747198335"/>
 </Export>