CPC-RTDIASINTERCAMB.P

• Rotina chamada na rotina que busca o numero de dias do intercambio.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será permitido para esta CPC apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.

Localização

• DIAS-INT-TER chamado na rotina antes de buscar os dias do intercambio;
• DIAS-INTERC chamado na rotina antes de buscar os dias do intercambio;

Ponto de Utilização

"DIAS-INT-TER"

"DIAS-INTERC"

Include das definições das tabelas temporárias

• cpc-rtdiasintercamb.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rtdiasintercamb-entrada

def temp-table tmp-cpc-rtdiasintercamb-entrada no-undo

field nm-ponto-chamada-cpc                  as char format "x(30)"
field cd-unidade-carteira                          like moviproc.cd-unidade-carteira
field cd-carteira-usuario                           like moviproc.cd-carteira-usuario
field cd-unidade-prestadora                   like moviproc.cd-unidade-prestadora
field cd-unidade-prestador                     like moviproc.cd-unidade
field cd-prestador                                       like moviproc.cd-prestador
field dt-realizacao                                      like moviproc.dt-realizacao
field cd-modalidade                                   like moviproc.cd-modalidade
field nr-ter-adesao                                     like ter-ade.nr-ter-adesao.

Definição campo a campo da tabela de entrada

• • • nm-ponto-chamada-cpc – Ponto de chamada de cpc que pode ser "DIAS-INT-TERC" ou "DIAS-INTERC" 
    • cd-unidade-carteira - Unidade da carteira do beneficiario
    • cd-carteira-usuario – Carteira do beneficiario
    • cd-unidade-prestadora – Código da unidade prestadora
    • cd-unidade-prestador – Código da unidade do prestador
    • cd-prestador – Código do prestador
    • dt-realização – Data de realização
    • cd-modalidade – Código da modalidade
    • nr-ter-adesao – Numero do termo de adesão do beneficiario

Tabela de saída tmp-cpc-rtdiasintercamb-saida

def temp-table tmp-cpc-rtdiasintercamb-saida

field lg-undo-retry                                as log
field ds-mensagem                              as char format "x(75)"
field nr-dias-taxa-intercambio           like unicamco.nr-dias-taxa-intercambio
field nr-dias-receb                                like unicamco.int-19

Definição campo a campo da tabela de saída

• • • lg-undo-retry – Variável que controla os erros que podem ocorrer na CPC.
    • ds-mensagem – Variável que recebe a descrição dos erros que ocorreram na CPC.
    • Nr-dias-taxa-intercambio – Numero de dias da taxa de intercambio
    • Nr-dias-recebimento – Numero de dias do recebimento