Index: vhUnitTest/DOM/BKH/impl/OpenstaandeAankoopFactuurRepository/Test.cls.xml =================================================================== diff -u -r34827 -r35009 --- vhUnitTest/DOM/BKH/impl/OpenstaandeAankoopFactuurRepository/Test.cls.xml (.../Test.cls.xml) (revision 34827) +++ vhUnitTest/DOM/BKH/impl/OpenstaandeAankoopFactuurRepository/Test.cls.xml (.../Test.cls.xml) (revision 35009) @@ -51,7 +51,7 @@ Set OpenstaandeVerkoopFactuur = ..OpenstaandeAankoopFactuurRepository.GeefViaLeverancierIDEnFactuurID(..LeverancierID,123455) Do $$$AssertTrue($IsObject(OpenstaandeVerkoopFactuur)) - Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefVervalDatum(),"21.05.16","") + Do $$$AssertEqualsDate(OpenstaandeVerkoopFactuur.GeefVervalDatum(),"21.05.2016") ]]> @@ -60,11 +60,11 @@ #dim OpenstaandeVerkoopFactuurIterator as TECH.Iterator Set OpenstaandeVerkoopFactuurIterator = ..OpenstaandeAankoopFactuurRepository.ZoekViaLeverancierID(..LeverancierID) - Do $$$AssertTrue(OpenstaandeVerkoopFactuurIterator.HasNext(),"") + Do $$$AssertTrue(OpenstaandeVerkoopFactuurIterator.HasNext()) Do OpenstaandeVerkoopFactuurIterator.Next() - Do $$$AssertTrue(OpenstaandeVerkoopFactuurIterator.HasNext(),"") + Do $$$AssertTrue(OpenstaandeVerkoopFactuurIterator.HasNext()) Do OpenstaandeVerkoopFactuurIterator.Next() - Do $$$AssertFalse(OpenstaandeVerkoopFactuurIterator.HasNext(),"") + Do $$$AssertFalse(OpenstaandeVerkoopFactuurIterator.HasNext()) ]]> @@ -73,7 +73,7 @@ #dim OpenstaandeVerkoopFactuur As DOM.BKH.impl.DataM.OpenstaandeVerkoopFactuur Set OpenstaandeVerkoopFactuur = ..OpenstaandeAankoopFactuurRepository.MaakViaLeverancierIDEnFactuurID(..LeverancierID,987654) - Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefFactuurID(),987654,"") + Do $$$AssertEquals(OpenstaandeVerkoopFactuur.GeefFactuurID(),987654) ]]> @@ -99,7 +99,7 @@ #dim OpenstaandeVerkoopFactuurIterator as TECH.Iterator Set OpenstaandeVerkoopFactuurIterator = ..OpenstaandeAankoopFactuurRepository.ZoekViaLeverancierID(..LeverancierID) - Do $$$AssertFalse(OpenstaandeVerkoopFactuurIterator.HasNext(),"") + Do $$$AssertFalse(OpenstaandeVerkoopFactuurIterator.HasNext()) ]]> @@ -111,11 +111,11 @@ Do ..OpenstaandeAankoopFactuurRepository.Bewaar(OpenstaandeVerkoopFactuur) - set OpenstaandeVerkoopFactuur = "" + Set OpenstaandeVerkoopFactuur = $$$NULLOREF Set OpenstaandeVerkoopFactuur = ..OpenstaandeAankoopFactuurRepository.GeefViaLeverancierIDEnFactuurID(..LeverancierID,987654) #dim Code As %String = OpenstaandeVerkoopFactuur.GeefCode() - Do $$$AssertEquals(Code,"C","") + Do $$$AssertEquals(Code,"C") ]]>