Histórico da Página
01. DADOS GERAIS
Produto: |
| ||||
---|---|---|---|---|---|
Linha de Produto: |
| ||||
Segmento: |
| ||||
Módulo: | Gestão de Pessoal (SIGAGPE) | ||||
Função: | Gestão de Funcionários (GPEA010GPEA011) | ||||
País: | Brasil |
02. VISÃO GERAL
Ponto de Entrada que permite incluir ou alterar as cores apresentadas na Legenda do Browse do Cadastro na rotina de Gestão de Funcionários (aCores)GPEA011).
Encontra-se posicionado no fonte GPEXFGEN.PRX.
03.
...
PARÂMETROS
...
Nome | Tipo | ConteúdoDescrição |
---|---|---|
ParamIXB | Vetor | Vetor contendo as informações do Filtro que será usado para apresentar a cor desejada na Legenda do Browse. |
Estrutura do vetor:
Posição | Conteúdo |
---|---|
1 | Nome que aparecerá no Cabeçalho da RotinaFiltro que define a cor da Legenda. |
2 | Nome da rotina associadaCor desejada. |
3 | Reservado. |
4 | Tipo de transação a ser efetuada. |
5 | Nível de acesso. | 6 | Habilita menu funcional
Descrição da Legenda. |
São possíveis os seguintes valores:
- GREEN – Para a cor Verde
- RED – Para a cor Vermelha
- YELLOW – Para a cor Amarela
- ORANGE – Para a cor Laranja
- BLUE – Para a cor Azul
- GRAY – Para a cor Cinza
- BROWN – Para a cor Marrom
- BLACK – Para a cor Preta
- PINK – Para a cor Rosa
- WHITE – Para a cor Branca
04. RETORNO
Tipo | Conteúdo |
---|---|
Vetor | Vetor contendo as informações do Filtro que será usado para apresentar a cor desejada na Legenda do Browse. |
Estrutura do vetor:
Posição | Conteúdo |
---|---|
1 | Filtro que define a cor da Legenda.* |
2 | Cor desejada. |
3 | Descrição da Legenda. |
*Obs: Em caso de condições similares, atentar à ordem dos filtros passados no vetor, que será respeitada na execução da rotina.
05. EXEMPLO
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#INCLUDE 'PROTHEUS.CH' User Function GPE11ROTGPBWCORES() Local aButtonsaTemp := {} Local aSubMenuaCores := {} //Cria subMenu para um botão aSubMenu := { { "Teste 01" ,"u_subRot1" , 0 , 2, 0},; { "Teste 02" ,"u_subRot2" , 0 , 3, 0},; { "Teste 03" ,"u_subRot3" , 0 , 4, 0} } //Cria botao que chama a funcao diretamente aAdd( aButtons, { "Teste", "u_teste" ,0, 2,,.F. }) //Cria botao semelhante aos demais, com submenus aadd( aButtons, { "Teste Submenu", aSubMenu , 0 , 2} ) Return aButtons // Funções de usuário para apresentação de mensagens User Function Teste() Alert ("Teste PE GPE11ROT para criação de menu simples!" ) Return User Function subRot1() Alert ("Teste 01 do PE GPE11ROT para criação de subMenu!" ) Return User Function subRot2() Alert ("Teste 02 do PE GPE11ROT para criação de subMenu!" ) Return User Function subRot3() Alert ("Teste 03 do PE GPE11ROT para criação de subMenu!" ) ReturnaClone(PARAMIXB) Local i AADD(aTemp, {"SRA->RA_SITFOLH=='D'" , "RED", "Demitido"}) //"Demitido" AADD(aTemp, {"SRA->RA_RESCRAI$'30/31'" , "PINK" , "Transferido"}) //"Transferido" AADD(aTemp, {"SRA->RA_SITFOLH=='A'" , "YELLOW" , "Afastado"}) //"Afastado" AADD(aTemp, {"SRA->RA_SITFOLH=='F'" , "BLUE" , "Férias" }) //"Férias" AADD(aTemp, {"SRA->RA_SITFOLH == ' ' .AND. Date() <= SRA->RA_DTVTEST", "ORANGE", "Data Vencto.Estabilidade Expirado" }) //*Filtro mais restritivo que o abaixo AADD(aTemp, {"SRA->RA_SITFOLH==' '" , "GREEN", "Situação Normal"}) //"Situação Normal" For i := 1 to len(aCores) AADD(aTemp,aCores[i]) Next aCores := aClone(aTemp) Return(aCores) |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas