Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

  • Utilizado para alterar o valor de cobrança do movimento.

        "ANT-RTVIGENCIA"


Include das definições das tabelas temporárias

...

field in-evento-programa                         as char format "x(10)"
field nm-ponto-chamada-cpc                  as char format "x(15)"
field in-entidade                                      as char format "x(02)"
field dt-realizacao                                    like moviproc.dt-base-valor
field dt-emissao                                       like moviproc.dt-base-valor
field r-recid-periodo                                 as recid
field r-recid-transacao                             as recid
field cd-uni-cart-ben                                like previesp.cd-unidade
field cd-uni-pres-exec                              like previesp.cd-unidade
field cd-pres-exec                                   like previesp.cd-prestador
field dt-base-valor                                   like moviproc.dt-base-valor
field dt-informada                                   like moviproc.dt-base-valor
field cd-unidade-executante                   like moviproc.cd-unidade-prestador
field cd-prestador-executante                 like moviproc.cd-prestador
field cd-tipo-insumo                                like insumos.cd-tipo-insumo
field cd-insumo                                      like insumos.cd-insumo
field cd-unidade                                     like docrecon.cd-unidade
field aa-guia-atendimento                      like docrecon.aa-guia-atendimento
field nr-guia-atendimento                       like docrecon.nr-guia-atendimento
field lg-trab-cooperado                           like tipovinc.lg-trabalho
field pc-taxa-acp                                    like unicamco.pc-taxa-acp
field pc-taxa-aca                                    like unicamco.pc-taxa-aca
field vl-insumo                                       like mov-insu.vl-insumo
field vl-cobrado                                     like mov-insu.vl-cobrado
field vl-taxa-out-insumo                         like mov-insu.vl-taxa-out-insumo
field cd-tab-preco                                  like mov-insu.cd-tab-preco
field cd-unidade-prestadora                  like mov-insu.cd-unidade-prestadora
field cd-transacao                                 like mov-insu.cd-transacao
field nr-serie-doc-original                       like mov-insu.nr-serie-doc-original
field nr-doc-original                               like mov-insu.nr-doc-original
field nr-doc-sistema                              like mov-insu.nr-doc-sistema
field nr-processo                                   like mov-insu.nr-processo
field nr-seq-digitacao                            like mov-insu.nr-seq-digitacao
field vl-taxa-out-uni-cobrado                like mov-insu.vl-taxa-out-uni-cobrado
field cd-unidade-prest                           like docrecon.cd-unidade-principal
field cd-prestador                                  like docrecon.cd-prestador-principal
field in-tipo                                            as char format "x(01)"
field dt-digitacao                                   like moviproc.dt-base-valor
field cd-classe-erro                                like moviproc.cd-classe-erro
field vl-principal                                     like moviproc.vl-principal
field aa-fatura                                        like docrecon.aa-fatura
field cd-serie-nf                                     like docrecon.cd-serie-nf
field nr-fatura                                        like docrecon.nr-fatura
field cd-prestador-solicitante                like docrecon.cd-prestador-solicitante
field cod-fatur-ap                                  like mov-insu.cod-fatur-ap
field int-12                                             like mov-itmp.int-12
field int-13                                             like mov-itmp.int-13
field cd-unimed                                     like paramecp.cd-unimed
field nr-rowid-proposta                         as rowid
field cd-modulo                                     like mov-itmp.cd-modulo
field cd-tab-preco-pagto                       like precproc.cd-tab-preco
field dt-conhecimento                           like mov-insu.date-3
field cd-unidade-carteira                       like docrecon.cd-unidade-carteira
field dt-alta                                            like docrecon.dt-alta
field cd-unidade-imp                             like mov-insu.cd-unidade-imp
field cd-prestador-imp                          like mov-insu.cd-prestador-imp
field nr-lote-imp                                    like mov-insu.nr-lote-imp
field nr-sequencia-imp                          like mov-insu.nr-sequencia-imp
field r-mov-insu                                     as rowid
field cd-motivo-alta                               like docrecon.cd-motivo-alta
field cd-faturamento                              like docrecon.cd-faturamento
field nm-decl-nasc-viv                           like docrecon.nm-decl-nasc-viv
field nm-decl-obito                                like docrecon.char-5

field h-buffer-tmp-mov-insu                 as handle

field r-insumos                                      as rowid.


Definição campo a campo da tabela de entrada

