Index: vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/BestellingAleenLezenVersie.xml
===================================================================
diff -u -r37351 -r37385
--- vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/BestellingAleenLezenVersie.xml (.../BestellingAleenLezenVersie.xml) (revision 37351)
+++ vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/BestellingAleenLezenVersie.xml (.../BestellingAleenLezenVersie.xml) (revision 37385)
@@ -11,14 +11,14 @@
Zo spoedig mogelijk
-
-
-
-
-
-
-
-
+ Weemaes
+ Patrick
+ Herr
+ Hüttenstraße 45
+ 57223
+ DE
+ Kreuztal
+ D
DummyBestelOpmerking
@@ -370,13 +370,13 @@
2015-04-08
- HEIN F.
-
- GMBH
- RECHBERGSTRASSE 5
- 71116
+ Weemaes
+ Patrick
+ Herr
+ Hüttenstraße 45
+ 57223
DE
- GAERTRINGEN
+ Kreuztal
D
Index: vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/BesteldeOfferte.xml
===================================================================
diff -u -r37351 -r37385
--- vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/BesteldeOfferte.xml (.../BesteldeOfferte.xml) (revision 37351)
+++ vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/BesteldeOfferte.xml (.../BesteldeOfferte.xml) (revision 37385)
@@ -10,14 +10,14 @@
Zo spoedig mogelijk
-
-
-
-
-
-
-
-
+ Weemaes
+ Patrick
+ Herr
+ Hüttenstraße 45
+ 57223
+ DE
+ Kreuztal
+ D
DummyBestelOpmerking
@@ -369,13 +369,13 @@
2015-04-08
- HEIN F.
-
- GMBH
- RECHBERGSTRASSE 5
- 71116
+ Weemaes
+ Patrick
+ Herr
+ Hüttenstraße 45
+ 57223
DE
- GAERTRINGEN
+ Kreuztal
D
Index: vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/GedupliceerdeOfferte.xml
===================================================================
diff -u -r37351 -r37385
--- vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/GedupliceerdeOfferte.xml (.../GedupliceerdeOfferte.xml) (revision 37351)
+++ vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/GedupliceerdeOfferte.xml (.../GedupliceerdeOfferte.xml) (revision 37385)
@@ -8,14 +8,14 @@
-
-
-
-
-
-
-
-
+ Weemaes
+ Patrick
+ Herr
+ Hüttenstraße 45
+ 57223
+ DE
+ Kreuztal
+ D
DummyBestelOpmerking
Index: APPS/VKP/impl/Offerte.cls.xml
===================================================================
diff -u -r36317 -r37385
--- APPS/VKP/impl/Offerte.cls.xml (.../Offerte.cls.xml) (revision 36317)
+++ APPS/VKP/impl/Offerte.cls.xml (.../Offerte.cls.xml) (revision 37385)
@@ -296,8 +296,11 @@
If ($$$Not($isObject(..LeverAdres))) {
Set ..LeverAdres = ##class(DOM.common.impl.VH.Adres).%New()
}
-
- Set ..LeverAdres.LeverAdresID = LeverAdres.GeefID()
+ If LeverAdres.%Extends("DOM.common.impl.VH.Adres") {
+ Set ..LeverAdres.LeverAdresID = LeverAdres.GeefLeverAdresID()
+ } ElseIf LeverAdres.%Extends("DOM.VKP.LeverAdres") {
+ Set ..LeverAdres.LeverAdresID = LeverAdres.GeefID()
+ }
Set ..LeverAdres.Aanspreking = LeverAdres.GeefAanspreking()
Set ..LeverAdres.Gemeente = LeverAdres.GeefGemeente()
Set ..LeverAdres.LandNr = LeverAdres.GeefLand().GeefID()
Index: vhTest/Utils/APPS/common/dto/Adres.cls.xml
===================================================================
diff -u
--- vhTest/Utils/APPS/common/dto/Adres.cls.xml (revision 0)
+++ vhTest/Utils/APPS/common/dto/Adres.cls.xml (revision 37385)
@@ -0,0 +1,26 @@
+
+
+
+TECH.RegisteredObject
+
+
+1
+APPS.common.dto.Adres
+
+
+
+
+
+
Index: vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/Order.txt
===================================================================
diff -u -r37351 -r37385
--- vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/Order.txt (.../Order.txt) (revision 37351)
+++ vhTestFiles/IntegratieTests/Webshop.Offerte.IngaveTotBestelling/Test/Hein/Hein_Klant/HeinGebruiker/Order.txt (.../Order.txt) (revision 37385)
@@ -2,7 +2,7 @@
MultDim(7833,0)=110
MultDim(7833,1)=\08.04.15\08.04.15 DummyOrderReferentie\\\7833\EX;1`EX;4`EX;5\1000##63650,33300\\\\\\1\\\\EUR\Hein_Klant\\30\\\\\\\\\\\\\\\\\\\1\\\\\\\\\\\\\UNI\\\\4
MultDim(7833,2)=""
-MultDim(7833,3)=\HEIN F.\\GMBH\RECHBERGSTRASSE 5\71116\GAERTRINGEN\1052\D
+MultDim(7833,3)=\Weemaes\Patrick\Herr\H�ttenstra�e 45\57223 \Kreuztal\1052\D
MultDim(7833,4)=10
MultDim(7833,101)=\\\\Levertijd: 08-04-2015\\\\\\\\\\100\\KF11\63650,33300;T;;-
MultDim(7833,102)=\\\\UNI-EDI-nr: 1\\\\\\\\\\110\\KF11\63650,33300;T;;-
Index: vhTest/Integratie/Webshop/Offerte/IngaveTotBestelling/Test.cls.xml
===================================================================
diff -u -r36382 -r37385
--- vhTest/Integratie/Webshop/Offerte/IngaveTotBestelling/Test.cls.xml (.../Test.cls.xml) (revision 36382)
+++ vhTest/Integratie/Webshop/Offerte/IngaveTotBestelling/Test.cls.xml (.../Test.cls.xml) (revision 37385)
@@ -214,6 +214,10 @@
Set Hoofding.BestelOpmerking = "DummyBestelOpmerking"
Set Hoofding.Referentie.OrderReferentie = "DummyOrderReferentie"
+ If (..PersonalityID = ##class(DOM.common.enu.Personality).Hein()) {
+ Set Hoofding.LeveringDetail.Adres = ##class(vhTest.Utils.APPS.common.dto.Adres).GeefHandelHeinAdres()
+ }
+
Do ExterneVerkoopService.ZetOfferteHoofding(..OfferteID,Hoofding)
Do ExterneVerkoopService.BestelOfferte(..OfferteID)