I use MENU... ENDMENU like below. I use BLOCK command in MENUITEM.
- Code: Select all Expand view
- MENU oFaizMenu POPUP 2007
MENUITEM "Parameters" ACTION Parametre_FAIZ()
SEPARATOR
FOR hh:=1 TO 19
hhh:="oApp:GParam:xADI_"+ALLTRIM(STR(hh))
hhh1 := ALLTRIM(&hhh)
IF !EMPTY(Hhh1)
MENUITEM hhh1 BLOCK GenBlock_Faiz(hh)
ENDIF
Next hh
ENDMENU
- Code: Select all Expand view
- FUNCTION GenBlock_Faiz(nhh)
LOCAL cProc := "Faiz"+ALLTRIM(STR(nhh))
RETURN {|| &(cProc)() }
When I select blocked option, it is executed twice. I use fwh 2102 revised. Am I doing something wrong?