Index: WSimpl/Halux/PPS/MatService.cls.xml =================================================================== diff -u -r66734 -r66744 --- WSimpl/Halux/PPS/MatService.cls.xml (.../MatService.cls.xml) (revision 66734) +++ WSimpl/Halux/PPS/MatService.cls.xml (.../MatService.cls.xml) (revision 66744) @@ -13,6 +13,11 @@ 1 + +TECH.DateTime.DateTimeAPI +1 + + BatchService:APPS.Halux.common.impl.BatchService="",MatInfoRepository:DOM.Halux.PPS.MatInfoRepository="" 1 @@ -22,6 +27,7 @@ @@ -87,8 +93,14 @@ #dim MatInfoIterator As TECH.Iterator = ..MatInfoRepository.ZoekViaProductIdEnDossierCode(ProductId, DossierCode) If (MatInfoIterator.HasNext()) { - If ($$$Not(MatInfoIterator.HasNext())) { - + #dim MatInfo As DOM.Halux.PPS.MatInfo = MatInfoIterator.Next() + If ($$$Not(MatInfoIterator.HasNext())) { + If (IsGesneden && $$$Not(MatInfo.IsGesneden)) { + + } Else { + Set Response.Header.Status = ##class(TECH.enu.ExceptionCode).IllegalUsage() + Set Response.Header.Omschrijving = "Alle matten voor ProductId '"_ProductId_"' en dossiercode '"_DossierCode_"' zijn reeds gesneden op '"_MatInfo.SnijTijdstip_"'." + } } 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_"'." Index: vhUnitTest/WSimpl/Halux/PPS/MatService/ZetStatusGesneden/Test.cls.xml =================================================================== diff -u -r66734 -r66744 --- vhUnitTest/WSimpl/Halux/PPS/MatService/ZetStatusGesneden/Test.cls.xml (.../Test.cls.xml) (revision 66734) +++ vhUnitTest/WSimpl/Halux/PPS/MatService/ZetStatusGesneden/Test.cls.xml (.../Test.cls.xml) (revision 66744) @@ -29,7 +29,7 @@ ]]> - + + + + +