Index: vhUnitTest/DOM/OV/TestFactuur.cls.xml =================================================================== diff -u -r915 -r995 --- vhUnitTest/DOM/OV/TestFactuur.cls.xml (.../TestFactuur.cls.xml) (revision 915) +++ vhUnitTest/DOM/OV/TestFactuur.cls.xml (.../TestFactuur.cls.xml) (revision 995) @@ -1,11 +1,11 @@ - + do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","DOM.OV.TestFactuur") 1 vhUnitTest.TestCase -62158,39192.28006 +62173,56297.418525 0 @@ -25,7 +25,7 @@ Set BonIterator = Factuur.GeefBonIterator() Set Bon = BonIterator.Next() - Set BonLijnIterator = Bon.GeefBonlijnIterator() + Set BonLijnIterator = Bon.GeefBonLijnIterator() Do $$$AssertTrue(BonLijnIterator.%Extends("TECH.Iterator"),"De iterator is correct teruggegeven") Do $$$AssertTrue(BonLijnIterator.HasNext(),"De bon bevat een volgende lijn") Do $$$AssertTrue(BonLijnIterator.Next().%Extends("DOM.OV.impl.DataM.DataMOrderlijn"),"De lijn is een product order lijn") @@ -37,7 +37,7 @@ Set BonIterator = Factuur.GeefBonIterator() Set Bon = BonIterator.Next() - Set TypedBonIterator = Bon.GeefTypeBonlijnIterator(##class(DOM.OV.enu.BonlijnType).Product()) + Set TypedBonIterator = Bon.GeefTypeBonLijnIterator(##class(DOM.OV.enu.BonLijnType).Product()) Do $$$AssertTrue(TypedBonIterator.%Extends("TECH.Iterator"),"De iterator is correct teruggegeven") Do $$$AssertTrue(TypedBonIterator.HasNext(),"De bon bevat een volgende product type lijn") Do $$$AssertTrue(TypedBonIterator.Next().%Extends("DOM.OV.impl.DataM.DataMProductOrderlijn"),"De lijn is een product order lijn") @@ -47,5 +47,5 @@ ]]> - +