Maybe this is back to the original question. I believe you were having issues iterating through more than one level of the menu. Here is some code I wrote a while back that creates a cursor and uses a recursive routine that iterates through the menu, populating the cursor:

close all
clear all
clear

private nCurrentLevel
nCurrentLevel = 0

create cursor menuhits ( prompt c(50), nLevel i, cproc m, skipfor m, keyboard m)

select 0
* open up your menu here
use menus\main.mnx
go 2
listitems()

select menuhits
browse

proc listitems

local nNum, cLevel, i, nRecno
nNum = NumItems
cLevel = LEVELNAME
nRecno = RECNO()

for i = 1 to nNum
locate for LEVELNAME = cLevel AND NUMITEMS=0 and val(itemnum)=i
insert into menuhits ( prompt, nLevel, cproc, skipfor ) ;
values ( strtran(main.prompt, '\<', ''), nCurrentLevel, main.procedure, main.skipfor)
skip
nCurrentLevel = nCurrentLevel + 1
listitems()
nCurrentLevel = nCurrentLevel - 1
go nRecno
endfor

return