Thanks Sergey,

I am relatively new to programming. I declared the variables in the Main program and set them to .t.

I created a procedure with the condition if in customer.dbf a field cu_incident="Y" then the variables are set to true and then in the main menu went to the submenu and in skip for set !equal to the variables and regenerated the menu but nothing changed.

Zaheed