Index: OBJTimpl/WMSOrder/ZendOpslagOntvangst.cls.xml
===================================================================
diff -u -r66284 -r66310
--- OBJTimpl/WMSOrder/ZendOpslagOntvangst.cls.xml	(.../ZendOpslagOntvangst.cls.xml)	(revision 66284)
+++ OBJTimpl/WMSOrder/ZendOpslagOntvangst.cls.xml	(.../ZendOpslagOntvangst.cls.xml)	(revision 66310)
@@ -19,7 +19,8 @@
 <Method name="test">
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
-	Set ^RCP("AUTO_OBJT",16261041,222984,230,100)=$H-1
+	;Set ^RCP("AUTO_OBJT",16261041,222984,230,100)=$H-1
+	zw ^RCP("AUTO_OBJT")
 	Do ..VerzendNaVertraging()
 ]]></Implementation>
 </Method>
@@ -31,7 +32,7 @@
 	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
+	Set ^RCP("AUTO_OBJT",RCPNr,TOENr,TLUNr,SubTLNr)=$H-1
 ]]></Implementation>
 </Method>
 
@@ -91,7 +92,7 @@
 	Set Ontvangst=##class(dtoOntvangst).%New()
 	Do Ontvangst.VulInVanuitEWMSControle(.C)
 	Do Ontvangsten.Voegtoe(Ontvangst)
-	Do ##class(OBJTimpl.BestandVerwerker).%New().MaakBestandVoorOBJT(Ontvangsten,"AanmakenVoorraad")
+	Do ##class(OBJTimpl.BestandVerwerker).%New().MaakBestandVoorOBJT(Ontvangsten,"Creatie Voorraad")
 ]]></Implementation>
 </Method>
 </Class>