Index: BL/Prod/OptiBox/Snijden.cls.xml =================================================================== diff -u -r1074 -r2692 --- BL/Prod/OptiBox/Snijden.cls.xml (.../Snijden.cls.xml) (revision 1074) +++ BL/Prod/OptiBox/Snijden.cls.xml (.../Snijden.cls.xml) (revision 2692) @@ -7,7 +7,6 @@ BL.Prod.OptiBox 1 %RegisteredObject -0 192.168.200.6 @@ -372,7 +371,7 @@ &SQL(DECLARE ProcessSnijResult CURSOR FOR SELECT %ID INTO QueueID FROM Prod.OptiBox_Queue - WHERE ObjType=:ObjType and ObjRef=:ObjRef and SnijData=:SnijDataID and Type=$$$qtSnijden) + WHERE ObjType=:ObjType and ObjRef=:ObjRef and SnijData=:SnijDataID and Type='S') &sql(OPEN ProcessSnijResult) For &sql(FETCH ProcessSnijResult) Quit:SQLCODE Do ; Normaal maar 1 record . ;Do WL^vhDBG("NEXT")