Index: DOM/LEV/impl/DataM/DataMToeleveringLijnFactory.cls.xml
===================================================================
diff -u -r946 -r994
--- DOM/LEV/impl/DataM/DataMToeleveringLijnFactory.cls.xml	(.../DataMToeleveringLijnFactory.cls.xml)	(revision 946)
+++ DOM/LEV/impl/DataM/DataMToeleveringLijnFactory.cls.xml	(.../DataMToeleveringLijnFactory.cls.xml)	(revision 994)
@@ -1,28 +1,28 @@
 <?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-03-10 14:03:41">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-03-24 11:31:57">
 <Class name="DOM.LEV.impl.DataM.DataMToeleveringLijnFactory">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
-<TimeChanged>62160,50695.455621</TimeChanged>
+<TimeChanged>62174,41603.646354</TimeChanged>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="Create">
 <ClassMethod>1</ClassMethod>
-<FormalSpec>LijnNummer:%Integer,LijnInfo:%String</FormalSpec>
+<FormalSpec>Toelevering:DOM.LEV.Toelevering,LijnNummer:%Integer,LijnInfo:%String</FormalSpec>
 <ReturnType>DOM.LEV.impl.DataM.DataMToeleveringLijn</ReturnType>
 <Implementation><![CDATA[
 	Set Type = $P(LijnInfo,"\",17)
 	If (Type = ##class(DOM.LEV.enu.ToeleveringLijnType).Product())
 	{
-		Set ToeleveringLijn = ##class(DOM.LEV.impl.DataM.DataMProductToeleveringLijn).%New(LijnNummer, LijnInfo)
+		Set ToeleveringLijn = ##class(DOM.LEV.impl.DataM.DataMProductToeleveringLijn).%New(Toelevering, LijnNummer, LijnInfo)
 	}
 	ElseIf (Type = ##class(DOM.LEV.enu.ToeleveringLijnType).Tekst())
 	{
-		Set ToeleveringLijn = ##class(DOM.LEV.impl.DataM.DataMTekstToeleveringLijn).%New(LijnNummer, LijnInfo)
+		Set ToeleveringLijn = ##class(DOM.LEV.impl.DataM.DataMTekstToeleveringLijn).%New(Toelevering, LijnNummer, LijnInfo)
 	}
 	Quit ToeleveringLijn
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="2461169086"/>
+<Checksum value="1055208849"/>
 </Export>