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
}