CPC-RC0310B.P

• Rotina utilizada para processar informações após a validação de um procedimento.
• 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

• Para o ponto de chamada "APOS-VALIDACAO", dentro do programa RC0310B.p após a validação do procedimento.
• Dentro do Rc0310b.p ao executar a ação de "VALIDAR" e escolher a opção "03 - AMBOS"
• Para o ponto "APOS-VAL-INSU", dentro do programa RC0310B.P, no final da procedure analisa-insumo, utilizando o evento "MULTIPLA" e no final da procedure valida-insumo, utilizando o evento "INDIVIDUAL".

Ponto de Utilização

• "APOS-VALIDACAO"
• "VALOR-PAGTO"
• "APOS-VAL-INSU"
• "ANTES-VALIDACAO"
• "TIPO-COBRANCA"

Include das definições das tabelas temporárias

• cpc-rc0310b.i 

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rc0310b-entrada

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

field in-evento-programa as char format "x(10)"
field nm-ponto-chamada as char format "x(15)"
field nr-rowid-moviproc as rowid
field cd-tipo-cobranca as int
field in-tipo-movto as char format "x(1)"
field cd-selecao as int format "99"
field cd-tipo-insumo-ini as int format "99"
field cd-tipo-insumo-fim as int format "99"
field cd-insumo-ini as int64 format "9999999999"
field cd-insumo-fim as int64 format "9999999999"
field cd-proced-ini as int format "99999999"
field cd-proced-fim as int format "99999999"
field cd-prestador like preserv.cd-prestador
field cd-prestador-save like preserv.cd-prestador
field aa-fatura like notapres.aa-fatura
field cd-serie like notapres.cd-serie-nf
field nr-fatura like notapres.cod-fatur-ap
field in-tipo-validacao as int
field cod-indicador as char
field dt-anoref-ini like perimovi.dt-anoref
field dt-anoref-fim like perimovi.dt-anoref
field nr-perref-ini like perimovi.nr-perref
field nr-perref-fim like perimovi.nr-perref
field cd-transacao-ini like tranrevi.cd-transacao
field cd-transacao-fim like tranrevi.cd-transacao
field cd-unidade-imp like moviproc.cd-unidade-imp
field cd-prestador-imp like moviproc.cd-prestador-imp
field nr-lote-imp like moviproc.nr-lote-imp
field nr-seq-imp like moviproc.nr-sequencia-imp
field cd-modalidade like modalid.cd-modalidade
field cd-modalidade-ini like modalid.cd-modalidade
field cd-modalidade-fim like modalid.cd-modalidade
field nr-insc-contrat like propost.nr-insc-contratante
field nr-doc-ini like moviproc.nr-doc-original
field nr-doc-fim like moviproc.nr-doc-original
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.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama CPC-RC0310B.P.
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
• nr-rowid-moviproc – Identificador do registro do procedimento do documento.
• cd-tipo-cobranca  – Tipo de cobrança na validação da glosa.
• in-tipo-movto  – Tipo do movimento
• cd-selecao
• cd-tipo-insumo-ini – Código do tipo de insumo.
• cd-tipo-insumo-fim – Código do tipo de insumo.
• cd-proced-ini – Código do procedimento
• cd-proced-fim – Código do procedimento
• cd-prestador – Código do prestador
• cd-prestador-save – Código do prestador
• aa-fatura – Ano da fatura
• cd-serie – Série da fatura
• nr-fatura – Número da fatura
• in-tipo-validacao – Tipo de validação
• cod-indicador –
• dt-anoref-ini – Ano de referência do período
• dt-anoref-fim – Ano de referência do período
• nr-perref-ini – Número de referência do período
• nr-perref-fim – Número de referência do período
• cd-transacao-ini – Código da transação
• cd-transacao-fim – Código da transação

• cd-unidade-imp – Código da unidade de importação

• cd-prestador-imp – Código do prestador de importação
• nr-lote-imp – Número do lote de importação
• nr-seq-imp
• cd-modalidade
• cd-modalidade-ini
• cd-modalidade-fim
• nr-insc-contrat
• nr-doc-ini
• nr-doc-fim
• cd-unidade – Código da unidade.
• cd-unidade-prestadora – Código da unidade prestadora.
• cd-transacao – Código da transação.
• nr-serie-doc-original – Série do documento.
• nr-doc-original – Número do documento.
• nr-doc-sistema – Número do documento no sistema.

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

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

field lg-atualiza as log
field lista-tipo-cob as char
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-atualiza – Indica se deve atualizar ou não os tipos de cobrança;
• lista-tipo-cob – Variável que irá conter a nova lista de opções que será exibida em tela para o usuário;
• 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.