cpc-fp0711k.p1

Rotina utilizada para verificação das cobramças a serem feitas quando da utilização do conceito de "Diferença de intercâmbio";
Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
Localização
Dentro do Fp0711k.p.
Ponto de Utilização
" BUSCA-MOVIMENTO""
Include das definições das tabelas temporárias
CPC-FP0711K.I
Tabelas de entrada e saída
Tabela de entrada tmp-cpc- fp0711k-entrada
def temp-table tmp-cpc-fp0711k-entrada no-undo
field in-evento-programa as char format "x(06)"
field nm-ponto-chamada-cpc as char format "x(15) "
field lg-simulacao as log
field nr-rowid-notaserv as rowid.
Definição campo a campo da tabela de entrada
nm-ponto-chamada-cpc
in-evento-programa – Indica o evento que deve ser "ELI"
lg-simulacao – Indica se é geração ou simulação do faturamento;
cd-contratante – Código do contratante;
nr-rowid-notaserv – Rowid da tabela de notas de serviço.
Tabela de entrada tmp-cpc- fp0711k -saida
def temp-table tmp-cpc-fp0711k-saida no-undo
field lg-undo-retry as log
field lg-tem-mensagem as log
field ds-mensagem-relatorio as char format "x(75)".
Definição campo a campo da tabela de movimento
lg-undo-retry - Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.
lg-tem-mensagem – Indica se tem mensagemE a mensagem que a operadora quer que seja apresentada ao usuário quando da ocorrência de erro no processamento da CPC;
ds-mensagem-relatorio – Mensagem da ocorrência do erro no processamento da CPC.
Tabela de entrada tmp-cpc- fp0711k -movimento
def temp-table tmp-cpc-fp0711k-movimento no-undo
field cd-unidade like docrecon.cd-unidade
field cd-unidade-prestadora like docrecon.cd-unidade-prestadora
field cd-transacao like docrecon.cd-transacao
field nr-serie-doc-original like docrecon.nr-serie-doc-original
field nr-doc-original like docrecon.nr-doc-original
field nr-doc-sistema like docrecon.nr-doc-sistema
field in-tipo-movimento as char format "x(01)"
field nr-rowid-movimento as rowid
field lg-cobra-participacao as LOG
field lg-cobra-diferenca as log
field lg-cobra-franquia as log
field lg-cobra-zerado as log
field vl-coberto-inter as dec
field vl-franquia as dec
field vl-diferenca-inter as dec
field vl-desconto-prestador as dec
field vl-cobranca as dec
index mov1 is unique primary
cd-unidade
cd-unidade-prestadora
cd-transacao
nr-serie-doc-original
nr-doc-original
nr-doc-sistema
in-tipo-movimento
nr-rowid-movimento.
Definição campo a campo da tabela de saída
cd-unidade – Código da unidade;
cd-unidade-prestadora - Código da unidade da prestadora;
cd-transacao – Código da transação;
nr-serie-doc-original – Série do documento original;
nr-doc-original – Número do documento original;
nr-doc-sistema – Número do documento do sistema (seqüência) ;
in-tipo-movimento – Oindica o tipodo movimento se é insumo ou procedimento;
nr-rowid-movimento – Rowid da tabela de procedimentos ou de insumos dependendo do in-tipo-movimento;
lg-cobra-participacao – Indica se cobra participaçãodo beneficiário;
lg-cobra-diferenca – Indica se cobra diferença do beneficiário;
lg-cobra-franquia – Indica se cobra franquia do beneficiário;
lg-cobra-zerado – Indica valor zero na cobraça;
vl-coberto-inter – Indica o valor coberto em intercâmbio;
vl-franquia – Indica o valor da franquia;
vl-diferenca-inter – Indica o valor da difernença de intercâmbio;
vl-desconto-prestador – Indica o valor de desconto do prestador;
vl-cobrança – Indica o valor de cobrança.