Index: APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml
===================================================================
diff -u -r40594 -r40597
--- APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 40594)
+++ APPS/EDI/Bestel/impl/BestelService/UnishopBesteller.cls.xml	(.../UnishopBesteller.cls.xml)	(revision 40597)
@@ -88,21 +88,21 @@
 <FormalSpec>Aanvraag:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag</FormalSpec>
 <ReturnType>APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat</ReturnType>
 <Implementation><![CDATA[
-	Do ##class(TECH.Context.RuntimeContext).Instance().ZetTaal(Aanvraag.Header.Taal)
-	Do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(Aanvraag.Header.PersonalityID)
-	Do ##class(TECH.Context.RuntimeContext).Instance().ZetGebruikerID(Aanvraag.Header.GebruikerID)
-	
 	Set ..Aanvraag = Aanvraag
+	Do ##class(TECH.Context.RuntimeContext).Instance().ZetTaal(..Aanvraag.Header.Taal)
+	Do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(..Aanvraag.Header.PersonalityID)
+	Do ##class(TECH.Context.RuntimeContext).Instance().ZetGebruikerID(..Aanvraag.Header.GebruikerID)
+	
 	Set Resultaat = ##class(APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat).%New()
 	
 	Do ..MaakLijnenIterator()
 	If ..LijnenIterator.HasNext() {	
-		#dim Offerte As APPS.VKP.Offerte = ..OfferteService.GeefOfferte(..ExterneVerkoopService.MaakOfferte(Aanvraag.Header.KlantID,Aanvraag.Header.PersonalityID).OfferteID)	
+		#dim Offerte As APPS.VKP.Offerte = ..OfferteService.GeefOfferte(..ExterneVerkoopService.MaakOfferte(..Aanvraag.Header.KlantID,..Aanvraag.Header.PersonalityID).OfferteID)	
 		
 		try {
-			Do ..ZetHoofding(Offerte,Aanvraag.Order,Aanvraag.Header.PersonalityID)
-			Do ..VoegToeLijnen(Offerte,Aanvraag.Order)
-			Do ..ZetLeveringInformatie(Aanvraag, Offerte)
+			Do ..ZetHoofding(Offerte)
+			Do ..VoegToeLijnen(Offerte)
+			Do ..ZetLeveringInformatie(Offerte)
 			Do ..OfferteService.ZetHoofding(Offerte,..OfferteHoofding)
 			
 			Do ..OfferteRepository.Bewaar(Offerte)
@@ -124,10 +124,11 @@
 <FormalSpec>OfferteID:%String,Aanvraag:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag</FormalSpec>
 <ReturnType>APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat</ReturnType>
 <Implementation><![CDATA[
+	Set ..Aanvraag = Aanvraag
 	Set Resultaat = ##class(APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat).%New()
 	Try {
-		If ..HeeftOfferteMaatwerk(Aanvraag.Order) {
-			Do ..ExterneVerkoopService.BestelOfferte(OfferteID, Aanvraag.Header.KlantID,Aanvraag.Header.PersonalityID)
+		If ..HeeftOfferteMaatwerk() {
+			Do ..ExterneVerkoopService.BestelOfferte(OfferteID, ..Aanvraag.Header.KlantID,..Aanvraag.Header.PersonalityID)
 		} Else {
 			Do ..OrderIngaveService.MaakOrderVanOfferte(OfferteID,"")
 		}
@@ -140,21 +141,21 @@
 </Method>
 
 <Method name="ZetHoofding">
-<FormalSpec>Offerte:APPS.VKP.Offerte,Order:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Order,PersonalityID:DOM.common.enu.Personality</FormalSpec>
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set ..OfferteHoofding.Referentie.OrderReferentie = Order.OrderReferentie
-	Set ..OfferteHoofding.Referentie.KlantOrderNummer = Order.KlantOrderNummer
-	Set ..OfferteHoofding.Referentie.CommissieReferentie = Order.CommissieReferentie
-	Set ..OfferteHoofding.LeveringDetail.WensDatum = Order.GevraagdeLeverdatum
+	Set ..OfferteHoofding.Referentie.OrderReferentie = ..Aanvraag.Order.OrderReferentie
+	Set ..OfferteHoofding.Referentie.KlantOrderNummer = ..Aanvraag.Order.KlantOrderNummer
+	Set ..OfferteHoofding.Referentie.CommissieReferentie = ..Aanvraag.Order.CommissieReferentie
+	Set ..OfferteHoofding.LeveringDetail.WensDatum = ..Aanvraag.Order.GevraagdeLeverdatum
 ]]></Implementation>
 </Method>
 
 <Method name="VoegToeLijnen">
-<FormalSpec>Offerte:APPS.VKP.Offerte,Order:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Order</FormalSpec>
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Quit:$$$Not($IsObject(Order))
+	Quit:$$$Not($IsObject(..Aanvraag.Order))
 	#dim ProbleemLijnen As %String = ""
 	
 	While ..LijnenIterator.HasNext() {
@@ -219,7 +220,6 @@
 </Method>
 
 <Method name="HeeftOfferteMaatwerk">
-<FormalSpec>Order:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Order</FormalSpec>
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
@@ -230,7 +230,7 @@
 	
 	Set Filter = ##class(TECH.Filter.PropertyBasedFilter).%New(ValueList)
 	
-	Set Iterator = ##class(TECH.ListIterator).%New(Order.Lijnen)
+	Set Iterator = ##class(TECH.ListIterator).%New(..Aanvraag.Order.Lijnen)
 	#dim FilterIterator As TECH.Iterator = ##class(TECH.DynamicIterator).%New(Iterator,,Filter)
 	
 	Quit FilterIterator.HasNext()
@@ -254,49 +254,48 @@
 </Method>
 
 <Method name="ZetLeveringInformatie">
-<FormalSpec>Aanvraag:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag,Offerte:APPS.VKP.Offerte</FormalSpec>
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do ..ZetLeveradres(Aanvraag, Offerte.GeefID())
-	Do ..ZetGevraagdeLeverdatum(Aanvraag.Order, Offerte)
+	Do ..ZetLeveradres(Offerte)
+	Do ..ZetGevraagdeLeverdatum(Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetLeveradres">
-<FormalSpec>Aanvraag:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Aanvraag,OfferteID:%String</FormalSpec>
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Quit:$$$Not($IsObject(Aanvraag.Order.Aankoper))
-	#dim Offerte As APPS.VKP.Offerte = ..OfferteService.GeefOfferte(OfferteID)	
+	Quit:$$$Not($IsObject(..Aanvraag.Order.Aankoper))	
 	#dim Leveradres As DOM.VKP.LeverAdres = ##class(DOM.VKP.impl.LeverAdresFactory).%New().MaakLeverAdres()
-	Do Leveradres.ZetNaam(##class(TECH.StringUtils).ToUpper(Aanvraag.Order.Aankoper.LeveringNaam))
-	Do Leveradres.ZetStraat(##class(TECH.StringUtils).ToUpper(Aanvraag.Order.Aankoper.LeveringStraatNrBus))
-	Do Leveradres.ZetPostcode(Aanvraag.Order.Aankoper.LeveringPostcode)
-	Do Leveradres.ZetGemeente(##class(TECH.StringUtils).ToUpper(Aanvraag.Order.Aankoper.LeveringWoonplaats))
-	If $$$HasLength(Aanvraag.Order.Aankoper.LeveringLandISO3) {
-		Do Leveradres.ZetLandNr(##class(DOM.common.Locatie.impl.LandRepository).%New().GeefViaLandCodeIso3(Aanvraag.Order.Aankoper.LeveringLandISO3))
-	} ElseIf $$$HasLength(Aanvraag.Order.Aankoper.LeveringLand) {
-		Do Leveradres.ZetLandNr(##class(DOM.common.Locatie.impl.LandRepository).%New().GeefViaLandCodeIso2(Aanvraag.Order.Aankoper.LeveringLand))
+	Do Leveradres.ZetNaam(##class(TECH.StringUtils).ToUpper(..Aanvraag.Order.Aankoper.LeveringNaam))
+	Do Leveradres.ZetStraat(##class(TECH.StringUtils).ToUpper(..Aanvraag.Order.Aankoper.LeveringStraatNrBus))
+	Do Leveradres.ZetPostcode(..Aanvraag.Order.Aankoper.LeveringPostcode)
+	Do Leveradres.ZetGemeente(##class(TECH.StringUtils).ToUpper(..Aanvraag.Order.Aankoper.LeveringWoonplaats))
+	If $$$HasLength(..Aanvraag.Order.Aankoper.LeveringLandISO3) {
+		Do Leveradres.ZetLandNr(##class(DOM.common.Locatie.impl.LandRepository).%New().GeefViaLandCodeIso3(..Aanvraag.Order.Aankoper.LeveringLandISO3))
+	} ElseIf $$$HasLength(..Aanvraag.Order.Aankoper.LeveringLand) {
+		Do Leveradres.ZetLandNr(##class(DOM.common.Locatie.impl.LandRepository).%New().GeefViaLandCodeIso2(..Aanvraag.Order.Aankoper.LeveringLand))
 	}
-	Do Leveradres.ZetLandNr(Aanvraag.Order.Aankoper.LeveringLand)
+	Do Leveradres.ZetLandNr(..Aanvraag.Order.Aankoper.LeveringLand)
 	
 	Do Offerte.ZetLeverAdres(Leveradres)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetGevraagdeLeverdatum">
-<FormalSpec>Order:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Order,Offerte:APPS.VKP.Offerte</FormalSpec>
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	If Order.GevraagdeLeverdatum=""{
+	If ..Aanvraag.Order.GevraagdeLeverdatum=""{
 		Set ..OfferteHoofding.LeveringDetail.Datum = ..VroegsteLeverdatumBepaler.GeefVroegsteLeverdatum(..WinkelkarRepository.GeefViaID(Offerte.GeefWinkelkarID()))
 	} Else {
-		#dim OmgezetteLeverdatum As %String = $$YYYYMMDD2EuropeanDate^vhLib.DateTime(Order.GevraagdeLeverdatum)
+		#dim OmgezetteLeverdatum As %String = $$YYYYMMDD2EuropeanDate^vhLib.DateTime(..Aanvraag.Order.GevraagdeLeverdatum)
 		If $$IsValidEuropeanDate^vhLib.DateTime(OmgezetteLeverdatum) {
 			Set ..OfferteHoofding.LeveringDetail.Datum = $ZDH($TR(OmgezetteLeverdatum,".","/"),4)
 		}
 		Else {
-			Do ##class(TECH.Exceptions.InvalidUserInputException).Throw("RequestedDeliveryDate not valid. '"_Order.GevraagdeLeverdatum_"'")
+			Do ##class(TECH.Exceptions.InvalidUserInputException).Throw("RequestedDeliveryDate not valid. '"_..Aanvraag.Order.GevraagdeLeverdatum_"'")
 		}
 	}
 ]]></Implementation>
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/FalendeBestelService.cls.xml
===================================================================
diff -u -r40465 -r40597
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/FalendeBestelService.cls.xml	(.../FalendeBestelService.cls.xml)	(revision 40465)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/FalendeBestelService.cls.xml	(.../FalendeBestelService.cls.xml)	(revision 40597)
@@ -4,7 +4,7 @@
 <Super>APPS.EDI.Bestel.impl.BestelService.UnishopBesteller</Super>
 
 <Method name="VoegToeLijnen">
-<FormalSpec>Offerte:APPS.VKP.Offerte,Order:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Order</FormalSpec>
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[	do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.IllegalUsageException).%New("Altijd falende offerte service"))
 ]]></Implementation>
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBestellerSpy.cls.xml
===================================================================
diff -u -r40465 -r40597
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBestellerSpy.cls.xml	(.../UnishopBestellerSpy.cls.xml)	(revision 40465)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/UnishopBestellerSpy.cls.xml	(.../UnishopBestellerSpy.cls.xml)	(revision 40597)
@@ -24,7 +24,7 @@
 	Set ..UitvoerTijdstip = $zts
 	Set ..Aanvraag = Aanvraag
 	Do ..MaakLijnenIterator()
-	Do ..VoegToeLijnen(1234,Aanvraag.Order)
+	Do ..VoegToeLijnen(1234)
 	Quit ##class(APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat).%New(1234)
 ]]></Implementation>
 </Method>
@@ -37,21 +37,21 @@
 </Method>
 
 <Method name="VoegToeLijnen">
-<FormalSpec>Offerte:APPS.VKP.Offerte,Order:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Order</FormalSpec>
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
-<Implementation><![CDATA[	Do ##super(Offerte, Order)
+<Implementation><![CDATA[	Do ##super(Offerte)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetGevraagdeLeverdatum">
-<FormalSpec>Order:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Order</FormalSpec>
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[	Quit
 ]]></Implementation>
 </Method>
 
 <Method name="ZetHoofding">
-<FormalSpec>Offerte:APPS.VKP.Offerte,Order:APPS.EDI.Bestel.BestelService.PlaatsBestelling.Order,PersonalityID:DOM.common.enu.Personality</FormalSpec>
+<FormalSpec>Offerte:APPS.VKP.Offerte</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[	Quit
 ]]></Implementation>