CPC-RTVALAUT.P

• 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.