Index: BL/Prod/OptiBox/Snijden.cls.xml
===================================================================
diff -u -r69598 -r69666
--- BL/Prod/OptiBox/Snijden.cls.xml	(.../Snijden.cls.xml)	(revision 69598)
+++ BL/Prod/OptiBox/Snijden.cls.xml	(.../Snijden.cls.xml)	(revision 69666)
@@ -378,7 +378,13 @@
 	Set ObjType=$P(pxSnijRes.Reference,".")
 	Set ObjRef=$P(pxSnijRes.Reference,".",2)
 	Set SnijDataID=$P(pxSnijRes.Reference,".",3)
-	Do ..StatusUpdate(SnijDataID, $S($L(pxSnijRes.Errors):"E",1:"F"))
+	
+	#dim SnijStatus As %String = "F"
+	If (##class(TECH.StringUtils).Contains(pxSnijRes.Errors, "90")) {
+		Set SnijStatus = "E"
+	}
+	
+	Do ..StatusUpdate(SnijDataID, SnijStatus)
 	&SQL(DECLARE ProcessSnijResult CURSOR FOR 
 	SELECT %ID INTO QueueID
 	FROM Prod.OptiBox_Queue