Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Espanhol , Inglês |
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
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
nopcx | Numérico | Informação da operação de manutenção acionada. Ex: 3 - Inclusao, 4 - Alteração |
-
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)