Skip to content

Instantly share code, notes, and snippets.

@Dadinel

Dadinel/MenuDef_Default.prw

Last active February 22, 2024 17:54
Show Gist options
  • Save Dadinel/abcf78b03f86252d669429034a4bdf2d to your computer and use it in GitHub Desktop.
Save Dadinel/abcf78b03f86252d669429034a4bdf2d to your computer and use it in GitHub Desktop.
Download ZIP
Exemplos de MenuDef
Raw
MenuDef_Default.prw
static function MenuDef()
local aRotina as array
aRotina := {}
aAdd(aRotina, {"Pesquisar", "AxPesqui", 0, 1})
aAdd(aRotina, {"Visualizar", "AxVisual", 0, 2})
aAdd(aRotina, {"Incluir", "AxInclui", 0, 3})
aAdd(aRotina, {"Alterar", "AxAltera", 0, 4})
aAdd(aRotina, {"Excluir", "AxDeleta", 0, 5})
return aRotina
Raw
MenuDef_SubMenu.prw
static function MenuDef()
local aRotina as array
local aSubVisl as array
local aSubAlter as array
aRotina := {}
aSubVisl := {}
aSubAlter := {}
aAdd(aSubVisl, {"Pesquisar", "AxPesqui", 0, 1})
aAdd(aSubVisl, {"Visualizar", "AxVisual", 0, 2})
aAdd(aSubAlter, {"Incluir", "AxInclui", 0, 3})
aAdd(aSubAlter, {"Alterar", "AxAltera", 0, 4})
aAdd(aSubAlter, {"Excluir", "AxDeleta", 0, 5})
aAdd(aRotina, {"R do CRUD", aSubVisl, 0, 1})
aAdd(aRotina, {"CUD do CRUD", aSubAlter, 0, 3})
return aRotina
Raw
MenuDef_XCommand.prw
static function MenuDef()
local aRotina as array
aRotina := {}
ADD OPTION aRotina TITLE "Pesquisar" ACTION "AxPesqui" OPERATION 1 ACCESS 0
ADD OPTION aRotina TITLE "Visualizar" ACTION "AxVisual" OPERATION 2 ACCESS 0
ADD OPTION aRotina TITLE "Incluir" ACTION "AxInclui" OPERATION 3 ACCESS 0
ADD OPTION aRotina TITLE "Alterar" ACTION "AxAltera" OPERATION 4 ACCESS 0
ADD OPTION aRotina TITLE "Excluir" ACTION "AxDeleta" OPERATION 5 ACCESS 0
return aRotina
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment