Histórico da Página
01. DADOS GERAIS
Linha de Produto: | Microsiga Protheus® |
---|---|
Segmento: | Serviços |
Módulo: | Financeiro |
Função: | FINA060 - Transferências FINXSE5 |
Requisito/Story/Issue (informe o requisito relacionado) : | DSERFINR-24744 |
02. DESCRIÇÃO
A finalidade do ponto de entrada F060ALTPOR é permitir alterar os dados bancários contidos nas variáveis cPort060 (Portador - Banco), cAgen060 (Agência), cConta060 (Conta).
A finalidade do ponto de entrada FFKDLIB é permitir a manipulação de tabelas customizadas quando o titulo esta em momento de exclusão.
03. PARÂMETROS
P.E. F060ALTPOR
Nome | Tipo | Descrição |
[1] cPort060 | Caractere | Código do Portador (banco) |
[2] cAgen060 | Caractere | Código da Agência bancária |
[3] cConta060 | Caractere | Código da Conta bancária |
[4] cSituacao | Caractere | Situação da Carteira |
P.E. FFKDLIB
Este ponto de entrada não recebe parâmetros.
04. RETORNO
P.E. F060ALTPOR
Nome | Tipo | Descrição |
aRetPor | Array | Array com os novos dados bancários |
aRetPor[1] | Caractere | Novo Código do Portador (banco) |
aRetPor[2] | Caractere | Novo Código da Agência bancária |
aRetPor[3] | Caractere | Novo Código da Conta bancária |
P.E. FFKDLIB
Este ponto de entrada não espera retorno.
05. EXEMPLO DE UTILIZAÇÃO
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#INCLUDE "Totvs.ch"
User Function F060ALTPOR
Local aRetPor := {}
Local cBanco := GetMV("MV_F0601",,"01A")
Local cAgencia := GetMV("MV_F0602",,"000001")
Local cConta := GetMV("MV_F0603",,"0000000001")
Local cPort060 := PARAMIXB[1]//código do banco atual
Local cAgen060 := PARAMIXB[2]//código da agencia atual
Local cConta060 := PARAMIXB[3]//código da conta atual
Local cNewSitua := PARAMIXB[4]//Situação de cobrança informada pelo usuário l
FRV->(DbSetOrder(1))
If cSituant != cNewSitua
If FRV->(Dbseek(xFilial("FRV")+cNewSitua))
// Usa Banco = Sim
If FRV->FRV_BANCO == "1" .And. (!Empty(cPort060) .Or. !Empty(cAgen060) .Or. !Empty(cConta060))
AADD(aRetPor,cBanco)
AADD(aRetPor,cAgencia)
AADD(aRetPor,cConta)
Else
AADD(aRetPor,cPort060)
AADD(aRetPor,cAgen060)
AADD(aRetPor,cConta060)
Endif
Else
AADD(aRetPor,cPort060)
AADD(aRetPor,cAgen060)
AADD(aRetPor,cConta060)
Endif
Endif
Return(aRetPor)
#INCLUDE "Totvs.ch"
User Function FFKDLIB()
Local cChave := FK7->FK7_CHAVE
Local cIdDoc := FK7->FK7_IDDOC
//Tratamento a ser efetuado pela customização.
//Este Ponto de Entrada não espera retorno no fonte Padrão.
Return |
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; } </style> |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas