Index: vhUnitTest/APPS/Halux/Planning/TestPlanningService.cls.xml =================================================================== diff -u -r1133 -r1147 --- vhUnitTest/APPS/Halux/Planning/TestPlanningService.cls.xml (.../TestPlanningService.cls.xml) (revision 1133) +++ vhUnitTest/APPS/Halux/Planning/TestPlanningService.cls.xml (.../TestPlanningService.cls.xml) (revision 1147) @@ -306,15 +306,15 @@ Do $$$AssertTrue($IsObject(Instellingen),"De instellingen zijn een object") - Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt("Maandag")),"De resourcedrempels zijn gezet") - Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt("Dinsdag")),"De resourcedrempels zijn gezet") - Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt("Woensdag")),"De resourcedrempels zijn gezet") - Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt("Donderdag")),"De resourcedrempels zijn gezet") - Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt("Vrijdag")),"De resourcedrempels zijn gezet") - Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt("Zaterdag")),"De resourcedrempels zijn gezet") - Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt("Zondag")),"De resourcedrempels zijn gezet") + Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt(1)),"De resourcedrempels zijn gezet") + Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt(2)),"De resourcedrempels zijn gezet") + Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt(3)),"De resourcedrempels zijn gezet") + Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt(4)),"De resourcedrempels zijn gezet") + Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt(5)),"De resourcedrempels zijn gezet") + Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt(6)),"De resourcedrempels zijn gezet") + Do $$$AssertTrue($IsObject(Instellingen.ResourceDrempels.GetAt(7)),"De resourcedrempels zijn gezet") - Set ResourceDrempels = Instellingen.ResourceDrempels.GetAt("Maandag") + Set ResourceDrempels = Instellingen.ResourceDrempels.GetAt(1) Do $$$AssertTrue($IsObject(ResourceDrempels.ALUFrees),"De drempel is ingesteld") Do $$$AssertTrue($IsObject(ResourceDrempels.ALUTeam),"De drempel is ingesteld")