Index: APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml =================================================================== diff -u -r52455 -r54054 --- APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 52455) +++ APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 54054) @@ -32,6 +32,7 @@ Set NacalculatieDto.LeveradresStraat = Levering.GeefAdres().GeefStraat() Set NacalculatieDto.OphaalTijdstip = Rit.GeefOphaalTimeStamp() Set NacalculatieDto.RitNummer = RitId + Set NacalculatieDto.Bonnummers = ..MaakBonnummerLijstje(Levering) Do Resultaat.Insert(NacalculatieDto) } } @@ -42,6 +43,21 @@ Quit Resultaat ]]> + + +Levering:DOM.TRANSP.impl.DataM.DataMLevering +%String + + Index: APPS/TRANSP/impl/TransportService/Nacalculator/RapportDataFactory.cls.xml =================================================================== diff -u -r52409 -r54054 --- APPS/TRANSP/impl/TransportService/Nacalculator/RapportDataFactory.cls.xml (.../RapportDataFactory.cls.xml) (revision 52409) +++ APPS/TRANSP/impl/TransportService/Nacalculator/RapportDataFactory.cls.xml (.../RapportDataFactory.cls.xml) (revision 54054) @@ -31,6 +31,7 @@ Do ..VoegToeEigenschap(KeyValueList, "LeveradresStraat") Do ..VoegToeEigenschap(KeyValueList, "LeveradresPostcode") Do ..VoegToeEigenschap(KeyValueList, "LeveradresGemeente") + Do ..VoegToeEigenschap(KeyValueList, "Bonnummers") Quit KeyValueList ]]> Index: vhTest/Fake/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml =================================================================== diff -u -r52413 -r54054 --- vhTest/Fake/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 52413) +++ vhTest/Fake/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 54054) @@ -13,6 +13,13 @@ + + +Levering:DOM.TRANSP.impl.DataM.DataMLevering +%String + + Index: vhTest/Mock/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml =================================================================== diff -u -r52455 -r54054 --- vhTest/Mock/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 52455) +++ vhTest/Mock/APPS/TRANSP/impl/TransportService/Nacalculator/TransportdataVoorKlantBepaler.cls.xml (.../TransportdataVoorKlantBepaler.cls.xml) (revision 54054) @@ -14,6 +14,13 @@ + + +Levering:DOM.TRANSP.impl.DataM.DataMLevering +%String + + Index: vhUnitTest/APPS/TRANSP/impl/TransportService/Nacalculator/DoeNalculatie/Test.cls.xml =================================================================== diff -u -r52457 -r54054 --- vhUnitTest/APPS/TRANSP/impl/TransportService/Nacalculator/DoeNalculatie/Test.cls.xml (.../Test.cls.xml) (revision 52457) +++ vhUnitTest/APPS/TRANSP/impl/TransportService/Nacalculator/DoeNalculatie/Test.cls.xml (.../Test.cls.xml) (revision 54054) @@ -121,6 +121,7 @@ Set NacalculatieDto.LeveradresStraat = "Straat" Set NacalculatieDto.OphaalTijdstip = $H Set NacalculatieDto.RitNummer = Teller + Set NacalculatieDto.Bonnummers = "123456" Do Resultaat.Insert(NacalculatieDto) Set Teller = Teller + 1 }