Index: WSimpl/AX/Transport/GLS/v01/RegistrationService/RegisterContainerRequestConvertor.cls.xml =================================================================== diff -u -r40820 -r66903 --- WSimpl/AX/Transport/GLS/v01/RegistrationService/RegisterContainerRequestConvertor.cls.xml (.../RegisterContainerRequestConvertor.cls.xml) (revision 40820) +++ WSimpl/AX/Transport/GLS/v01/RegistrationService/RegisterContainerRequestConvertor.cls.xml (.../RegisterContainerRequestConvertor.cls.xml) (revision 66903) @@ -34,6 +34,7 @@ Set AfzenderAdres.LandCode = "BE" Set AfzenderAdres.Postcode = 9100 Set AfzenderAdres.Woonplaats = "SINT-NIKLAAS" + Set AfzenderAdres.Telefoon = "Afz Telefoon" Set LeveringInfo.AfzenderAdres = AfzenderAdres Index: vhUnitTest/WSimpl/AX/Transport/GLS/v01/RegistrationService/RegisterContainerRequestConvertor/Test.cls.xml =================================================================== diff -u -r40582 -r66903 --- vhUnitTest/WSimpl/AX/Transport/GLS/v01/RegistrationService/RegisterContainerRequestConvertor/Test.cls.xml (.../Test.cls.xml) (revision 40582) +++ vhUnitTest/WSimpl/AX/Transport/GLS/v01/RegistrationService/RegisterContainerRequestConvertor/Test.cls.xml (.../Test.cls.xml) (revision 66903) @@ -34,7 +34,6 @@ Do $$$AssertEquals(Resultaat.MuntRembours,Verwacht.MuntRembours) Do $$$AssertEquals(Resultaat.OphaalTijdstip,Verwacht.OphaalTijdstip) Do $$$AssertEquals(Resultaat.Referentie,Verwacht.Referentie) - Do $$$AssertEquals(Resultaat.Telefoon,Verwacht.Telefoon) Do $$$AssertEquals(Resultaat.VerpakkingEenheden.Count(),1) Do $$$AssertObject(Resultaat.VerpakkingEenheden.GetAt(1),Verwacht.VerpakkingEenheden.GetAt(1)) Index: WS/AX/Transport/GLS/v01/dto/LeveringAdres.cls.xml =================================================================== diff -u -r40650 -r66903 --- WS/AX/Transport/GLS/v01/dto/LeveringAdres.cls.xml (.../LeveringAdres.cls.xml) (revision 40650) +++ WS/AX/Transport/GLS/v01/dto/LeveringAdres.cls.xml (.../LeveringAdres.cls.xml) (revision 66903) @@ -14,6 +14,11 @@ + +%String + + + %Library.CacheSerialState LeveringAdresState @@ -52,6 +57,9 @@ Volmacht + +Telefoon + Index: vhTest/Mock/WSimpl/AX/Transport/GLS/v01/RegistrationService/RegisterContainerRequestConvertor.cls.xml =================================================================== diff -u -r40687 -r66903 --- vhTest/Mock/WSimpl/AX/Transport/GLS/v01/RegistrationService/RegisterContainerRequestConvertor.cls.xml (.../RegisterContainerRequestConvertor.cls.xml) (revision 40687) +++ vhTest/Mock/WSimpl/AX/Transport/GLS/v01/RegistrationService/RegisterContainerRequestConvertor.cls.xml (.../RegisterContainerRequestConvertor.cls.xml) (revision 66903) @@ -3,12 +3,18 @@ Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig. -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. +Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt 1 WSimpl.AX.Transport.GLS.v01.RegistrationService.RegisterContainerRequestConvertor,Tools.Mock.MockClassBase right + +VerpakkingEenheidFactory:APPS.TRANSP.impl.VerpakkingEenheidFactory +%Status + + + Request:WS.AX.Transport.GLS.v01.dto.RegisterContainerRequest APPS.TRANSP.dto.LeveringInfo Index: vhTest/Utils/APPS/TRANSP/dto/LeveringInfo.cls.xml =================================================================== diff -u -r66251 -r66903 --- vhTest/Utils/APPS/TRANSP/dto/LeveringInfo.cls.xml (.../LeveringInfo.cls.xml) (revision 66251) +++ vhTest/Utils/APPS/TRANSP/dto/LeveringInfo.cls.xml (.../LeveringInfo.cls.xml) (revision 66903) @@ -106,6 +106,7 @@ Set LeveringInfo.AfzenderAdres.Taal = "" Set LeveringInfo.AfzenderAdres.Toenaam = "HOECKE" Set LeveringInfo.AfzenderAdres.Woonplaats = "SINT-NIKLAAS" + Set LeveringInfo.AfzenderAdres.Telefoon = "Afz Telefoon" Set LeveringInfo.BedragRembours = 0 Set LeveringInfo.EmailVoorBevestiging = "ikke@mail.com" Set LeveringInfo.GeleverdAanKlantNummer = 1000 Index: vhTest/Utils/WS/AX/Transport/GLS/v01/dto/LeveringAdres.cls.xml =================================================================== diff -u -r40582 -r66903 --- vhTest/Utils/WS/AX/Transport/GLS/v01/dto/LeveringAdres.cls.xml (.../LeveringAdres.cls.xml) (revision 40582) +++ vhTest/Utils/WS/AX/Transport/GLS/v01/dto/LeveringAdres.cls.xml (.../LeveringAdres.cls.xml) (revision 66903) @@ -19,6 +19,7 @@ Do Adres.Opmerkingen.Insert("opmerking1") Do Adres.Opmerkingen.Insert("opmerking2") Set Adres.Volmacht = "Volmacht" + Set Adres.Telefoon = "Telefoon" Quit Adres ]]>