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 @@
]]>
-
+
+
+
+
+