Index: WSimpl/EC/ExterneVerkoop/BerekeningsFoutenRepository.cls.xml
===================================================================
diff -u -r36330 -r36394
--- WSimpl/EC/ExterneVerkoop/BerekeningsFoutenRepository.cls.xml	(.../BerekeningsFoutenRepository.cls.xml)	(revision 36330)
+++ WSimpl/EC/ExterneVerkoop/BerekeningsFoutenRepository.cls.xml	(.../BerekeningsFoutenRepository.cls.xml)	(revision 36394)
@@ -44,6 +44,22 @@
 	quit Result
 ]]></Implementation>
 </Method>
+
+<Method name="ZetVerzendingInformatie">
+<FormalSpec>OfferteID:%String,VerzendingInformatie:WSdata.EC.ExterneVerkoop.BerekeningsFouten.VerzendingInformatie</FormalSpec>
+</Method>
+
+<Method name="ZetFoutmelding">
+<FormalSpec>OfferteID:%String,Foutmelding:%String</FormalSpec>
+</Method>
+
+<Method name="ZetVerzendItem">
+<FormalSpec>OfferteID:%String,TransportFirma:APPS.TRANSP.enu.TransportFirma,VerzendItem:WSdata.EC.ExterneVerkoop.BerekeningsFouten.VerzendItem</FormalSpec>
+</Method>
+
+<Method name="ZetTransportInformatie">
+<FormalSpec>OfferteID:%String,TransportFirma:APPS.TRANSP.enu.TransportFirma,TransportInformatie:WSdata.EC.ExterneVerkoop.BerekeningsFouten.TransportInformatie</FormalSpec>
+</Method>
 </Class>
 
 
Index: vhUnitTest/WSimpl/EC/ExterneVerkoop/BerekeningsFouten/Test.cls.xml
===================================================================
diff -u -r36330 -r36394
--- vhUnitTest/WSimpl/EC/ExterneVerkoop/BerekeningsFouten/Test.cls.xml	(.../Test.cls.xml)	(revision 36330)
+++ vhUnitTest/WSimpl/EC/ExterneVerkoop/BerekeningsFouten/Test.cls.xml	(.../Test.cls.xml)	(revision 36394)
@@ -67,6 +67,62 @@
 	Do MockGateway.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: ZetVerzendingInformatie ">
+<Implementation><![CDATA[
+	#dim DataClassName As %String = "WSdata.EC.ExterneVerkoop.BerekeningsFouten.BerekeningsFouten"
+	#dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName)
+	;Do MockGateway.VerwachtMethodCall("OpenId",1).DanDoeNiks() 
+	;Do MockGateway.VerwachtMethodCall("Save",1).DanDoeNiks() 
+	
+	#dim BerekeningsFoutenRepository As WSimpl.EC.ExterneVerkoop.BerekeningsFoutenRepository = ##class(WSimpl.EC.ExterneVerkoop.BerekeningsFoutenRepository).%New(MockGateway)
+	#dim VerzendingInformatie As WSdata.EC.ExterneVerkoop.BerekeningsFouten.VerzendingInformatie = ##class(vhTest.Utils.WSdata.EC.ExterneVerkoop.BerekeningsFouten.VerzendingInformatie).GeefVerzendingInformatie()
+	do BerekeningsFoutenRepository.ZetVerzendingInformatie(1,VerzendingInformatie)
+	;do MockGateway.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: ZetFoutmelding ">
+<Implementation><![CDATA[
+	#dim DataClassName As %String = "WSdata.EC.ExterneVerkoop.BerekeningsFouten.BerekeningsFouten"
+	#dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName)
+	;Do MockGateway.VerwachtMethodCall("OpenId",1).DanDoeNiks() 
+	;Do MockGateway.VerwachtMethodCall("Save",1).DanDoeNiks() 
+	
+	#dim BerekeningsFoutenRepository As WSimpl.EC.ExterneVerkoop.BerekeningsFoutenRepository = ##class(WSimpl.EC.ExterneVerkoop.BerekeningsFoutenRepository).%New(MockGateway)
+	#dim Foutmelding As TECH.String = "Foutmelding"
+	do BerekeningsFoutenRepository.ZetFoutmelding(1,Foutmelding)
+	;do MockGateway.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: ZetVerzendItem ">
+<Implementation><![CDATA[
+	#dim DataClassName As %String = "WSdata.EC.ExterneVerkoop.BerekeningsFouten.BerekeningsFouten"
+	#dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName)
+	;Do MockGateway.VerwachtMethodCall("OpenId",1).DanDoeNiks() 
+	;Do MockGateway.VerwachtMethodCall("Save",1).DanDoeNiks() 
+	
+	#dim BerekeningsFoutenRepository As WSimpl.EC.ExterneVerkoop.BerekeningsFoutenRepository = ##class(WSimpl.EC.ExterneVerkoop.BerekeningsFoutenRepository).%New(MockGateway)
+	#dim VerzendingItem As WSdata.EC.ExterneVerkoop.BerekeningsFouten.VerzendItem = ##class(vhTest.Utils.WSdata.EC.ExterneVerkoop.BerekeningsFouten.VerzendItem).GeefVerzendItem()
+	do BerekeningsFoutenRepository.ZetVerzendItem(1,VerzendingItem)
+	;do MockGateway.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: ZetTransportInformatie ">
+<Implementation><![CDATA[
+	#dim DataClassName As %String = "WSdata.EC.ExterneVerkoop.BerekeningsFouten.BerekeningsFouten"
+	#dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName)
+	;Do MockGateway.VerwachtMethodCall("OpenId",1).DanDoeNiks() 
+	;Do MockGateway.VerwachtMethodCall("Save",1).DanDoeNiks() 
+	
+	#dim BerekeningsFoutenRepository As WSimpl.EC.ExterneVerkoop.BerekeningsFoutenRepository = ##class(WSimpl.EC.ExterneVerkoop.BerekeningsFoutenRepository).%New(MockGateway)
+	#dim TransportInformatie As WSdata.EC.ExterneVerkoop.BerekeningsFouten.TransportInformatie = ##class(vhTest.Utils.WSdata.EC.ExterneVerkoop.BerekeningsFouten.TransportInformatie).GeefTransportInformatie()
+	do BerekeningsFoutenRepository.ZetTransportInformatie(1,TransportInformatie)
+	;do MockGateway.Verifieer()
+]]></Implementation>
+</Method>
 </Class>