cnmpad = 'MyBest' nCount = CNTBAR(cnmpad) wisthere = 0 For mi = 1 TO nCount wnnnmmm = GETBAR(cnmpad,mi) If PRMBAR(cnmpad, GETBAR(cnmpad,mi)) = allt(mytable.descrip) If MRKBAR(cnmpad, GETBAR(cnmpad,mi)) wisthere = mi Else Set MARK OF bar mi OF mymenu TO .t. wisthere = mi Endif Else If MRKBAR(cnmpad, GETBAR(cnmpad,mi)) Set MARK OF bar mi OF mymenu TO .f. Endif Endif Endfor if wisthere = 0 Define BAR nCount+1 OF mymenu PROMPT allt(mytable.descrip); skip for awx = whatever && your condition here Set MARK OF bar nCount+1 OF janelas TO .t. endif Show MENU ALLHTH