PARAMIXB[1]aRotina na chamada P12.2210; a ficha demonstra também aRotina no escopo do chamador. (Refs. 1–2)
AdvPL GuiaUser Function FA330MNU()Acrescenta funcionalidades ao menu antes do browse.
A ficha atual documenta retorno obrigatório do array aRotina e mostra a inclusão de uma ação. A listagem P12.2210 recebe {aRotina} e substitui aRotina pelo retorno. O exemplo oficial depende de U_TESTE(), que precisa existir; a linha do menu não implementa a ação nem a autorização. Não foi encontrada implementação útil no GitHub. (Refs. 1–2)
User Function FA330MNU()PARAMIXB[1]aRotina na chamada P12.2210; a ficha demonstra também aRotina no escopo do chamador. (Refs. 1–2)
Array com os itens do menu, preservando as ações padrão necessárias.
#Include "Protheus.ch"
User Function FA330MNU()
// Adapta a inclusao TOTVS e fornece a rotina demonstrativa.
Local aMenu := AClone(PARAMIXB[1])
AAdd(aMenu,{"Diagnostico", "U_Ed330Info", 0, 0, 0, .F.})
Return aMenu
User Function Ed330Info()
// Acao didatica sem alterar titulos.
MsgInfo("Menu editorial da FINA330")
Return NilAcrescenta uma ação com rotina própria incluída no exemplo. Conferir formato do menu e compilar em homologação; não testado em Protheus.
// Trecho do chamador P12.2210 (EURAI, ref. 2); não é implementação do PE.
// FINA330.PRX - FINA330() -> AROTINA := EXECBLOCK( "FA330MNU", .F., .F., { AROTINA } )O registro mostra argumentos e uso imediato do retorno quando presentes. Não inclui o corpo completo do chamador nem comprova a posição do commit.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.