CPC-RTTXADM.P

• Verificar o tipo de cobertura (normal, intercambio ou repasse) para valorizacao de procedimentos e insumos.
• 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

• Dentro do programa rttxadm.p.

Ponto de Utilização

"TAXA-ADM-ESPEC"

        Include das definições das tabelas temporárias

• cpc-rttxadm.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rttxadm-entrada

def temp-table tt-cpc-rttxadm-entrada no-undo

    field in-evento-programa            as char format "x(06)"                     
    field nm-ponto-chamada-cpc          as char format "x(15)"                    
    field lg-mensagem-na-tela           as logical
    field nr-rowid-out-uni              as rowid
    field cd-tab-preco-proc             as character format "xxx/99"
    field lg-procedimento               as logical.
   

Definição campo a campo da tabela de entrada

• • • in-evento-programa- Identifica qual evento deve ser executado no momento que está sendo chamada.
    • nm-ponto-chamada-cpc – Ponto de chamada da cpc.
    • lg-mensagem-tela – Indicaor de que as mensagens geradas na CPC poderão ou não ser mostradas em tela.
    • nr-rowid-out-uni – Rowid para a tabela de beneficiários de outras unidades (tabela out-uni).
    • cd-tab-preco-proc – Código da tabela de preço do Procedimento.
    • lg-procedimento – Indicador de que a chamada foi feita para um Procedimento ("P").

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

def temp-table tt-cpc-rttxadm-saida no-undo

field lg-undo-retry                               as logical
field ds-mensagem-relatorio               as char format "x(75)"
field pc-taxa-par                                 as dec format ">>9.99999"
field pc-tx-inter-par                              as dec format ">>9.99999"

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-relatorio – Variável que recebe a descrição dos erros que ocorreram na CPC.
    • Pc-taxa-aca-par - Percentual de taxa a ser cobrada sobre os atos cred. auxiliares.
    • Pc-taxa-acp-par – Percentual de taxa a ser cobrada sobre os atos cred. principais.