cpc-rtvalaut.p1

Rotina que possibilita a inclusão e manutenção de registros na validação automática de glosas.
Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
Localização
Após a pesquisa do documento na tabela t-movrcglo, quando "RC".
Ponto de Utilização
"CON-DE-VAUTGLOS"
Include das definições das tabelas temporárias
cpc-rtvalaut.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rtvalaut-entrada
def temp-table tmp-cpc-rtvalaut-entrada no-undo
field nm-ponto-chamada-cpc as char format "x(20)"
field r-movrcglo as rowid
field cd-forma-pagto as int
field in-acao-movto as char
field lg-sem-cobertura as log
field cd-local-atendimento like de-vautglos.cd-local-atendimento
field r-propost as rowid
field r-unicamco as rowid
field r-preserv as rowid
field r-docrecon as rowid.
Definição campo a campo da tabela de entrada
nm-ponto-chamada – nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rtvalaut.p:
"CON-DE-VAUTGLOS"
r-movrcglo – Rowid da tabela t-movrcglo.
cd-forma-pagto – Identifica a forma de pagamento.
in-acao-movto – Identifica a ação tomada com o documento.
lg-sem-cobertura – Identifica se a proposta possui cobertura.
cd-local-atendimento – Identifica o local de atendimento.
r-propost – Rowid da tabela Propost.
r-unicamco – Rowid da tabela Unicamco.
r-preserv – Rowid da tabela Preserv.
r-docrecon – Rowid da tabela Docrecon.
Tabela de saída tmp-cpc-rtvalaut-saida
def temp-table tmp-cpc-rtvalaut-saida no-undo
field lg-undo-retry as log
field lg-continua as log
field ds-mensagem as char format "x(75)".
Definição campo a campo da tabela de saída
lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC.
lg-continua – Variavel que verifica se o programa continua sua execução ou se será abortado.
ds-mensagem – Variavel que grava a mensagem de erro dentro da CPC, caso aconteça.