#INCLUDE 'protheus.ch'
#INCLUDE 'FWMVCDEF.CH'
/*/{Protheus.doc} COMA224MNU
Punto de entrada COMA224MNU
@type Function
@author user
@since 24/01/2025
@param PARAMIXB, Array, Opciones padrón de MenuDef.
@return aRotAux, Array, Opciones padrón más opciones de usuario para MenuDef.
/*/
User Function COMA224MNU()
Local aRotAux := aClone(PARAMIXB[1])
ADD OPTION aRotAux TITLE "Opción 1" ACTION 'u_fCM22XMenu("COMA224MNU")' OPERATION 2 ACCESS 0
Return aRotAux
/*/{Protheus.doc} fCM22XMenu
Función de ejemplo para validar punto de entrada COMA224MNU.
@type Function
@author user
@since 24/01/2025
/*/
User Function fCM22XMenu(cNomPE)
Local cAviso1 := "Atención"
Local cAviso2 := "Punto de Entrada: "
Local cAviso3 := "OK"
Default cNomPE := ""
Aviso(cAviso1, cAviso2 + cNomPE, {cAviso3}, 2)
Return |