CPC-RC0313A.P

• Rotina para consultar dados na exclusão do documento.
• 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 rc0313a.p, o ponto de chamada "CONS-PRESTADOR" é chamado após informar os dados do prestador.

Ponto de Utilização

• "CONS-PRESTADOR"

Include das definições das tabelas temporárias

• cpc-rc0313a.i 

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rc0313a-entrada

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

field in-evento-programa                    as char format "x(06)"
field nm-ponto-chamada-cpc              as char format "x(15)"
field tp-exclusao                                 as char format "x(15)"
field cd-unidade                                  like preserv.cd-unidade
field cd-unidade-prestadora                like preserv.cd-unidade
field cd-transacao                               like docrecon.cd-transacao
field cd-unidade-principal                    like docrecon.cd-unidade-principal
field cd-prestador-principal                  like docrecon.cd-prestador-principal
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 aa-guia-atend                             like docrecon.aa-guia-atendimento
field nr-guia-atend                              like docrecon.nr-guia-atendimento
field cd-unidade-seccional                  like preserv.cd-unidade-seccional.

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
  • tp-exclusao – Tipo de exclusão
  • cd-unidade – Código da unidade
  • cd-unidade-prestadora – Código da unidade prestadora
  • cd-transacao – Código da transação
  • cd-unidade-principal – Código da unidade principal
  • cd-prestador-principal – Código do prestador principal
  • nr-serie-doc-original – Numero de série do documento original
  • nr-doc-original – Numero do documento original
  • nr-doc-sistema – Numero do documento do sistema
  • aa-guia-atend – Ano da guia de atendimento
  • nr-guia-atend – Número da guia de atendimento
  • cd-unidade-seccional – Unidade seccional do prestador

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

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

field lg-undo-retry                             as log
field ds-mensagem                          as char format "x(75)".

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.