Index: vhUnitTest/WSimpl/Halux/PPS/MatService/ZetStatusGesneden/Test.cls.xml =================================================================== diff -u -r66733 -r66734 --- vhUnitTest/WSimpl/Halux/PPS/MatService/ZetStatusGesneden/Test.cls.xml (.../Test.cls.xml) (revision 66733) +++ vhUnitTest/WSimpl/Halux/PPS/MatService/ZetStatusGesneden/Test.cls.xml (.../Test.cls.xml) (revision 66734) @@ -28,6 +28,32 @@ Do $$$AssertEquals(Antwoord.Header.Omschrijving,"Geen data gevonden voor mat met ProductId '"_Request.ProductId_"' en dossiercode '"_Request.DossierCode_"'.") ]]> + + + + Index: WSimpl/Halux/PPS/MatService.cls.xml =================================================================== diff -u -r66733 -r66734 --- WSimpl/Halux/PPS/MatService.cls.xml (.../MatService.cls.xml) (revision 66733) +++ WSimpl/Halux/PPS/MatService.cls.xml (.../MatService.cls.xml) (revision 66734) @@ -87,7 +87,12 @@ #dim MatInfoIterator As TECH.Iterator = ..MatInfoRepository.ZoekViaProductIdEnDossierCode(ProductId, DossierCode) If (MatInfoIterator.HasNext()) { + If ($$$Not(MatInfoIterator.HasNext())) { + } Else { + Set Response.Header.Status = ##class(TECH.enu.ExceptionCode).DataCorrupt() + Set Response.Header.Omschrijving = "Meerdere records gevonden voor mat met ProductId '"_ProductId_"' en dossiercode '"_DossierCode_"'." + } } Else { Set Response.Header.Status = ##class(TECH.enu.ExceptionCode).DataNotFound() Set Response.Header.Omschrijving = "Geen data gevonden voor mat met ProductId '"_ProductId_"' en dossiercode '"_DossierCode_"'."