CPC-RC0712S.P

• 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 no máximo um registro na tabela temporária de saída.

Localização

• Antes da criação da Nota.
• Antes de Carregar os movimentos

Ponto de Utilização 

• "ANTES-NOTAPRE"
• "ANTES-CRG-MVTOS"

Include das definições das tabelas temporárias

• cpc-rc0712s.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rc0712s-entrada

def temp-table tmp-cpc-rc0712s-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-unidade like docrecon.cd-unidade
field cd-unidade-imp like docrecon.cd-unidade-imp
field cd-prestador-imp like docrecon.cd-prestador-imp
field nr-lote-imp like docrecon.nr-lote-imp
field nr-sequencia-imp like docrecon.nr-sequencia-imp
field r-refdocrecon as rowid
field r-refmoviproc as rowid
field r-refmov-insu as rowid
field dt-anoref like docrecon.dt-anoref
field nr-perref like docrecon.nr-perref
field nr-versao-layout as int
field in-tipo-arquivo as int
field in-tipo-cobranca as int
field nr-fatura as char format "x(20)"
field nr-ndr as char format "x(20)"
field dt-vencto-fatura as date
field dt-vencto-ndr as date
field vl-tt-aco-serv as dec format ">>>,>>>,>>>,>>9.99"
field vl-tt-aco-taxa as dec format ">>>,>>>,>>>,>>9.99"
field cd-serie-nf like moviproc.cd-serie-nf
field tp-arq-parcial as int.

Definição campo a campo da tabela de entrada

• • in-evento-programa - Nome do evento  do ponto de chamada da cpc.
  • nm-ponto-chamada - Nome do ponto de chamada da cpc dentro do programa que a utiliza.
  • cd-unidade - Código da unidade da base.
  • cd-unidade-imp - Código da unidade do arquivo.
  • cd-prestador-imp - Código do prestador do arquivo.
  • nr-lote-imp - Número do lote de importação.
  • nr-sequencia-imp - Número da sequencia do lote de importação.
  • r-refdocrecon - Identificador do documento contestado (docrecon).
  • r-refmoviproc - Identificador do movimento contestado (moviproc).
  • r-refmov-insu - Identificador movimento contestado (mov-insu).
  • dt-anoref - Ano de referência.
  • nr-perref - Mês de referência.
  • nr-versao-layout - Número da versão do layout do arquivo
  • in-tipo-arquivo - Tipo do arquivo - conforme R551 campo TP_ARQUIVO.
  • in-tipo-cobranca - Tipo de cobrança - conforme R551 campo TP_COBRANCA_A500.
  • nr-fatura - Número da Fatura contestada do A500.
  • nr-ndr -  Número da NDR contestada do A500.
  • dt-vencto-fatura - Data de vencimento da Fatura.
  • dt-vencto-ndr - Data de vencimento da NDR.
  • vl-tt-aco-serv - Valor total acordo do serviço - conforme R559 campo VL_TOT_ACO_SERVICO.
  • vl-tt-aco-taxa - Valor total acordo da taxa  - conforme R559 campo VL_TOT_ACO_TAXA
  • cd-serie-nf - Série da fatura do revisão de contas (NOTAPRES)
  • tp-arq-parcial - Tipo de Arquivo Parcial - conforme R551 campo TP_ARQ_PARCIAL.

Tabela de entrada tmp-cpc-rc0712s-entrada-proc

def temp-table tmp-cpc-rc0712s-entrada-proc no-undo

field cd-unidade like moviproc.cd-unidade
field cd-unidade-prestadora like moviproc.cd-unidade-prestadora
field cd-transacao like moviproc.cd-transacao
field nr-serie-doc-original like moviproc.nr-serie-doc-original
field nr-doc-original like moviproc.nr-doc-original
field nr-doc-sistema like moviproc.nr-doc-sistema
field nr-processo like moviproc.nr-processo
field nr-seq-digitacao like moviproc.nr-seq-digitacao
field nr-seq-a500 as int format "99999999"
field cd-esp-amb like moviproc.cd-esp-amb
field cd-grupo-proc-amb like moviproc.cd-grupo-proc-amb
field cd-procedimento like moviproc.cd-procedimento
field dv-procedimento like moviproc.dv-procedimento
field dt-realizacao like moviproc.dt-realizacao
field r-moviproc as recid
field cd-unidade-prestador like moviproc.cd-unidade-prestador
field cd-prestador like moviproc.cd-prestador.

Definição campo a campo da tabela de entrada

• cd-unidade - Código da unidade da base.
• cd-unidade-prestadora - Código da unidade prestadora.
• cd-transacao - Código da transação do movimento.
• nr-serie-doc-original - Número da série do documento.
• nr-doc-original - Número do documento original.
• nr-doc-sistema - Número do documento sistema.
• nr-processo - Número do processo
• nr-seq-digitação - Número da sequencia de digitação
• nr-seq-a550 - - Número da sequencia do arquivo A550.
• cd-esp-amb - Código da especialidade do procedimento. 
• cd-grupo-proc-amb - Identifica a que grupo de procedimento.
• cd-procedimento - Identifica o código do procedimento.
• dv-procedimento - Identifica o código do dígito verificador do procedimento.
• dt-realizacao - Data de realização do movimento.
• r-moviproc - identifica o movimento - moviproc.
• cd-unidade-prestador - Código da unidade do prestador.
• cd-prestador - Código do prestador.

Tabela de entrada tmp-cpc-rc0712s-entrada-insu

def temp-table tmp-cpc-rc0712s-entrada-insu no-undo

field cd-unidade like mov-insu.cd-unidade
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 cd-tipo-insumo like mov-insu.cd-tipo-insumo
field cd-insumo like mov-insu.cd-insumo
field nr-processo like mov-insu.nr-processo
field nr-seq-digitacao like mov-insu.nr-seq-digitacao
field nr-seq-a500 as int format "99999999"
field dt-realizacao like mov-insu.dt-realizacao
field r-mov-insu as recid
field cd-unidade-prestador like mov-insu.cd-unidade-prestador
field cd-prestador like mov-insu.cd-prestador.

Definição campo a campo da tabela de entrada

• cd-unidade - Código da unidade da base.
• cd-unidade-prestadora - Código da unidade prestadora.
• cd-transacao - Código da transação do movimento.
• nr-serie-doc-original - Número da série do documento.
• nr-doc-original - Número do documento original.
• nr-doc-sistema - Número do documento sistema.
• nr-processo - Número do processo
• nr-seq-digitação - Número da sequencia de digitação
• nr-seq-a550 - - Número da sequencia do arquivo A550.
• cd-tipo-insumo - Código do tipo de insumo - É o agrupamento de insumos. 
• cd-insumo - É o código de identificação dos itens utilizados nos atendimentos que necessitam de materiais, medicamentos, taxas ou diárias.
• dt-realizacao - Data de realização do movimento.
• r-mov-insu - identifica o movimento - mov-insu.
• cd-unidade-prestador - Código da unidade do prestador.
• cd-prestador - Código do prestador.

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

def temp-table tmp-cpc-rc0712s-saida no-undo
field lg-undo-retry as logical
field ds-mensagem as char format "x(75)"
field lg-continua as logical initial yes
field lg-erro as logical
field cd-serie-nf like moviproc.cd-serie-nf.

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

• • 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.
  • ds-mensagem - Mensagem devolvida pela execução da CPC.
  • lg-continua - Variável que indica se o processo continua ou será parado.
  • lg-erro -  Variável que indica se ocorreu algum erro dentro da CPC.
  • cd-serie-nf  – Série da fatura do revisão de contas (NOTAPRES) .