Index: vhTest/Mock/AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository.cls.xml
===================================================================
diff -u -r42144 -r48505
--- vhTest/Mock/AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository.cls.xml (.../LeveradresRepository.cls.xml) (revision 42144)
+++ vhTest/Mock/AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository.cls.xml (.../LeveradresRepository.cls.xml) (revision 48505)
@@ -6,7 +6,7 @@
Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.
1
-AXimpl.Crm.CustomerAddressOut.Converter.LeveradresRepository,Tools.Mock.MockClassBase
+DOM.VKP.impl.LeverAdresRepository,Tools.Mock.MockClassBase
right
Index: vhUnitTest/AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository.cls.xml
===================================================================
diff -u -r42143 -r48505
--- vhUnitTest/AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository.cls.xml (.../LeveradresRepository.cls.xml) (revision 42143)
+++ vhUnitTest/AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository.cls.xml (.../LeveradresRepository.cls.xml) (revision 48505)
@@ -5,7 +5,7 @@
Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
1
-AXimpl.Crm.CustomerAddressOut.Converter.LeveradresRepository
+DOM.VKP.impl.LeverAdresRepository
ID:%String
Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r48502 -r48505
--- DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 48502)
+++ DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 48505)
@@ -331,6 +331,12 @@
Do ..AfleverAdresData.ZetPiece(25, Afleveradres.GeefOpmerking2())
Do ..AfleverAdresData.ZetPiece(26, Afleveradres.GeefVerzendingWijze())
Do ..AfleverAdresData.ZetPiece(23, Afleveradres.GeefVolmacht())
+
+ If ($$$HasLength(Afleveradres.GeefAxLeveradresId()) && (##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI().IsActiefAxLeverancierId())){
+ Do ..AfleverAdresData.ZetPiece(29, Afleveradres.GeefAxLeveradresId())
+ Do ..AfleverAdresData.ZetPiece(1, "")
+ }
+
} Else {
/// Leegmaken van pieces waarin adres is ingevuld. Eerste piece is de ID van het adres.
#Dim Teller As %Integer
Index: vhUnitTest/AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository/GeefViaKlantIdEnAdresVolgnummer/Test.cls.xml
===================================================================
diff -u -r42254 -r48505
--- vhUnitTest/AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository/GeefViaKlantIdEnAdresVolgnummer/Test.cls.xml (.../Test.cls.xml) (revision 42254)
+++ vhUnitTest/AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository/GeefViaKlantIdEnAdresVolgnummer/Test.cls.xml (.../Test.cls.xml) (revision 48505)
@@ -38,7 +38,7 @@
@@ -92,7 +92,7 @@
Do ..VoegToeLeveradres("1")
- Set LeveradresRepository = ##class(AXimpl.Crm.CustomerAddressOut.Converter.LeveradresRepository).%New()
+ Set LeveradresRepository = ##class(DOM.VKP.impl.LeverAdresRepository).%New()
#dim LeverAdres As DOM.VKP.impl.LeverAdres = LeveradresRepository.GeefViaKlantIdEnAdresVolgnummer("","1")
]]>
@@ -102,7 +102,7 @@
#dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("Geen leveradres voor combinatie KlantId 'K||999999' en AdresVolgnummer '1'")
Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings))
- Set LeveradresRepository = ##class(AXimpl.Crm.CustomerAddressOut.Converter.LeveradresRepository).%New()
+ Set LeveradresRepository = ##class(DOM.VKP.impl.LeverAdresRepository).%New()
#dim LeverAdres As DOM.VKP.impl.LeverAdres = LeveradresRepository.GeefViaKlantIdEnAdresVolgnummer("K||"_..#TestKlantnummer,"1")
]]>
Index: DOM/VKP/impl/LeveradresRepository.cls.xml
===================================================================
diff -u -r47691 -r48505
--- DOM/VKP/impl/LeveradresRepository.cls.xml (.../AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository.cls.xml) (revision 47691)
+++ DOM/VKP/impl/LeveradresRepository.cls.xml (.../DOM/VKP/impl/LeverAdresRepository.cls.xml) (revision 48505)
@@ -1,6 +1,6 @@
-
+
TECH.Repository,TECH.Mockable
@@ -63,4 +63,5 @@
+
FishEye: Tag 48505 refers to a dead (removed) revision in file `AXimpl/Crm/CustomerAddressOut/Converter/LeveradresRepository.cls.xml'.
FishEye: No comparison available. Pass `N' to diff?
Index: AXimpl/Crm/CustomerAddressOut/Converter/AddressUpsertConverter.cls.xml
===================================================================
diff -u -r43017 -r48505
--- AXimpl/Crm/CustomerAddressOut/Converter/AddressUpsertConverter.cls.xml (.../AddressUpsertConverter.cls.xml) (revision 43017)
+++ AXimpl/Crm/CustomerAddressOut/Converter/AddressUpsertConverter.cls.xml (.../AddressUpsertConverter.cls.xml) (revision 48505)
@@ -19,7 +19,7 @@
-AXimpl.Crm.CustomerAddressOut.Converter.LeveradresRepository
+DOM.VKP.impl.LeverAdresRepository
1
@@ -29,14 +29,14 @@
-VerkoopAPI:DOM.VKP.VerkoopAPI,LeveradresRepository:AXimpl.Crm.CustomerAddressOut.Converter.LeveradresRepository
+VerkoopAPI:DOM.VKP.VerkoopAPI,LeveradresRepository:DOM.VKP.impl.LeverAdresRepository
1
1
%Status
1