Index: APPS/VKP/OrderIngaveService.cls.xml
===================================================================
diff -u -r47762 -r48189
--- APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 47762)
+++ APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 48189)
@@ -220,6 +220,16 @@
 ]]></Implementation>
 </Method>
 
+<Method name="BepaalOorsprongKetting">
+<FormalSpec>Offerte:APPS.VKP.impl.Offerte</FormalSpec>
+<ReturnType>%List</ReturnType>
+<Implementation><![CDATA[
+	#dim Detail As %String = $listbuild($listbuild(Offerte.GeefPersonalityID(),Offerte.GeefKlantID(),Offerte.GeefID()))
+	if $length(Offerte.GeefKlantBestellingId()) set Detail = ..BepaalOorsprongKetting(..OfferteRepository.GeefViaID(Offerte.GeefKlantBestellingId())) _ Detail
+	quit Detail
+]]></Implementation>
+</Method>
+
 <Method name="VoegToePalletten">
 <FormalSpec>Order:DOM.VKP.Order,Offerte:APPS.VKP.impl.Offerte</FormalSpec>
 <Private>1</Private>
@@ -290,17 +300,6 @@
 	}
 ]]></Implementation>
 </Method>
-
-<Method name="BepaalOorsprongKetting">
-<FormalSpec>Offerte:APPS.VKP.impl.Offerte</FormalSpec>
-<Private>1</Private>
-<ReturnType>%List</ReturnType>
-<Implementation><![CDATA[
-	#dim Detail As %String = $listbuild($listbuild(Offerte.GeefPersonalityID(),Offerte.GeefKlantID(),Offerte.GeefID()))
-	if $length(Offerte.GeefKlantBestellingId()) set Detail = ..BepaalOorsprongKetting(..OfferteRepository.GeefViaID(Offerte.GeefKlantBestellingId())) _ Detail
-	quit Detail
-]]></Implementation>
-</Method>
 </Class>