Histórico da Página

Na rotina de Manutenção de Lançamentos Integrados de Marcações e Apontamentos, foi criado um ponto de entrada para criação de botões adicionais na barra principal de ferramentas.

PONA280.PRW

PNA280BAR - Criação de Botões ( [ nopcx ] ) --> aRetorno

aRetorno(vetor)
• Array com os botões adicionais onde cada botão deverá conter as seguintes informações descritas no campo observações.

Retorno
          Deverá ser retornado um array com os botões adicionais onde cada botão deverá conter as seguintes    informações :

            Elemento 1 - Objeto botão. Tipo objeto.        

            Elemento 2 - Nome do botão correspondente ao BITMAP. Tipo caracter.

            Elemento 3 - Título do botão que será apresentado abaixo do mesmo. Tipo caracter.

            Elemento 4 - Funcionalidade do botão. Tipo caracter.

            Elemento 5 - Descrição do botão que será exibida ao se aproximar do mesmo com o mouse (“tooltip” ).

Procedimentos para Implementação

1.      No Rdmake obter o array enviado.

2.      Realizar os procedimentos necessários.

#INCLUDE 'RWMAKE.CH'USER FUNCTION PNA280BAR()Local aButton          := {}Local oBtTurno             AADD(aButton, { oBtTurno,'MSGGROUP', OemToAnsi('Troca') , 'Pn160Atu('SPJ',,4)', OemToAnsi('Troca de Turno')} )RETURN (aButton)