Index: WSimpl/Vhisie4/Winkelkar/MultipersonalityPrijsWebservice/BerekenProductPrijzen.cls.xml
===================================================================
diff -u -r62093 -r62102
--- WSimpl/Vhisie4/Winkelkar/MultipersonalityPrijsWebservice/BerekenProductPrijzen.cls.xml	(.../BerekenProductPrijzen.cls.xml)	(revision 62093)
+++ WSimpl/Vhisie4/Winkelkar/MultipersonalityPrijsWebservice/BerekenProductPrijzen.cls.xml	(.../BerekenProductPrijzen.cls.xml)	(revision 62102)
@@ -72,13 +72,20 @@
 		Set Request.CalcPrice = $$$True
 		Set Request.CalcStock = $$$False
 		Set Request.MessageId = MessageId
-		Set Request.Lines = BerekenProductPrijzenRequest.Lines
 		
-		#dim LinesIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Request.Lines)
+		#dim LinesIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(BerekenProductPrijzenRequest.Lines)
 		
 		While (LinesIterator.HasNext()) {
-			#dim Line As AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceLineInputDC = LinesIterator.Next()
-			Set Line.MessageId = MessageId
+			#dim Line As WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.PrijsLijnInput = LinesIterator.Next()
+			Set NewLine = ##class(AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceLineInputDC).%New()
+			Set NewLine.CostPrice = Line.CostPrice
+			Set NewLine.CurrencyCode = Line.CurrencyCode
+			Set NewLine.ItemId = Line.ItemId
+			Set NewLine.Qty = Line.Qty
+			Set NewLine.SalesUnit = Line.SalesUnit
+			Set NewLine.TransDate = Line.TransDate
+			Set NewLine.MessageId = MessageId
+			Do Request.Lines.Insert(NewLine)
 		}
 		
 		;haal korting voor klant
@@ -101,7 +108,7 @@
 			
 			Set Product.Price = Product.Price * Markup
 			Set Product.Price = Product.Price - (Product.Price * KortingPercentage)
-	}
+		}
 	} Catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
 		Do ##class(vhLib.Logger).%New().LogExceptie(Exception)
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/MultipersonalityPrijsWebservice/BerekenProductPrijzen/Test.cls.xml
===================================================================
diff -u -r62088 -r62102
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/MultipersonalityPrijsWebservice/BerekenProductPrijzen/Test.cls.xml	(.../Test.cls.xml)	(revision 62088)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/MultipersonalityPrijsWebservice/BerekenProductPrijzen/Test.cls.xml	(.../Test.cls.xml)	(revision 62102)
@@ -3,6 +3,45 @@
 <Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.MultipersonalityPrijsWebservice.BerekenProductPrijzen.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Method name="Test Uitvoeren van methodes bij verwerking zonder product">