...

      • in-evento-programa– Evento do programa que chama cpc-rcapi022.P.
      • "INCLUI".
      • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rcapi022.p poderá ser "SUBST-PRES-EXEC"; "DATA-BASE-MOVTO", "TRATA-INSUMO", "BLOQ-VAL-INSUMO", "CONTR-QUANT", "CRIA-COMPL-MOVTO" e "ALT-VALOR-COB".
      • in-entidade –
      • dt-realizaao – Data de realização do movimento.
      • dt-emissão – Data de emissão do documento.
      • r-recid-periodo – recid da tabela de período de movimentação a qual o movimento (documento) está associado.
      • r-recid-transacao – recid da tabela de transacao do a qual o movimento (documento) está associado.
      • cd-uni-cart-bem – código da unidade da carteira do beneficiário que utilizou/realizou o inusmo.
      • cd-uni-pres-exec – código da unidade do prestador que utilizou/realizou o inusmo.
      • cd-pres-exec – código do prestador que utilizou/realizou o inusmo.
      • dt-base-valor – data base de valorização do movimento em utilização.
      • dt-informada – data informada pelo usuário para valorização.
      • cd-unidade-executante - código da unidade do prestador que utilizou/realizou o inusmo.
      • cd-prestador-executante - código do prestador que utilizou/realizou o inusmo.
      • cd-tipo-insumo – código do tipo do insumo utilizado/realizado.
      • cd-insumo – código do insumo utilizado/realizado.
      • cd-unidade – código da unidade.
      • aa-guia-atendimento – ano da guia de atendimento.
      • nr-guia-atendimento – n° da guia de atendimento.
      • lg-trab-cooperado – parâmetro identificador de trabalho cooperado.
      • pc-taxa-acp – percentual da taxa principal.
      • pc-taxa-aca – percentual da taxa auxiliar.
      • vl-insumo – valor do insumo.
      • vl-cobrado – valor cobrado do insumo.
      • vl-taxa-out-insumo – valor da taxa insumo.
      • cd-tab-preco – Código da tabela de preço do insumo.
      • cd-unidade-prestadora – Código da Unidade Prestadora.
      • cd-transacao – Código da transação.
      • nr-serie-doc-original – Número de Série do Documento.
      • nr-doc-original – Número do documento Original.
      • nr-doc-sistema – Número do documento no sistema.
      • nr-processo – Número do processo do movimento.
      • nr-seq-digitacao – Número seqüencial de digitação do movimento.
      • vl-taxa-ou-uni-cobrado – Valor da taxa;
      • cd-unidade-prest – código da unidade do prestador principal;
      • cd-prestador – código do prestador principal;
      • in-tipo – tipo de prestador;
      • dt-digitacao – data de digitação;
      • cd-classe-erro – código da classe de erro;
      • vl-principal – valor principal;
      • aa-fatura – ano da fatura do RC ("notapres");
      • cd-serie-nf – série da fatura do RC ("notapres");
      • nr-fatura – indicador de fatura, NDR ou ambos;
      • cd-prestador-solicitante – código do prestador solicitante;
      • cod-fatur-ap – número da fatura do RC ("notapres");
      • int-12 – código da unidade do prestador origem;
      • int-13 – código do prestador origem;
      • cd-unimed – código da unidade;
      • nr-rowid-proposta – rowid da tabela "propost";
      • cd-modulo – código do módulo;
      • cd-tab-preco-pagto – código da tabela de preço para pagamento;
      • dt-conhecimento – data de conhecimento;
      • cd-unidade-carteira – código da unidade da carteira;
      • dt-alta – data de alta;
      • cd-unidade-imp – código da unidade do prestador do lote de importação;
      • cd-prestador-imp – código do prestador do lote de importação;
      • nr-lote-imp – número do lote de importação;
      • nr-sequencia-imp – número da sequência do lote de importação;
      • r-mov-insu – rowid da tabela "mov-insu"
      • cd-motivo-alta – código do motivo de alta;
      • cd-faturamento – tipo de faturamento;
      • nm-decl-nasc-viv – declaração de nascido vivo;
      • nm-decl-obito – declaração de óbito de RN.
      • h-buffer-tmp-mov-insu - handle de tabela
      • r-insumos - rowid da tabela insumos.



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

def temp-table tmp-cpc-rcapi022-saida no-undo


field dt-base-valor                                    like moviproc.dt-base-valor
field lg-undo-retry                                    as log
field ds-mensagem                                 as char
field cd-unidade-encaminhamento          like moviproc.cd-unidade-prestador
field cd-prestador-encaminhamento        like moviproc.cd-prestador
field vl-insumo                                         like mov-insu.vl-insumo
field vl-taxa-out-insumo                           like mov-insu.vl-taxa-out-insumo
field lg-manual                                        as log
field cd-controla-quantitativo                   like mov-insu.cd-controla-quantitativo
field vl-cobrado                                       like mov-insu.vl-cobrado
field vl-taxa-out-uni-cobrado                  like mov-insu.vl-taxa-out-uni-cobrado
field cd-classe-erro                                  like movrcglo.cd-classe-erro
field lg-modifica-valor                             as log
field lg-restringe                                      as log
field lg-continua                                      as log
field cd-tab-preco-pagto                         like precproc.cd-tab-preco
field cd-modulo                                        like mov-insu.cd-modulo
field cd-forma-pagto                                as int
field lg-desconsidera-glosa                      as log
field lg-troca-valores                                as log
field vl-glosado                                         like mov-insu.vl-glosado

field lg-calcula-vl-glosado glosado                        as logical initial yes

field r-insumos                                          as rowid.



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

...

  • cd-unidade-encaminhamento – Unidade a ser substituída pela Unidade Executante.
  • cd-prestador-encaminhamento – Prestador a ser substituído pelo Prestador Executante.
  • lg-undo-retry – Variável que controla os erros que podem ocorrer na CPC.
  • ds-mensagem – Variável que retornar mensagem de erro, se ocorrido dentro da CPC.
  • dt-base-valor – data base para ser utilizada na valorização dos movimentos.
  • vl-insumo – valor do insumo.
  • vl-taxa-out-insumo – valor da taxa do insumo.
  • Lg-manual – indicador de preço manual do insumo.
  • Cd-controla-quantitativo – Indicador de controle quantitativo.
  • Vl-cobrado – Valor cobrado pelo movimento
  • Vl-taxa-out-uni-cobrado – Valor taxa;
  • cd-classe-erro – código da classe de erro;
  • lg-modifica-valor – identifica se o valor deve ser alterado;
  • lg-restringe – indica se deve restringir a entrada do movimento;
  • lg-continua – indica se deve continuar o processo;
  • cd-tab-preco-pagto – código da tabela de preço para pagamento;
  • cd-modulo – código do módulo;
  • cd-forma-pagto – código da forma de pagamento;
  • lg-desconsidera-glosa – indica se deve desconsiderar a glosa;
  • lg-troca-valores – indica se deve substituir os valores por aqueles retornados pela CPC;
  • vl-glosado – valor glosado.
  • lg-calcula-vl-glosado - indica para considerar valor glosado
  • r-insumos - rowid da tabela insumos.