Index: UI/MB/UGLYPicking/UserInteractionUtils.cls.xml
===================================================================
diff -u -r5262 -r5270
--- UI/MB/UGLYPicking/UserInteractionUtils.cls.xml	(.../UserInteractionUtils.cls.xml)	(revision 5262)
+++ UI/MB/UGLYPicking/UserInteractionUtils.cls.xml	(.../UserInteractionUtils.cls.xml)	(revision 5270)
@@ -33,12 +33,10 @@
 		}
 	}	
 	If GaVerder {
-		Do $$$cmReceptie.LockBuffer(RGID,VolgNr)
-		// [RV-JBL Freeze WV]  Toch best het resultaat van de LockBuffer() uitlezen + indien nodig feedback geven.  Zo ben je ten allen tijde zeker dat er geen buffer-visjes door de mazen van het net glippen  :-)  
-		;If '$$$cmReceptie.LockBuffer(..RGID,..VolgNr) {
-		;	Set GaVerder = 0
-		;	Do pdaMsgBox^vhVisual(..Form.Caption,"Buffer '"_RGID_"' met VolgNr '"_VolgNr_"' is reeds in gebruik. Probeer later opnieuw.",$$$MBICONINFORMATION)
-		;}		
+		If '$$$cmReceptie.LockBuffer(RGID,VolgNr) {
+			Set GaVerder = 0
+			Do pdaMsgBox^vhVisual(Form.Caption,"Buffer '"_RGID_"' met VolgNr '"_VolgNr_"' is reeds in gebruik. Probeer later opnieuw.",$$$MBICONINFORMATION,1)
+		}		
 	}
 	Quit GaVerder
 ]]></Implementation>
Index: BL/MB/UGLYPicking/Receptie.cls.xml
===================================================================
diff -u -r5262 -r5270
--- BL/MB/UGLYPicking/Receptie.cls.xml	(.../Receptie.cls.xml)	(revision 5262)
+++ BL/MB/UGLYPicking/Receptie.cls.xml	(.../Receptie.cls.xml)	(revision 5270)
@@ -1413,7 +1413,7 @@
 <FormalSpec>RGID:%String,VolgNr:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Set Lock = "^UPRCP(""B"","""_RGID_""","_VolgNr_")"   ; [RV-JBL Freeze WV]  beter : $Name(^UPRCP("B",RGID,VolgNr))
+	Set Lock = $Name(^UPRCP("B",RGID,VolgNr))
 	Set ID  = ##class(TECH.Lock.LockUtils).GeefProcessID(Lock)
 	Quit ID
 ]]></Implementation>