Index: vhUnitTest/WSimpl/Halux/PPS/MatService/ZetStatusGesneden/Test.cls.xml =================================================================== diff -u -r66636 -r66732 --- vhUnitTest/WSimpl/Halux/PPS/MatService/ZetStatusGesneden/Test.cls.xml (.../Test.cls.xml) (revision 66636) +++ vhUnitTest/WSimpl/Halux/PPS/MatService/ZetStatusGesneden/Test.cls.xml (.../Test.cls.xml) (revision 66732) @@ -3,15 +3,15 @@ vhUnitTest.TestCase - + Index: WS/Halux/PPS/MatService/ZetStatusGesnedenRequest.cls.xml =================================================================== diff -u -r66634 -r66732 --- WS/Halux/PPS/MatService/ZetStatusGesnedenRequest.cls.xml (.../ZetStatusGesnedenRequest.cls.xml) (revision 66634) +++ WS/Halux/PPS/MatService/ZetStatusGesnedenRequest.cls.xml (.../ZetStatusGesnedenRequest.cls.xml) (revision 66732) @@ -13,6 +13,11 @@ 1 + +%String +1 + + %Boolean 1 @@ -29,6 +34,9 @@ IsGesneden + +DossierCode + Index: WSimpl/Halux/PPS/MatService.cls.xml =================================================================== diff -u -r66713 -r66732 --- WSimpl/Halux/PPS/MatService.cls.xml (.../MatService.cls.xml) (revision 66713) +++ WSimpl/Halux/PPS/MatService.cls.xml (.../MatService.cls.xml) (revision 66732) @@ -80,12 +80,14 @@ Try { #dim ProductId As %Integer = ZetStatusGesnedenRequest.ProductId + #dim DossierCode As %String = ZetStatusGesnedenRequest.DossierCode + #dim IsGesneden As %Boolean = ZetStatusGesnedenRequest.IsGesneden - If ($$$Not(ProductId = "")) { - + If ($$$Not(ProductId = "") && $$$Not(DossierCode = "")) { + } Else { Set Response.Header.Status = ##class(TECH.enu.ExceptionCode).InvalidInput() - Set Response.Header.Omschrijving = "Geen ProductId meegegeven." + Set Response.Header.Omschrijving = "Geen ProductId en/of dossiercode meegegeven." } } Catch { #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()