Index: vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/NietMeerekenenBepaler/Test.cls.xml =================================================================== diff -u -r59417 -r59502 --- vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/NietMeerekenenBepaler/Test.cls.xml (.../Test.cls.xml) (revision 59417) +++ vhUnitTest/DOM/PM/impl/VerkoopPrijsBepaler/NietMeerekenenBepaler/Test.cls.xml (.../Test.cls.xml) (revision 59502) @@ -31,7 +31,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant, $$$False) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -40,7 +40,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -51,7 +51,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant, $$$True) - Do $$$AssertEquals(ListNietMeerekenens.Count(),5) + Do $$$AssertEquals(ListNietMeerekenens.Count(),6) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -60,7 +60,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -71,7 +71,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant, $$$False) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -80,7 +80,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -91,7 +91,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant, $$$True) - Do $$$AssertEquals(ListNietMeerekenens.Count(),5) + Do $$$AssertEquals(ListNietMeerekenens.Count(),6) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -100,7 +100,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -111,15 +111,15 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponBlumotionSetEenhedenEnMeenemers)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponBlumotionSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -130,7 +130,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -139,7 +139,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -150,7 +150,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -159,7 +159,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -170,7 +170,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -179,7 +179,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -190,7 +190,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -199,7 +199,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -210,7 +210,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -219,7 +219,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -230,7 +230,7 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) @@ -239,7 +239,7 @@ Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) ]]> @@ -274,15 +274,15 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant, $$$True) - Do $$$AssertEquals(ListNietMeerekenens.Count(),5) + Do $$$AssertEquals(ListNietMeerekenens.Count(),6) Do $$$AssertTrue(ListNietMeerekenens.Find(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).Glijder())) Do $$$AssertTrue(ListNietMeerekenens.Find(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSetEenhedenEnMeenemers())) Do $$$AssertTrue(ListNietMeerekenens.Find(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponBlumotionSynchronisatieStang())) Do $$$AssertTrue(ListNietMeerekenens.Find(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieStang())) Do $$$AssertTrue(ListNietMeerekenens.Find(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).TiponSynchronisatieTandwiel())) Do $$$AssertFalse(ListNietMeerekenens.Find(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).FrontBevestiging())) - Do $$$AssertFalse(ListNietMeerekenens.Find(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).Koppeling())) + Do $$$AssertTrue(ListNietMeerekenens.Find(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren).Koppeling())) Do ProjectSettingsAPIMock.Verifieer() ]]> @@ -298,15 +298,15 @@ #dim Variant as DOM.PM.enu.Variant = ##class(DOM.PM.enu.Variant).Taorbox() #dim ListNietMeerekenens as %ListOfObjects = NietMeerekenenBepaler.GeefNietMeerekenen(KlantID , Variant, $$$False) - Do $$$AssertEquals(ListNietMeerekenens.Count(),6) + Do $$$AssertEquals(ListNietMeerekenens.Count(),7) Set TAORNietMeeleveren = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORNietMeeleveren.AutoComplete).%New() Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Glijder)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponBlumotionSetEenhedenEnMeenemers)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponBlumotionSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieStang)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.TiponSynchronisatieTandwiel)) Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.FrontBevestiging)) - Do $$$AssertFalse(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) + Do $$$AssertTrue(ListNietMeerekenens.Find(TAORNietMeeleveren.Koppeling)) Do ProjectSettingsAPIMock.Verifieer() ]]>