Index: vhUnitTest/APPS/OV/OrderBevestiging/WachtrijAfhandelaar/TestBase.cls.xml =================================================================== diff -u -r31962 -r31972 --- vhUnitTest/APPS/OV/OrderBevestiging/WachtrijAfhandelaar/TestBase.cls.xml (.../TestBase.cls.xml) (revision 31962) +++ vhUnitTest/APPS/OV/OrderBevestiging/WachtrijAfhandelaar/TestBase.cls.xml (.../TestBase.cls.xml) (revision 31972) @@ -47,7 +47,7 @@ ]]> - + 1 TECH.ResultSet 1 Index: vhUnitTest/APPS/OV/OrderBevestiging/WachtrijAfhandelaar/BewaarBevestigingen/Test.cls.xml =================================================================== diff -u -r31962 -r31972 --- vhUnitTest/APPS/OV/OrderBevestiging/WachtrijAfhandelaar/BewaarBevestigingen/Test.cls.xml (.../Test.cls.xml) (revision 31962) +++ vhUnitTest/APPS/OV/OrderBevestiging/WachtrijAfhandelaar/BewaarBevestigingen/Test.cls.xml (.../Test.cls.xml) (revision 31972) @@ -40,27 +40,27 @@ ]]> - + @@ -77,19 +77,19 @@ ]]> - + 1 - -OrderBevestiging:APPS.OV.OrderBevestiging.dto.OrderBevestiging,PositieNrOrder:TECH.String,PrijsPerStuk:%Decimal,AantalStuks:%Integer + +OrderBevestiging:APPS.OV.OrderBevestiging.data.OrderLijn,PositieNrOrder:TECH.String,PrijsPerStuk:%Decimal,AantalStuks:%Integer 1 + + +vhDeploy.Deploy + + +%String +OrderBevestigingData verwijderen + + + +1 + + + + + + Index: vhUnitTest/APPS/OV/OrderBevestiging/WachtrijAfhandelaar/VerstuurBevestigingen/Test.cls.xml =================================================================== diff -u -r31715 -r31972 --- vhUnitTest/APPS/OV/OrderBevestiging/WachtrijAfhandelaar/VerstuurBevestigingen/Test.cls.xml (.../Test.cls.xml) (revision 31715) +++ vhUnitTest/APPS/OV/OrderBevestiging/WachtrijAfhandelaar/VerstuurBevestigingen/Test.cls.xml (.../Test.cls.xml) (revision 31972) @@ -41,10 +41,10 @@ Do ..VerstuurderMock.IndienMethodCall("VerstuurBevestigingen", $$$ElkeWaarde).DanDoeNiks() Do ..WachtrijAfhandelaar.VerstuurBevestigingen() - #dim BewaardeBevestigingenResultSet As TECH.ResultSet = ..GeefBewaardeBevestigingenResultSet() + #dim BewaardeOrderBevestigingenResultSet As TECH.ResultSet = ..GeefBewaardeOrderBevestigingenResultSet() - While (BewaardeBevestigingenResultSet.Next()) { - #dim ID As TECH.String = BewaardeBevestigingenResultSet.GetDataByName("ID") + While (BewaardeOrderBevestigingenResultSet.Next()) { + #dim ID As TECH.String = BewaardeOrderBevestigingenResultSet.GetDataByName("ID") #dim OrderBevestigingData As APPS.OV.OrderBevestiging.data.Order = ##class(APPS.OV.OrderBevestiging.data.Order).OpenId(ID) Do $$$AssertEquals(OrderBevestigingData.BevestigingStatus, ##class(APPS.OV.OrderBevestiging.enu.BevestigingStatus).Bevestigd()) Index: APPS/OV/OrderBevestiging/impl/Verstuurder/Base.cls.xml =================================================================== diff -u -r31711 -r31972 --- APPS/OV/OrderBevestiging/impl/Verstuurder/Base.cls.xml (.../Base.cls.xml) (revision 31711) +++ APPS/OV/OrderBevestiging/impl/Verstuurder/Base.cls.xml (.../Base.cls.xml) (revision 31972) @@ -35,18 +35,25 @@ -BestandNaam:TECH.String,Bevestigingen:%ListOfObjects +BestandNaam:TECH.String,OrderBevestigingen:%ListOfObjects 1 - -Bevestiging:APPS.OV.OrderBevestiging.data.Order + +OrderBevestigingLijn:APPS.OV.OrderBevestiging.data.OrderLijn 1 Index: vhUnitTest/APPS/OV/OrderBevestiging/Verstuurder/Test.cls.xml =================================================================== diff -u -r31715 -r31972 --- vhUnitTest/APPS/OV/OrderBevestiging/Verstuurder/Test.cls.xml (.../Test.cls.xml) (revision 31715) +++ vhUnitTest/APPS/OV/OrderBevestiging/Verstuurder/Test.cls.xml (.../Test.cls.xml) (revision 31972) @@ -43,10 +43,10 @@ - + 1 %ListOfObjects -ELEMENTTYPE="APPS.OV.OrderBevestiging.dto.OrderBevestiging" +ELEMENTTYPE="APPS.OV.OrderBevestiging.data.Order" - + BevestigingID:TECH.String 1 APPS.OV.OrderBevestiging.data.Order + + + +BevestigingID:TECH.String,LijnID:TECH.String +1 +APPS.OV.OrderBevestiging.data.OrderLijn + + + + + + + + + - +}*/ +]]> +