Index: OBJTimpl/WMSOrder/ZendOpslagOntvangst.cls.xml
===================================================================
diff -u -r66898 -r66959
--- OBJTimpl/WMSOrder/ZendOpslagOntvangst.cls.xml	(.../ZendOpslagOntvangst.cls.xml)	(revision 66898)
+++ OBJTimpl/WMSOrder/ZendOpslagOntvangst.cls.xml	(.../ZendOpslagOntvangst.cls.xml)	(revision 66959)
@@ -32,7 +32,8 @@
 	Set PRNr=$P($G(^RCP("D",RCPNr,"D",TOENr,TLUNr,SubTLNr)),"\")
 	Quit:'##class(OBJTimpl.CheckObjectiveFase).ReceptieNaarOBJT(PRNr)
 	
-	Set ^RCP("AUTO_OBJT",RCPNr,TOENr,TLUNr,SubTLNr)=$H-1
+	Set ^RCP("AUTO_OBJT",RCPNr,TOENr,TLUNr,SubTLNr)=$H
+	Set ^RCP("AUTO_OBJT_TMP_MARKEER",RCPNr,TOENr,TLUNr,SubTLNr)=$H
 ]]></Implementation>
 </Method>
 
@@ -56,7 +57,7 @@
 <Implementation><![CDATA[
 	Set SubRec=$G(^RCP("D",RCPNr,"D",TOENr,TLUNr,SubTLNr))
 	Quit:$P(SubRec,"\",2)'="C" ; niet gecontroleerd
-	Quit:$P(SubRec,"\",5)'="" ; gestockeerd op een pallet
+	Quit:$P(SubRec,"\",5)'="" ; reeds gestockeerd op een pallet
 	
 	Set C="C06" ; Stockage
 	Set C("RCPNR")=RCPNr