Local lcMenu, lcSub
clear
FOR i = 1 TO CNTPAD('_msysmenu')
  lcMenu = (GETPAD('_msysmenu', i))
  ?lcMenu
  FOR j = 1 TO CNTPAD(lcMenu)
    lcSub = (GETPAD(lcMenu, j))
    ?".........." + lcSub
  ENDFOR
ENDFOR