Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml =================================================================== diff -u -r37932 -r37942 --- vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 37932) +++ vhUnitTest/AXimpl/BizTalkMessage/Converter/CustomerConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 37942) @@ -105,17 +105,17 @@ Do $$$AssertEquals(GeconverteerdeKlant.Kredietlimiet,"1000") Do $$$AssertEquals(GeconverteerdeKlant.FacturatieFrequentie,"D2") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).Klantnummer,"01234") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).Straat1,"Fakestraat") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).Postcode,"1234") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).Plaats,"Fakegem") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).LandCodeISO3,"BEL") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).Telefoon,"") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).Verzendwijze,"") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).LeveringAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).BezoekAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).ToonzaalAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).FacturatieAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).Klantnummer,"01234") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).Straat1,"Fakestraat") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).Postcode,"1234") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).Plaats,"Fakegem") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).LandCodeISO3,"BEL") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).Telefoon,"") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).Verzendwijze,"") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).LeveringAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).BezoekAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).ToonzaalAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).FacturatieAdres,$$$False) ]]> @@ -296,30 +296,30 @@ #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID()) - If $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),3) { - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Klantnummer,"01234") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Straat1,"Straat 1") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Postcode,"9101") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Plaats,"Gemeente 1") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).LandCodeISO3,"BEL") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Telefoon,"03/1234561") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Verzendwijze,"VerzendingWijze1") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).LeveringAdres,$$$True) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).BezoekAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).ToonzaalAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).FacturatieAdres,$$$False) + If $$$AssertEquals(GeconverteerdeKlant.Leveradressen.Count(),3) { + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Klantnummer,"01234") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Straat1,"Straat 1") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Postcode,"9101") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Plaats,"Gemeente 1") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).LandCodeISO3,"BEL") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Telefoon,"03/1234561") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Verzendwijze,"VerzendingWijze1") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).LeveringAdres,$$$True) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).BezoekAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).ToonzaalAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).FacturatieAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).Klantnummer,"01234") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).Straat1,"Straat 2") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).Postcode,"9102") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).Plaats,"Gemeente 2") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).LandCodeISO3,"BEL") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).Telefoon,"03/1234562") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).Verzendwijze,"VerzendingWijze2") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).LeveringAdres,$$$True) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).BezoekAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).ToonzaalAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).FacturatieAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).Klantnummer,"01234") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).Straat1,"Straat 2") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).Postcode,"9102") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).Plaats,"Gemeente 2") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).LandCodeISO3,"BEL") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).Telefoon,"03/1234562") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).Verzendwijze,"VerzendingWijze2") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).LeveringAdres,$$$True) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).BezoekAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).ToonzaalAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).FacturatieAdres,$$$False) } ]]> @@ -330,7 +330,7 @@ #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID()) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),1) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.Count(),1) ]]> @@ -342,18 +342,18 @@ #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID()) - If $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),2) { - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Klantnummer,"01234") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Straat1,"Fakestraat") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Postcode,"1234") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Plaats,"Fakegem") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).LandCodeISO3,"BEL") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Telefoon,"") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).Verzendwijze,"") - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).LeveringAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).BezoekAdres,$$$True) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).ToonzaalAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).FacturatieAdres,$$$False) + If $$$AssertEquals(GeconverteerdeKlant.Leveradressen.Count(),2) { + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Klantnummer,"01234") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Straat1,"Fakestraat") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Postcode,"1234") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Plaats,"Fakegem") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).LandCodeISO3,"BEL") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Telefoon,"") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).Verzendwijze,"") + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).LeveringAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).BezoekAdres,$$$True) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).ToonzaalAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).FacturatieAdres,$$$False) } ]]> @@ -368,26 +368,26 @@ #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID()) - If $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),4) { - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).LeveringAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).BezoekAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).ToonzaalAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(1).FacturatieAdres,$$$False) + If $$$AssertEquals(GeconverteerdeKlant.Leveradressen.Count(),4) { + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).LeveringAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).BezoekAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).ToonzaalAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(1).FacturatieAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).LeveringAdres,$$$True) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).BezoekAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).ToonzaalAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).FacturatieAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).LeveringAdres,$$$True) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).BezoekAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).ToonzaalAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).FacturatieAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).LeveringAdres,$$$True) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).BezoekAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).ToonzaalAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(3).FacturatieAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).LeveringAdres,$$$True) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).BezoekAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).ToonzaalAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(3).FacturatieAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(4).LeveringAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(4).BezoekAdres,$$$True) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(4).ToonzaalAdres,$$$False) - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(4).FacturatieAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(4).LeveringAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(4).BezoekAdres,$$$True) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(4).ToonzaalAdres,$$$False) + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(4).FacturatieAdres,$$$False) } ]]> @@ -402,8 +402,8 @@ #dim GeconverteerdeKlant As AXBizTalk.Crm.Customer.Customer = Converter.Convert(..Klant.GeefID()) - If $$$AssertEquals(GeconverteerdeKlant.Adressen.Count(),2) { - Do $$$AssertEquals(GeconverteerdeKlant.Adressen.GetAt(2).LandCodeISO3,"BEL") + If $$$AssertEquals(GeconverteerdeKlant.Leveradressen.Count(),2) { + Do $$$AssertEquals(GeconverteerdeKlant.Leveradressen.GetAt(2).LandCodeISO3,"BEL") } ]]>