Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Rafael Stefano Holland Rondon

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Rafael Stefano Holland Rondon

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

O ponto de entrada F040URET tem como objetivo adicionar regras de legendas de usuário para diversas rotinas do financeiro como FINA040, FNA050, FINA740, FINA750 entre outras.Permite incluir regra de legenda de usuário para as tabelas SE1 e SE2

O PE F040URET adiciona a regra e o PE F040ADLE adiciona a descrição quando acionada a tela de legenda conforme imagem abaixo.

Image Added

Logo os pontos de entrada F040URET e F040ADLE devem ser utilizados em conjunto.


As regras retornadas pelo ponto de entrada F040URET serão adicionadas depois das regras do padrão.

Sendo assim as regras do padrão serão prioritárias em relação às do ponto de entrada.

Caso seja preciso adicionar legendas em outra ordem ou alterar legendas do padrão, utilizar o ponto de entrada FINALEG.

Card documentos
InformacaoEm situações que a necessidade seja alterar apenas um dos campos, cliente ou loja, é obrigatório que o ponto de entrada retorne o conteúdo de ambos os campos para o correto funcionamento da rotina.
TituloIMPORTANTE!


03. PARÂMETROS


NomeDescrição
cCliOriCódigo do cliente original (padrão do parâmetro MV_RESCLIP)
cLojaOriCódigo da loja original (padrão do parâmetro MV_RESCLIP)
cParticCódigo do participante viajante 
aRegrasContém o array com as regras do padrão

aLegendas

Contém array com as legendas e descrição.


04. RETORNO


NomeDescrição

aRet

Array com a regra e a legenda

aCliDest

Código do cliente/loja destino, ou seja, que irá sobrepor o cliente/loja original.

Estrutura do vetorarray:
1º posição: Código do clienteRegra

2ª posição: Código Cor da lojaLegenda


05. EXEMPLO DE UTILIZAÇÃO

...

Bloco de código
languagejava
themeMidnight
titleFN677CLIP
#Include#INCLUDE "ProtheusPROTHEUS.chCH"


Static _aCliParts   := NIL
/*
    Ponto de entrada para regras de legenda
*/
User Function FN677CLIPF040URET()

Local aCliDestaRet := Array(2{}

If FunName()  // [1] - Cliente, [2] - Loja
Local cCliOri  := ParamIXB[1]
Local cLojaOri := ParamIXB[2]
Local cPartic  := ParamIXB[3]
Local nY       := 0

If _aCliParts == NIL
    _aCliParts $ "FINA040|FINA740"	
    aAdd(aRet,{"!Empty(E1_PORTADO)","BR_LARANJA"})
Endif

Return aRet 


/*
    Ponto de entrada para legenda e descrição ao acionar o botão legendas do browse
*/
User Function F040ADLE()

Local aRet := {} 
    // [1] - Partipante, [2] - Cliente, [3] - Loja
    Aadd(_aCliParts,{"005428","002   ","01"})
    Aadd(_aCliParts,{"005445","005   ","01"})
EndIf

If nY := AScan(_aCliParts,{|x| x[1] == cPartic })
    aCliDest[1] := _aCliParts[nY,2]
    aCliDest[2] := _aCliParts[nY,3]
Else
    aCliDest[1] := cCliOri
    aCliDest[2] := cLojaOri
EndIf

Return aCliDest

aAdd(aRet,{"BR_LARANJA","Título em Portador"})

Return aRet



HTML
<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>