+<Implementation><![CDATA[
+	Set MessageManagerMock = ##class(vhTest.Mock.AXimpl.MessageManager).%New()
+	Set SalesPriceSeriveMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesPriceOut.SalesPriceService).%New()
+	Set PrijsFactorBepalerFactoryMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService.impl.PrijsFactorBepalerFactory).%New()
+	Set PrijsFactorBepalerMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService.PrijsFactorBepaler).%New()
+	Set KortingServiceMock = ##class(vhTest.Mock.DOM.VKP.KortingService).%New()
+	Set PersonalityRepositoryMock = ##class(vhTest.Mock.DOM.common.impl.PersonalityRepository).%New()
+	
+	#dim Personality As DOM.common.Personality = ##class(DOM.common.HaefeleDEPersonality).Instance()
+	#dim Factor As TECH.Decimal = 1.50
+	#dim MessageID As %String = "{9e6288b3-38cc-41d8-8dc9-3bbfeaf5c858}"
+	
+	#dim BerekenProductPrijzenRequest As WS.Vhisie4.Winkelkar.BerekenProductPrijzenRequest = ..MaakBerekenProductRequestZonderProduct()
+	#dim Request As AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceHeaderInputDC = ..MaakRequest(BerekenProductPrijzenRequest.Lines, Personality, MessageID)
+	#dim Output As AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC = ..MaakOutputZonderProduct()
+	
+	Set KortingInfo = ##class(DOM.VKP.dto.KortingInfo).%New()
+	Set KortingInfo.Percentage = 0.23
+	
+	Do PersonalityRepositoryMock.VerwachtMethodCall("GeefViaID", 33).DanReturn(Personality)
+	Do PrijsFactorBepalerFactoryMock.VerwachtMethodCall("GeefPrijsFactorBepaler", Personality).DanReturn(PrijsFactorBepalerMock)
+	Do PrijsFactorBepalerMock.VerwachtMethodCall("GeefOrgaluxPrijsFactor").DanReturn(Factor)
+	Do MessageManagerMock.VerwachtMethodCall("GenerateID").DanReturn(MessageID)
+	Do SalesPriceSeriveMock.VerwachtMethodCall("getPrice",$$$ElkeWaarde).DanReturn(Output)
+	Do KortingServiceMock.VerwachtMethodCall("GeefKortingInfo",$$$ElkeWaarde).ExactAantalKeer(0)
+	
+	Set BerekenProductPrijzen = ##class(WSimpl.Vhisie4.Winkelkar.MultipersonalityPrijsWebservice.BerekenProductPrijzen).%New(SalesPriceSeriveMock, MessageManagerMock, PrijsFactorBepalerFactoryMock, KortingServiceMock, PersonalityRepositoryMock)
+	Do BerekenProductPrijzen.BerekenProductPrijzen(BerekenProductPrijzenRequest)
+	
+	Do MessageManagerMock.Verifieer()
+	Do SalesPriceSeriveMock.Verifieer()
+	Do KortingServiceMock.Verifieer()
+	Do PersonalityRepositoryMock.Verifieer()
+	Do PrijsFactorBepalerFactoryMock.Verifieer()
+	Do PrijsFactorBepalerMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="Test Uitvoeren van methodes bij verwerking met 1 product">
 <Implementation><![CDATA[
 	Set MessageManagerMock = ##class(vhTest.Mock.AXimpl.MessageManager).%New()
@@ -27,7 +66,7 @@
 	Do PrijsFactorBepalerFactoryMock.VerwachtMethodCall("GeefPrijsFactorBepaler", Personality).DanReturn(PrijsFactorBepalerMock)
 	Do PrijsFactorBepalerMock.VerwachtMethodCall("GeefOrgaluxPrijsFactor").DanReturn(Factor)
 	Do MessageManagerMock.VerwachtMethodCall("GenerateID").DanReturn(MessageID)
-	Do SalesPriceSeriveMock.VerwachtMethodCall("getPrice",..Matches.Object(Request)).DanReturn(Output)
+	Do SalesPriceSeriveMock.VerwachtMethodCall("getPrice",$$$ElkeWaarde).DanReturn(Output)
 	Do KortingServiceMock.VerwachtMethodCall("GeefKortingInfo",$$$ElkeWaarde).DanReturn(KortingInfo)
 	
 	Set BerekenProductPrijzen = ##class(WSimpl.Vhisie4.Winkelkar.MultipersonalityPrijsWebservice.BerekenProductPrijzen).%New(SalesPriceSeriveMock, MessageManagerMock, PrijsFactorBepalerFactoryMock, KortingServiceMock, PersonalityRepositoryMock)
@@ -42,6 +81,50 @@
 ]]></Implementation>
 </Method>
 
