Index: vhTest/Fake/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml =================================================================== diff -u -r56270 -r64044 --- vhTest/Fake/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 56270) +++ vhTest/Fake/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 64044) @@ -20,6 +20,20 @@ + + +Levering:DOM.TRANSP.impl.DataM.DataMLevering +%Boolean + + + + +Levering:DOM.TRANSP.impl.DataM.DataMLevering +%Boolean + + Index: APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml =================================================================== diff -u -r64043 -r64044 --- APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 64043) +++ APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 64044) @@ -86,9 +86,10 @@ If (Rit.GeefID() > RitId && ..BevatTransporteurIteratorTransporteur(TransporteurIterator, Rit.GeefTransporteur())) { #dim LeveringIterator = Rit.GeefLeveringIterator() #dim Levering As DOM.TRANSP.impl.DataM.DataMLevering + While LeveringIterator.HasNext() { Set Levering = LeveringIterator.Next() - If Levering.GeefGeleverdAanKlantID() = KlantId { + If ..MagNacalculatieToevoegen(Levering, KlantId) { Set NacalculatieDto = ##class(APPS.TRANSP.dto.Nacalculatie).%New() Set NacalculatieDto.AantalColli = Levering.GeefAantalColli() Set NacalculatieDto.AantalEuroPallet = Levering.GeefAantalEuroPalletten() @@ -118,6 +119,14 @@ ]]> + +Levering:DOM.TRANSP.impl.DataM.DataMLevering,KlantId:DOM.common.PartijID +1 +%Boolean + + + KlantId:DOM.common.PartijID,NacalculatieDto:APPS.TRANSP.dto.Nacalculatie,Levering:DOM.TRANSP.impl.DataM.DataMLevering 1