Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml
===================================================================
diff -u -r39825 -r42160
--- vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 39825)
+++ vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 42160)
@@ -80,7 +80,7 @@
@@ -92,7 +92,7 @@
Do ..Partij.IndienMethodCall("GeefEmail").DanReturn("info@example.com")
Do ..Partij.IndienMethodCall("GeefWebstek").DanReturn("http://www.example.com")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.Klantnummer,"01234")
Do $$$AssertEquals(GeconverteerdeKlant.Naam,"DE NAAM")
@@ -154,7 +154,7 @@
Do ..Partij.IndienMethodCall("GeefTelefoon1").DanReturn("03/1234899")
Do ..Partij.IndienMethodCall("GeefTelefoon2").DanReturn("03/1234567")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.Telefoon,"03 1234899")
]]>
@@ -165,7 +165,7 @@
Do ..Partij.IndienMethodCall("GeefTelefoon1").DanReturn("")
Do ..Partij.IndienMethodCall("GeefTelefoon2").DanReturn("03/987654")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.Telefoon,"03 987654")
]]>
@@ -174,7 +174,7 @@
@@ -184,7 +184,7 @@
@@ -194,7 +194,7 @@
@@ -204,7 +204,7 @@
@@ -214,7 +214,7 @@
@@ -224,7 +224,7 @@
@@ -234,7 +234,7 @@
@@ -244,7 +244,7 @@
@@ -254,7 +254,7 @@
@@ -264,7 +264,7 @@
@@ -275,7 +275,7 @@
Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("2")
Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("Handel")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.KwaliteitHandel,"969950001")
]]>
@@ -286,7 +286,7 @@
Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("2")
Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("Meubelhandel")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.KwaliteitMeubelhandel,"969950001")
]]>
@@ -297,7 +297,7 @@
Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("2")
Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("Keuken")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.KwaliteitKeuken,"969950001")
]]>
@@ -308,7 +308,7 @@
Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("2")
Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("Scholen")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.KwaliteitScholen,"969950001")
]]>
@@ -319,7 +319,7 @@
Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("2")
Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("Consument")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.KwaliteitConsument,"969950001")
]]>
@@ -330,7 +330,7 @@
Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("2")
Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("Openbare besturen")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.KwaliteitOpenbareBesturen,"969950001")
]]>
@@ -341,7 +341,7 @@
Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("2")
Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("Leverancier")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.KwaliteitLeverancier,"969950001")
]]>
@@ -352,7 +352,7 @@
Do ..Klant.IndienMethodCall("GeefKwaliteit").DanReturn("2")
Do ..Klant.IndienMethodCall("GeefActiviteit").DanReturn("Software")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.KwaliteitSoftware,"969950001")
]]>
@@ -364,7 +364,7 @@
Do FakeBezoekadres.ZetLandNr("")
Do ..Klant.IndienMethodCall("GeefBezoekAdres").DanReturn(FakeBezoekadres)
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.BezoekadresLandcode,"BEL")
]]>
@@ -379,7 +379,7 @@
Do ..Klant.IndienMethodCall("GeefOpmerking9").DanReturn("een opmerking met ;")
Do ..Partij.IndienMethodCall("GeefWebstek").DanReturn("www;example.com")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.FacturatieFrequentie,"M1-16")
Do $$$AssertEquals(GeconverteerdeKlant.Opmerking6,"een opmerking met -")
@@ -394,7 +394,7 @@
@@ -404,7 +404,7 @@
@@ -414,7 +414,7 @@
@@ -424,7 +424,7 @@
@@ -435,7 +435,7 @@
Do ..Partij.IndienMethodCall("GeefTelefoon1").DanReturn("0032-3/123.45.67")
Do ..Partij.IndienMethodCall("GeefTelefax").DanReturn("+32-3/123.45.67")
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.Telefoon,"0032 3 123 45 67")
Do $$$AssertEquals(GeconverteerdeKlant.Fax,"+32 3 123 45 67")
@@ -448,15 +448,15 @@
Do NLDAdres.ZetLandNr(##class(DOM.common.enu.Land).Nederland())
Do ..Partij.IndienMethodCall("GeefAdres").DanReturn(NLDAdres)
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.KVKnummer,"12345678")
]]>
@@ -486,7 +486,7 @@
@@ -498,7 +498,7 @@
Do EmailAdressenLijst.Insert("email@example.com")
Do ..Klant.IndienMethodCall("GeefFacturatieEmailAdressen").DanReturn(EmailAdressenLijst)
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.FacturatieNaar,"email@example.com")
]]>
@@ -511,7 +511,7 @@
Do EmailAdressenLijst.Insert("email2@example.com")
Do ..Klant.IndienMethodCall("GeefFacturatieEmailAdressen").DanReturn(EmailAdressenLijst)
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.FacturatieNaar,"")
]]>
@@ -522,18 +522,18 @@
#dim EmailAdressenLijst = ##class(%ListOfDataTypes).%New()
Do ..Klant.IndienMethodCall("GeefFacturatieEmailAdressen").DanReturn(EmailAdressenLijst)
- #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = ..GeefCustomer(..Klant.GeefID())
+ #dim GeconverteerdeKlant As AXif.Crm.CustomerOut.Customer = ..GeefCustomer(..Klant.GeefID())
Do $$$AssertEquals(GeconverteerdeKlant.FacturatieNaar,"")
]]>
KlantId:%String
-AXBizTalk.Crm.Customer.Customer
+AXif.Crm.CustomerOut.Customer