Linha Microsiga Protheus

Árvore de páginas

CNT121BT - Adicionar botões ao menu principal 

Linha de Produto:

Microsiga Protheus®

Segmento:

Serviços

Módulo:

Gestão de Contratos

Rotina:

Rotina

Nome Técnico

CNTA121

Medições do Contrato

Parâmetro(s):

Não utiliza

Ponto de Entrada:

CNT121BT

Versão:Protheus 12.1.16

Ponto de Entrada

Descrição:

Ponto de entrada tem por objetivo permitir adicionar botões do usuário ao menu principal da rotina de medições. A variável aRotina é private neste momento, possibilitando adicionar mais botões a rotina

Este ponto de entrada irá substituir o PE CTA120MNU da rotina de medições nas versões anteriores ao Protheus 12.1.16

Eventos:

Na função da rotina CNTA121

Programa Fonte:

CNTA121.prw

Função:

MenuDef()

Retorno:

Nil

 

Exemplo:

#Include 'Protheus.ch'

User Function CNT121BT()

    If Type('aRotina') == 'A'
    //Adicionando no array aRotina o botão    
        aAdd(aRotina,{"Botão Ponto de Entrada","U_BtnPonto()",0,1,0,NIL,NIL,NIL})
    Endif
Return

User Function BtnPonto()
    Alert( 'Acão adicionada via ponto de entrada CNT121BT.' )
Return