Index: BL/Prod/OptiBox/Snijden.cls.xml
===================================================================
diff -u -r70301 -r72299
--- BL/Prod/OptiBox/Snijden.cls.xml	(.../Snijden.cls.xml)	(revision 70301)
+++ BL/Prod/OptiBox/Snijden.cls.xml	(.../Snijden.cls.xml)	(revision 72299)
@@ -285,7 +285,7 @@
 	&SQL(DECLARE GetInfo CURSOR FOR 
 	Select %ID,BoxUsage,Status,BoxCloneVan into :ID, :BoxUsage, :Status,:BoxCloneVan
 	from Prod.OptiBox_SnijData 
-	where ObjType=:ObjType and ObjRef=:ObjRef and ObjLijnRef=:ObjLijnRef
+	where ObjType=:ObjType and ObjRef=:ObjRef 
 	      and BoxDeelVan=:BoxDeelVan and IsRedo is null)
 	&sql(OPEN GetInfo)
  	For  &sql(FETCH GetInfo) Quit:SQLCODE  Do
@@ -614,14 +614,6 @@
 		} else {
 			Do ##class(vhLib.Logger).%New().Info(..%ClassName(1),"simulatie snijden met prioriteit " _ ..oRequest.Prioriteit _ $$$CRLF _ RequestXml)
 		}
-		If (..oRequest.SnijMachineID = "VH") {
-			If (..ProductIdCutRequest > 0) {
-				Set ^LogKartonOpdrachtenOL(..ProductIdCutRequest, "Origineel", $Increment(^LogKartonOpdrachtenOL)) = RequestXml
-			} Else {
-				#dim SubNode As %Integer = $Increment(^LogKartonOpdrachtenOL)
-				Set ^LogKartonOpdrachtenOL(SubNode, "Origineel", SubNode) = RequestXml
-			}
-		}
 	} catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
 	}
@@ -867,7 +859,7 @@
 	&SQL(DECLARE GetCuts CURSOR FOR 
 	Select %ID,BoxUsage,Status,BoxCloneVan into :ID, :BoxUsage, :Status,:BoxCloneVan
 	from Prod.OptiBox_SnijData 
-	where ObjType=:ObjType and ObjRef=:ObjRef and ObjLijnRef=:ObjLijnRef
+	where ObjType=:ObjType and ObjRef=:ObjRef
 	      and BoxDeelVan=:BoxDeelVan and IsRedo is null
 	order by OptiData,Sequentie)