Hi all

I have this process in windows to control access to menu options (Update). Does anyone have some code for the same on WEB?

Code:
 Object oCoAsentarMenuItem is a cCJMenuItem
                   Set psCaption to "Reconocimiento Contable"
                   Set psTooltip to "Información Formato"
                   Set pbControlBeginGroup to True
                   Set psImage to "ActionOrder.ico"
               
                   Procedure OnExecute Variant vCommandBarControl
                       Handle hoClient 
                       Get Client_Id to hoClient
                       Send Activate_oCoAsentarFiscal of hoClient
                    End_Procedure
                   
                    Procedure Update 
                            String sLabel 
                            Get psCaption to sLabel
                             
                            If (giJerarquia>2) Set pbVisible to (OpcionMenuDisponibleUsusMenu(gsUsuario,gsModulo,gsGrupoMenu,sLabel))
                          Else Set pbEnabled to (OpcionMenuDisponibleUsusMenu(gsUsuario,gsModulo,gsGrupoMenu,sLabel)) 
                           
                    End_Procedure
                    
               End_Object

Edgar