+<Method name="aTest gooien van exceptie bij verkeerde PersonalityId">
+<Implementation><![CDATA[
+	
+	Set PersonalityRepositoryMock = ##class(vhTest.Mock.DOM.common.impl.PersonalityRepository).%New()
+	
+	#dim Personality As DOM.common.Personality = ##class(DOM.common.HaefeleDEPersonality).Instance()
+	#dim Factor As TECH.Decimal = 1.50
+	#dim MessageID As %String = "{9e6288b3-38cc-41d8-8dc9-3bbfeaf5c858}"
+	
+	#dim BerekenProductPrijzenRequest As WS.Vhisie4.Winkelkar.BerekenProductPrijzenRequest = ..MaakBerekenProductRequestMet1Product()
+	
+	Do PersonalityRepositoryMock.VerwachtMethodCall("GeefViaID", 33).DanException($$$DummyException)
+
+	Set BerekenProductPrijzen = ##class(WSimpl.Vhisie4.Winkelkar.MultipersonalityPrijsWebservice.BerekenProductPrijzen).%New(,,,,PersonalityRepositoryMock)
+	Do BerekenProductPrijzen.BerekenProductPrijzen(BerekenProductPrijzenRequest)
+	
+	Do PersonalityRepositoryMock.Verifieer()
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("DummyException")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException",Substrings))
+]]></Implementation>
+</Method>
+
+<Method name="Test gooien van exceptie bij exceptie van salespriceservice">
+<Implementation><![CDATA[
+	
+	Set PersonalityRepositoryMock = ##class(vhTest.Mock.DOM.common.impl.PersonalityRepository).%New()
+	
+	#dim Personality As DOM.common.Personality = ##class(DOM.common.HaefeleDEPersonality).Instance()
+	#dim Factor As TECH.Decimal = 1.50
+	#dim MessageID As %String = "{9e6288b3-38cc-41d8-8dc9-3bbfeaf5c858}"
+	
+	#dim BerekenProductPrijzenRequest As WS.Vhisie4.Winkelkar.BerekenProductPrijzenRequest = ..MaakBerekenProductRequestMet1Product()
+	
+	Do PersonalityRepositoryMock.VerwachtMethodCall("GeefViaID", 33).DanException($$$DummyException)
+
+	Set BerekenProductPrijzen = ##class(WSimpl.Vhisie4.Winkelkar.MultipersonalityPrijsWebservice.BerekenProductPrijzen).%New(,,,,PersonalityRepositoryMock)
+	Do BerekenProductPrijzen.BerekenProductPrijzen(BerekenProductPrijzenRequest)
+	
+	Do PersonalityRepositoryMock.Verifieer()
+	#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("DummyException")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException",Substrings))
+]]></Implementation>
+</Method>
+
 <Method name="Test Uitvoeren van methodes bij verwerking met 2 producten">
 <Implementation><![CDATA[
 	Set MessageManagerMock = ##class(vhTest.Mock.AXimpl.MessageManager).%New()
@@ -66,7 +149,7 @@
 	Do PrijsFactorBepalerFactoryMock.VerwachtMethodCall("GeefPrijsFactorBepaler", Personality).DanReturn(PrijsFactorBepalerMock)
 	Do PrijsFactorBepalerMock.VerwachtMethodCall("GeefOrgaluxPrijsFactor").DanReturn(Factor)
 	Do MessageManagerMock.VerwachtMethodCall("GenerateID").DanReturn(MessageID)
-	Do SalesPriceSeriveMock.VerwachtMethodCall("getPrice",..Matches.Object(Request)).DanReturn(Output)
+	Do SalesPriceSeriveMock.VerwachtMethodCall("getPrice", $$$ElkeWaarde).DanReturn(Output)
 	Do KortingServiceMock.VerwachtMethodCall("GeefKortingInfo",$$$ElkeWaarde).DanReturn(KortingInfo).ExactAantalKeer(2)
 	
 	Set BerekenProductPrijzen = ##class(WSimpl.Vhisie4.Winkelkar.MultipersonalityPrijsWebservice.BerekenProductPrijzen).%New(SalesPriceSeriveMock, MessageManagerMock, PrijsFactorBepalerFactoryMock, KortingServiceMock, PersonalityRepositoryMock)
@@ -105,12 +188,13 @@
 	Do PrijsFactorBepalerFactoryMock.VerwachtMethodCall("GeefPrijsFactorBepaler", Personality).DanReturn(PrijsFactorBepalerMock)
 	Do PrijsFactorBepalerMock.VerwachtMethodCall("GeefOrgaluxPrijsFactor").DanReturn(Factor)
 	Do MessageManagerMock.VerwachtMethodCall("GenerateID").DanReturn(MessageID).ExactAantalKeer(0)
-	Do SalesPriceSeriveMock.VerwachtMethodCall("getPrice",..Matches.Object(Request)).DanReturn(Output)
+	Do SalesPriceSeriveMock.VerwachtMethodCall("getPrice",$$$ElkeWaarde).DanReturn(Output)
 	Do KortingServiceMock.VerwachtMethodCall("GeefKortingInfo",$$$ElkeWaarde).DanReturn(KortingInfo)
 	
 	Set BerekenProductPrijzen = ##class(WSimpl.Vhisie4.Winkelkar.MultipersonalityPrijsWebservice.BerekenProductPrijzen).%New(SalesPriceSeriveMock, MessageManagerMock, PrijsFactorBepalerFactoryMock, KortingServiceMock, PersonalityRepositoryMock)
 	Do BerekenProductPrijzen.BerekenProductPrijzen(BerekenProductPrijzenRequest)
 	
+	Do $$$AssertEquals(Request.MessageId, MessageID)
 	Do MessageManagerMock.Verifieer()
 	Do SalesPriceSeriveMock.Verifieer()
 	Do KortingServiceMock.Verifieer()
@@ -128,7 +212,7 @@
 	Set BerekenProductPrijzenRequest.PersonalityID = 33
 	Set BerekenProductPrijzenRequest.CustAccount = 1234
 	
-	Set InputLine = ##class(AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceLineInputDC).%New()
+	Set InputLine = ##class(WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.PrijsLijnInput).%New()
 	Set InputLine.CurrencyCode = "EUR"
 	Set InputLine.ItemId = 5678
 	Set InputLine.Qty = 1
@@ -140,6 +224,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakBerekenProductRequestZonderProduct">
+<Private>1</Private>
+<ReturnType>WS.Vhisie4.Winkelkar.BerekenProductPrijzenRequest</ReturnType>
+<Implementation><![CDATA[
+	Set BerekenProductPrijzenRequest = ##class(WS.Vhisie4.Winkelkar.BerekenProductPrijzenRequest).%New()
+	Set BerekenProductPrijzenRequest.PersonalityID = 33
+	Set BerekenProductPrijzenRequest.CustAccount = 1234
+	
+	Quit BerekenProductPrijzenRequest
+]]></Implementation>
+</Method>
+
 <Method name="MaakBerekenProductRequestMet1ProductMetMessageID">
 <Private>1</Private>
 <ReturnType>WS.Vhisie4.Winkelkar.BerekenProductPrijzenRequest</ReturnType>
@@ -149,7 +245,7 @@
 	Set BerekenProductPrijzenRequest.CustAccount = 1234
 	Set BerekenProductPrijzenRequest.MessageId = "MessageID"
 	
-	Set InputLine = ##class(AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceLineInputDC).%New()
+	Set InputLine = ##class(WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.PrijsLijnInput).%New()
 	Set InputLine.CurrencyCode = "EUR"
 	Set InputLine.ItemId = 5678
 	Set InputLine.Qty = 1
@@ -169,14 +265,14 @@
 	Set BerekenProductPrijzenRequest.PersonalityID = 33
 	Set BerekenProductPrijzenRequest.CustAccount = 1234
 	
-	Set InputLine = ##class(AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceLineInputDC).%New()
+	Set InputLine = ##class(WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.PrijsLijnInput).%New()
 	Set InputLine.CurrencyCode = "EUR"
 	Set InputLine.ItemId = 5678
 	Set InputLine.Qty = 1
 	Set InputLine.SalesUnit = "STK"
 	Set InputLine.TransDate = "2020-09-02"
 	Do BerekenProductPrijzenRequest.Lines.Insert(InputLine)
-	Set InputLine2 = ##class(AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceLineInputDC).%New()
+	Set InputLine2 = ##class(WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.PrijsLijnInput).%New()
 	Set InputLine2.CurrencyCode = "EUR"
 	Set InputLine2.ItemId = 56789
 	Set InputLine2.Qty = 1
@@ -189,20 +285,44 @@
 </Method>
 
 <Method name="MaakRequest">
-<FormalSpec>Lines:AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceLineInputDC,Personality:DOM.common.Personality,MessageID:%String</FormalSpec>
+<FormalSpec>Lines:WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.PrijsLijnInput,Personality:DOM.common.Personality,MessageID:%String</FormalSpec>
 <ReturnType>AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceHeaderInputDC</ReturnType>
 <Implementation><![CDATA[
 	#dim Request As AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceHeaderInputDC = ##class(AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceHeaderInputDC).%New()
 	Set Request.CustAccount = Personality.Klant.Nummer
 	Set Request.CalcPrice = $$$True
 	Set Request.CalcStock = $$$False
 	Set Request.MessageId = MessageID
-	Set Request.Lines = Lines
 	
+	#dim LinesIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Lines)
+	While (LinesIterator.HasNext()) {
+		#dim Line As WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.PrijsLijnInput = LinesIterator.Next()
+		Set NewLine = ##class(AXif.Dynamics.SalesPriceOut.MessageParts.ADUSalesPriceLineInputDC).%New()
+		Set NewLine.CostPrice = Line.CostPrice
+		Set NewLine.CurrencyCode = Line.CurrencyCode
+		Set NewLine.ItemId = Line.ItemId
+		Set NewLine.Qty = Line.Qty
+		Set NewLine.SalesUnit = Line.SalesUnit
+		Set NewLine.TransDate = Line.TransDate
+		Set NewLine.MessageId = MessageID
+		Do Request.Lines.Insert(NewLine)
+	}
+
+	
 	Quit Request
 ]]></Implementation>
 </Method>
 
+<Method name="MaakOutputZonderProduct">
+<Private>1</Private>
+<ReturnType>AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC</ReturnType>
+<Implementation><![CDATA[
+	#dim Output As AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC = ##class(AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC).%New()
+	
+	Quit Output
+]]></Implementation>
+</Method>
+
 <Method name="MaakOutputMet1Product">
 <Private>1</Private>
 <ReturnType>AXif.Dynamics.SalesPriceIn.MessageParts.ADUSalesPriceHeaderOutputDC</ReturnType>
Index: WS/Vhisie4/Winkelkar/BerekenProductPrijzenRequest.cls.xml
===================================================================
diff -u -r62083 -r62102
--- WS/Vhisie4/Winkelkar/BerekenProductPrijzenRequest.cls.xml	(.../BerekenProductPrijzenRequest.cls.xml)	(revision 62083)
+++ WS/Vhisie4/Winkelkar/BerekenProductPrijzenRequest.cls.xml	(.../BerekenProductPrijzenRequest.cls.xml)	(revision 62102)
@@ -4,31 +4,76 @@
 <ClassType/>
 <CompileAfter>AXif.Dynamics.SalesPriceOut.MessageParts.XppObjectBase</CompileAfter>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.PrijsHeaderInput</Super>
+<Super>WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.XppObjectBase</Super>
 
 <Parameter name="ELEMENTQUALIFIED">
 <Default>1</Default>
 </Parameter>
 
 <Parameter name="NAMESPACE">
-<Default>http://schemas.datacontract.org/2004/07/Dynamics.Ax.Application_VH</Default>
+<Default>http://schemas.datacontract.org/2004/07/Dynamics.Ax.Application</Default>
 </Parameter>
 
 <Parameter name="XMLNAME">
-<Description>
-Parameter XMLIGNOREINVALIDTAG As BOOLEAN = 1;</Description>
 <Default>ADUSalesPriceHeaderInputDC</Default>
 </Parameter>
 
+<Parameter name="SUPPRESSTYPEPREFIX">
+<Default>1</Default>
+</Parameter>
+
 <Parameter name="XMLSEQUENCE">
 <Default>1</Default>
 </Parameter>
 
+<Property name="CalcPrice">
+<Type>%Boolean</Type>
+<Parameter name="XMLNAME" value="CalcPrice"/>
+</Property>
+
+<Property name="CalcStock">
+<Type>%Boolean</Type>
+<Parameter name="XMLNAME" value="CalcStock"/>
+</Property>
+
+<Property name="CustAccount">
+<Type>%String</Type>
+<Parameter name="MAXLEN"/>
+<Parameter name="XMLNAME" value="CustAccount"/>
+</Property>
+
+<Property name="Lines">
+<Type>WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.PrijsLijnInput</Type>
+<Collection>list</Collection>
+<Parameter name="XMLITEMNAME" value="ADUSalesPriceLineInputDC"/>
+<Parameter name="XMLNAME" value="Lines"/>
+<Parameter name="XMLPROJECTION" value="COLLECTION"/>
+</Property>
+
+<Property name="MessageId">
+<Type>WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.guid</Type>
+<Parameter name="XMLNAME" value="MessageId"/>
+</Property>
+
 <Property name="PersonalityID">
 <Type>%String</Type>
 <Parameter name="MAXLEN"/>
 <Parameter name="XMLNAME" value="PersonalityID"/>
 </Property>
+
+<Method name="XMLExport">
+<FormalSpec><![CDATA[top:%String,format:%String,namespaces:%XML.Namespaces,attrs,createId:%String,typeAttr:%String,&oreflist,&idlist,initialIndent:%String,local:%Boolean]]></FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+   	#dim sc As %Status
+
+	Set sc =  ..Lines.XMLExport("line", .format, .namespaces, .attrs, .createId, "", .oreflist, .idlist, .initialIndent, .local)
+	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(sc,"Error bij XmlExport van TopLine bij object "_$this)
+
+
+	Quit $$$OK
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WS/Vhisie4/Winkelkar/dto/MultipersonalityPrijsWebservice/PrijsLijnInput.cls.xml
===================================================================
diff -u -r62083 -r62102
--- WS/Vhisie4/Winkelkar/dto/MultipersonalityPrijsWebservice/PrijsLijnInput.cls.xml	(.../PrijsLijnInput.cls.xml)	(revision 62083)
+++ WS/Vhisie4/Winkelkar/dto/MultipersonalityPrijsWebservice/PrijsLijnInput.cls.xml	(.../PrijsLijnInput.cls.xml)	(revision 62102)
@@ -6,6 +6,10 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>WS.Vhisie4.Winkelkar.dto.MultipersonalityPrijsWebservice.XppObjectBase</Super>
 
+<Parameter name="OutputTypeAttribute">
+<Default>0</Default>
+</Parameter>
+
 <Parameter name="ELEMENTQUALIFIED">
 <Default>1</Default>
 </Parameter>