Index: vhUnitTest/APPS/PM/Maatwerk/OLM/TestOpMaatFactory.cls.xml =================================================================== diff -u -r1290 -r1291 --- vhUnitTest/APPS/PM/Maatwerk/OLM/TestOpMaatFactory.cls.xml (.../TestOpMaatFactory.cls.xml) (revision 1290) +++ vhUnitTest/APPS/PM/Maatwerk/OLM/TestOpMaatFactory.cls.xml (.../TestOpMaatFactory.cls.xml) (revision 1291) @@ -25,8 +25,8 @@ Set DwarslatClassificatieID = ProductAPI.GeefProductClassificatie(DwarslatOpMaatPRNr).GeefClassificatie().GeefID() Do $$$AssertEquals(DwarslatClassificatieID,1327,"De dwarslat op maat werd gemaakt") - Do $$$AssertFalse($D(^PRBS("IP",191578,200030,"KIND.001")),"De index werd verwijderd") - Do $$$AssertFalse($D(^PRBS("IP",286261,200030,"KIND.003")),"De index werd verwijderd") + Do $$$AssertFalse($D(^PRBS("IP",191578,OrgaluxOpMaatProduct.GeefPRNr(),"KIND.001")),"De index werd verwijderd") + Do $$$AssertFalse($D(^PRBS("IP",286261,OrgaluxOpMaatProduct.GeefPRNr(),"KIND.003")),"De index werd verwijderd") Do DELETE^PRODUKT2(OrgaluxOpMaatProduct.GeefPRNr(),1)