| Produto: | TOTVS Backoffice |
|---|---|
| Linha de Produto: | Linha Protheus ® |
| Módulo: | Financeiro |
| Função: | FINA040 - Contas a Receber |
O ponto de entrada F040URET tem como objetivo adicionar 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.
As regras retornadas pelo ponto de entrada 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.
| Nome | Descrição |
|---|---|
| cCliOri | Código do cliente original (padrão do parâmetro MV_RESCLIP) |
| cLojaOri | Código da loja original (padrão do parâmetro MV_RESCLIP) |
| cPartic | Código do participante viajante |
| Nome | Descrição |
|---|---|
| aCliDest | Código do cliente/loja destino, ou seja, que irá sobrepor o cliente/loja original. Estrutura do vetor: 2ª posição: Código da loja |
#Include "Protheus.ch"
Static _aCliParts := NIL
User Function FN677CLIP()
Local aCliDest := Array(2) // [1] - Cliente, [2] - Loja
Local cCliOri := ParamIXB[1]
Local cLojaOri := ParamIXB[2]
Local cPartic := ParamIXB[3]
Local nY := 0
If _aCliParts == NIL
_aCliParts := {}
// [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 |
<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>
|