Index: UI/MB/UGLYPicking/dlgReceptie.cls.xml
===================================================================
diff -u -r5133 -r5135
--- UI/MB/UGLYPicking/dlgReceptie.cls.xml	(.../dlgReceptie.cls.xml)	(revision 5133)
+++ UI/MB/UGLYPicking/dlgReceptie.cls.xml	(.../dlgReceptie.cls.xml)	(revision 5135)
@@ -574,20 +574,22 @@
 	   New Msg
 	   Set Msg="Wenst u de huidige lijst af te sluiten?"
 	   If $$pdaMsgBox^vhVisual(..Form.Caption,Msg,$$$MBICONQUESTION,1)=$$$mrOk 
-	   {
+	   {		   
+		   If (..LocatieScanNadien){	 	 
+			 New RForm
+		 	 Set RForm=##class(UI.MB.UGLYPicking.dlgReceptieScanNadien).%New($LB(%this.Form.Address,0)) 	 
+		 	 Do RForm.Init(..RGID,..VolgNr,..txtLocatie.Text,..txtPalletID.Text)
+			 Do RForm.Form.ShowModal()
+		   }
+		   
 		   Set MApplication.ScreenCursor=$$$crHourGlass
 		   New tmpStatus
 		   Set tmpStatus=$$$cmReceptie.CloseAndHandleBuffer(..RGID,..VolgNr)
 		   Set MApplication.ScreenCursor=$$$crDefault
 		   If $LI(tmpStatus)<0 {
 			    Do pdaMsgBox^vhVisual(..Form.Caption,$LI(tmpStatus,2),$$$MBICONERROR)
 		   }
-		   If (..LocatieScanNadien){	 	 
-			 New RForm
-		 	 Set RForm=##class(UI.MB.UGLYPicking.dlgReceptieScanNadien).%New($LB(%this.Form.Address,0)) 	 
-		 	 Do RForm.Init(..RGID,..VolgNr,..txtLocatie.Text,..txtPalletID.Text)
-			 Do RForm.Form.ShowModal()
-		  }
+		   
 	   }
   	}
  }