Index: APPS/VKP/OrderIngaveService.cls.xml =================================================================== diff -u -r52080 -r52181 --- APPS/VKP/OrderIngaveService.cls.xml (.../OrderIngaveService.cls.xml) (revision 52080) +++ APPS/VKP/OrderIngaveService.cls.xml (.../OrderIngaveService.cls.xml) (revision 52181) @@ -194,7 +194,7 @@ Do Order.ZetOorsprong(##class(BL.Flow.Offerte.enu.Oorsprong).UniShop()) Do Order.ZetOorsprongKetting($$$LCVT(..BepaalOorsprongKetting(Offerte))) Do Order.ZetEDINummer(Offerte.GeefEDINummerVoorEindklant()) - Do Order.ZetEmailAdres(Offerte.GeefEmailAdres()) + Do Order.ZetEmailAdresBesteller(Offerte.GeefEmailAdresBesteller()) If ..GebruiktExternTransport(Offerte) { Do Order.ZetLeveringVoorwaarde(##class(DOM.CRM.enu.LeveringVoorwaarde).KostInManueleLijn()) Index: APPS/VKP/Offerte.cls.xml =================================================================== diff -u -r52080 -r52181 --- APPS/VKP/Offerte.cls.xml (.../Offerte.cls.xml) (revision 52080) +++ APPS/VKP/Offerte.cls.xml (.../Offerte.cls.xml) (revision 52181) @@ -307,14 +307,14 @@ LeverancierOfferteId:%String - + 1 %String - + 1 -EmailAdres:%String +EmailAdresBesteller:%String Index: APPS/VKP/impl/Offerte.cls.xml =================================================================== diff -u -r52080 -r52181 --- APPS/VKP/impl/Offerte.cls.xml (.../Offerte.cls.xml) (revision 52080) +++ APPS/VKP/impl/Offerte.cls.xml (.../Offerte.cls.xml) (revision 52181) @@ -97,7 +97,7 @@ %String - + %String @@ -548,15 +548,15 @@ ]]> - -EmailAdres:%String - +EmailAdresBesteller:%String + - + %String - @@ -664,7 +664,7 @@ Oorsprong -EmailAdres +EmailAdresBesteller Index: APPS/VKP/impl/OfferteService.cls.xml =================================================================== diff -u -r52080 -r52181 --- APPS/VKP/impl/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 52080) +++ APPS/VKP/impl/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 52181) @@ -334,7 +334,7 @@ Set Offerte.DocumentReferenties.OrderReferentie = ..GeefOpgekuisteTekst(Hoofding.Referentie.OrderReferentie) Set Offerte.DocumentReferenties.KlantOrderNummer = ..GeefOpgekuisteTekst(Hoofding.Referentie.KlantOrderNummer) Set Offerte.DocumentReferenties.CommissieReferentie = ..GeefOpgekuisteTekst(Hoofding.Referentie.CommissieReferentie) - Do Offerte.ZetEmailAdres(..GeefOpgekuisteTekst(Hoofding.EmailAdres)) + Do Offerte.ZetEmailAdresBesteller(..GeefOpgekuisteTekst(Hoofding.EmailAdresBesteller)) ]]> Index: DOM/VKP/Order.cls.xml =================================================================== diff -u -r52080 -r52181 --- DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 52080) +++ DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 52181) @@ -504,12 +504,12 @@ DOM.common.Personality - + 1 -EmailAdres:%String +EmailAdresBesteller:%String - + 1 %String Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml =================================================================== diff -u -r52080 -r52181 --- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml (.../Test.cls.xml) (revision 52080) +++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml (.../Test.cls.xml) (revision 52181) @@ -56,14 +56,14 @@ Index: vhTest/Mock/APPS/VKP/Offerte.cls.xml =================================================================== diff -u -r52080 -r52181 --- vhTest/Mock/APPS/VKP/Offerte.cls.xml (.../Offerte.cls.xml) (revision 52080) +++ vhTest/Mock/APPS/VKP/Offerte.cls.xml (.../Offerte.cls.xml) (revision 52181) @@ -62,9 +62,9 @@ ]]> - + %String - @@ -247,9 +247,9 @@ ]]> - -EmailAdres:%String - +EmailAdresBesteller:%String + Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml =================================================================== diff -u -r52080 -r52181 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml (.../BestelWinkelkar.cls.xml) (revision 52080) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml (.../BestelWinkelkar.cls.xml) (revision 52181) @@ -175,7 +175,7 @@ Set Hoofding.Referentie.KlantOrderNummer = "" Set Hoofding.Referentie.CommissieReferentie = BestelWinkelkarRequest.Winkelkar.CommissieReferentie - Set Hoofding.EmailAdres = BestelWinkelkarRequest.Header.EmailAdres + Set Hoofding.EmailAdresBesteller = BestelWinkelkarRequest.Header.EmailAdres Quit Hoofding ]]> Index: vhTest/Mock/DOM/VKP/Order.cls.xml =================================================================== diff -u -r52080 -r52181 --- vhTest/Mock/DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 52080) +++ vhTest/Mock/DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 52181) @@ -131,9 +131,9 @@ ]]> - + %String - @@ -461,9 +461,9 @@ ]]> - -EmailAdres:%String - +EmailAdresBesteller:%String + Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml =================================================================== diff -u -r52080 -r52181 --- DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 52080) +++ DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 52181) @@ -1216,16 +1216,16 @@ ]]> - + %String - -EmailAdres:%String + +EmailAdresBesteller:%String Index: APPS/EC/dto/Hoofding.cls.xml =================================================================== diff -u -r52080 -r52181 --- APPS/EC/dto/Hoofding.cls.xml (.../Hoofding.cls.xml) (revision 52080) +++ APPS/EC/dto/Hoofding.cls.xml (.../Hoofding.cls.xml) (revision 52181) @@ -27,7 +27,7 @@ %TimeStamp - + %String