Index: vhMenu.mac.rou
===================================================================
diff -u -r29059 -r56978
--- vhMenu.mac.rou	(.../vhMenu.mac.rou)	(revision 29059)
+++ vhMenu.mac.rou	(.../vhMenu.mac.rou)	(revision 56978)
@@ -172,8 +172,15 @@
  If M'="",MKey[(";"_M_";")!(MKey[(";"_M_"*;"))
  Else  Goto:M'="" L11
  ;Include test uitvoeren
- If $P(R,"`",5)'="",@$TR($P(R,"`",5),"~","\") 
- Else  Goto:$P(R,"`",5)'="" L11
+ Try {
+	If $P(R,"`",5)'="",@$TR($P(R,"`",5),"~","\") 
+ 	Else  Goto:$P(R,"`",5)'="" L11
+ } Catch {
+	#Dim Exception As TECH.IException = ##class(TECH.ExceptionHandler).Catch()
+	Do Exception.VoegToeExtraInfo("Menuitem wordt overgeslagen, want evaluatie van een voorwaarde is gecrasht. R={"_R_"}; MNNm={"_MNNm_"}")
+	Do ##class(vhLib.Logger).%New().LogExceptie(Exception)
+	Goto L11
+ }
  If "F"=$P(R,"`",3) Do FLEX Goto L11
  ; Include submenu
  If ZI=2,"M"=$P(R,"`",3) Do FETCHMN($P(R,"`",4)) Goto L11
@@ -287,8 +294,15 @@
 	 If M'="",MKey[(";"_M_";")!(MKey[(";"_M_"*;"))
 	 Else  Continue:M'=""
 	 ;Include test uitvoeren
-	 If $P(R,"`",5)'="",@$TR($P(R,"`",5),"~","\") 
-	 Else  Continue:$P(R,"`",5)'=""
+	 Try {
+	 	If $P(R,"`",5)'="",@$TR($P(R,"`",5),"~","\") 
+	 	Else  Continue:$P(R,"`",5)'=""
+	 } Catch {
+		#Dim Exception As TECH.IException = ##class(TECH.ExceptionHandler).Catch()
+		Do Exception.VoegToeExtraInfo("Menuitem wordt overgeslagen, want evaluatie van een voorwaarde is gecrasht. R={"_R_"}; MNNm={"_MNNm_"}")
+		Do ##class(vhLib.Logger).%New().LogExceptie(Exception)
+		Continue
+	 }
 	 ; Include submenu
 	 If $P(R,"`",3)="M" Do EXEC($P(R,"`",4),.Trig) Continue
 	 Continue:";"_$P(R,"`",7)_";"'[(";"_Trig_";")  ; ExecTrigger