Index: APPS/TRANSP/OfferteService/dto/TeverzendenItem.cls.xml =================================================================== diff -u -r36388 -r36413 --- APPS/TRANSP/OfferteService/dto/TeverzendenItem.cls.xml (.../TeverzendenItem.cls.xml) (revision 36388) +++ APPS/TRANSP/OfferteService/dto/TeverzendenItem.cls.xml (.../TeverzendenItem.cls.xml) (revision 36413) @@ -27,7 +27,7 @@ -APPS.TRANSP.dto.Afmeting +APPS.TRANSP.OfferteService.dto.Afmeting Index: zTryout/KCA/UPS/OfferteBerekenaar/Test.cls.xml =================================================================== diff -u -r36388 -r36413 --- zTryout/KCA/UPS/OfferteBerekenaar/Test.cls.xml (.../Test.cls.xml) (revision 36388) +++ zTryout/KCA/UPS/OfferteBerekenaar/Test.cls.xml (.../Test.cls.xml) (revision 36413) @@ -79,7 +79,7 @@ Set TeverzendItem.WaardeGoederen = Item * 10 Set TeverzendItem.Gewicht = Item * 5000 Set TeverzendItem.Aantal = 1 - Set TeverzendItem.Afmeting = ##class(APPS.TRANSP.dto.Afmeting).%New(Item * 5, Item * 10, Item * 10 ) + Set TeverzendItem.Afmeting = ##class(APPS.TRANSP.OfferteService.dto.Afmeting).%New(Item * 5, Item * 10, Item * 10 ) Do BerekenInput.TeVerzendenItems.Insert(TeverzendItem) } ]]> Index: APPS/TRANSP/Offerte/impl/UPS/OfferteBerekenaar.cls.xml =================================================================== diff -u -r34874 -r36413 --- APPS/TRANSP/Offerte/impl/UPS/OfferteBerekenaar.cls.xml (.../OfferteBerekenaar.cls.xml) (revision 34874) +++ APPS/TRANSP/Offerte/impl/UPS/OfferteBerekenaar.cls.xml (.../OfferteBerekenaar.cls.xml) (revision 36413) @@ -66,6 +66,7 @@ Set BerekenRequest.BerekenInput = BerekenInput try { + Do ##class(Tools.Wlip).%New(26).DataTransferObject(BerekenRequest.BerekenInput.TeVerzendenItems.GetAt(1).Afmeting) #dim BerekenResponse As APPS.TRANSP.Offerte.impl.UPS.BerekenResponse = ..Process(BerekenRequest) }catch { #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() FishEye: Tag 36388 refers to a dead (removed) revision in file `APPS/TRANSP/OfferteService/dto/Afmeting.cls.xml'. FishEye: No comparison available. Pass `N' to diff? Index: APPS/VKP/Offerte/dto/Verpakking.cls.xml =================================================================== diff -u -r36388 -r36413 --- APPS/VKP/Offerte/dto/Verpakking.cls.xml (.../Verpakking.cls.xml) (revision 36388) +++ APPS/VKP/Offerte/dto/Verpakking.cls.xml (.../Verpakking.cls.xml) (revision 36413) @@ -4,7 +4,7 @@ TECH.DataTransferObject -APPS.TRANSP.dto.Afmeting +APPS.TRANSP.OfferteService.dto.Afmeting Index: APPS/VKP/impl/OfferteService.cls.xml =================================================================== diff -u -r36388 -r36413 --- APPS/VKP/impl/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 36388) +++ APPS/VKP/impl/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 36413) @@ -269,7 +269,7 @@ #dim MaatwerkLijnIterator As TECH.Iterator = ..GeefMaatwerkLijnenIterator(..OfferteRepository.GeefViaID(OfferteID)) While (MaatwerkLijnIterator.HasNext()) { #dim Lijn As DOM.EC.Winkelkar.MaatwerkLijn = MaatwerkLijnIterator.Next() - #dim Afmeting As APPS.TRANSP.dto.Afmeting = ..ConverteerVerpakteAfmeting(Lijn.GeefVerpakteAfmeting()) + #dim Afmeting As APPS.TRANSP.OfferteService.dto.Afmeting = ..ConverteerVerpakteAfmeting(Lijn.GeefVerpakteAfmeting()) #dim Verpakking As APPS.VKP.Offerte.dto.Verpakking = ##class(APPS.VKP.Offerte.dto.Verpakking).%New(Afmeting ,Lijn.GeefTotaalGewicht(),Lijn.GeefTotaalPrijs(),Lijn.GeefProductID(),Lijn.GeefAantal()) Do VerpakkingList.Insert(Verpakking) } @@ -279,14 +279,14 @@ VerpakteAfmeting:APPS.Halux.common.impl.VerpakteAfmeting="" -APPS.TRANSP.dto.Afmeting +APPS.TRANSP.OfferteService.dto.Afmeting