... oLbx, oMenuTree, oWndMenu PUBLIC cUsuario cUSUARIO="01" // Criar Gets para identificar qual usuário será configurado IF ASCAN( oWnd:oWndClient:aWnd, {|x| x:cargo == "MenuCA"} ) == 0 DEFINE WINDOW oWndMenu MDICHILD FROM 1, 1 TO 40, 300; TITLE "Controle de Senha Acesso"; BORDER NO of oWnd IF ...