CPC-AC2020D.P

Rotina utilizada para:

• Tratar a informação "Tipo de Saída" quando

...

• não for informada pelo usuário e

...

• for registrado um documento de consulta ou SP/SADT na versão do TISS, para o ponto de chamada "TIPO-SAIDA";
• Realizar criticas e validações genéricas sobre o documento criado no MODULO RC, para o

...

• ponto de chamada "FINAL-ATUALIZA" e "ANTES-REG-AUDIT".
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

...

Localização

• No momento da criação do Documento, dentro do AC2020D.P, para ponto de chamada "TIPO-SAIDA";
• Após a finalização do processo de criação de documento no RC, para ponto de chamada "FINAL-ATUALIZA";
• Após a finalização do processo de criação de documento no RC, mas antes de validar as regras de auditoria, para o ponto de chamada "ANTES-REG-AUDIT";

Âncora__RefHeading__19401_2053127524__RefHeading__19401_2053127524 Âncora__RefHeading__5556_486694287__RefHeading__5556_486694287 Âncora__RefHeading__767_213273755__RefHeading__767_213273755 Âncora__RefHeading__10165_644533341__RefHeading__10165_644533341 Âncora__RefHeading__86063_1756225838__RefHeading__86063_1756225838Ponto de Utilização

• "TIPO-SAIDA"

...

• "FINAL-ATUALIZA"

...

• "TRATA-MOVTO"
• "ANTES-REG-AUDIT";

...

Include das definições das tabelas temporárias

• CPC-AC2020D.I

...

__RefHeading__86067_1756225838Tabelas de entrada e saída
Âncora__RefHeading__19407_2053127524__RefHeading__19407_2053127524 Âncora__RefHeading__5562_486694287__RefHeading__5562_486694287 Âncora__RefHeading__773_213273755__RefHeading__773_213273755 Âncora__RefHeading__10171_644533341__RefHeading__10171_644533341 Âncora__RefHeading__86069_1756225838__RefHeading__86069_1756225838

Tabela de entrada tmp-cpc-ac2020d-entrada

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

field in-evento-programa as char format "x(06)"
field nm-ponto-chamada-cpc as char format "x(15)"
field lg-msg-tela as log
field tp-saida like docrecon.tp-saida
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-movto as char format "x(1)"
field cd-procedimento as int format "99999999"
field cd-tipo-insumo like mov-insu.cd-tipo-insumo
field cd-insumo like mov-insu.cd-insumo
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field cd-tipo-cob like procguia.cd-tipo-cob
field cd-validacao like procguia.cd-validacao
field cd-user-valida like procguia.cd-user-validacao
field cd-forma-pagto-cob like procguia.cd-forma-pagto-cob
field vl-perc-usu-indevido like moviproc.vl-perc-usu-indevido
field cd-tipo-pagamento like moviproc.cd-tipo-pagamento
field nr-rowid-tranrevi as rowid
field nr-rowid-procusos as rowid.

.
Âncora__RefHeading__19409_2053127524__RefHeading__19409_2053127524 Âncora__RefHeading__5564_486694287__RefHeading__5564_486694287 Âncora__RefHeading__775_213273755__RefHeading__775_213273755 Âncora__RefHeading__10173_644533341__RefHeading__10173_644533341 Âncora__RefHeading__86071_1756225838__RefHeading__86071_1756225838Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a CPC-AC2020D.P.

...

•  
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.

...

• lg-msg-tela – Indica se as mensagens de erro devem ser dispostas na tela ou não.
• tp-saida – Tipo de saída informado pelo usuário do sistema, quando do processo de registro de consulta ou SP/SADT do TISS.
• 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 original;
• nr-doc-original – Número do documento original;
• nr-doc-sistema – Número do documento do sistema (seqüência) .

...

• in-tipo-movto –
• cd-procedimento –
• cd-tipo-insumo –
• cd-insumo –
• aa-guia-atendimento –
• nr-guia-atendimento –
• cd-tipo-cob –
• cd-validacao –
• cd-user-valida –
• cd-forma-pagto-cob –
• vl-perc-usu-indevido –
• cd-tipo-pagamento –
• nr-rowid-tranrevi –
• nr-rowid-procusos –

...

Tabela de saída tmp-cpc-

...

ac2020d-saida

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

field lg-undo-retry as log
field ds-msg-erro as char
field tp-saida as int
field cd-tipo-cob like procguia.cd-tipo-cob
field cd-validacao like procguia.cd-validacao
field cd-user-valida like procguia.cd-user-validacao
field cd-forma-pagto-cob like procguia.cd-forma-pagto-cob
field vl-perc-usu-indevido like moviproc.vl-perc-usu-indevido
field cd-tipo-pagamento like moviproc.cd-tipo-pagamento
field lg-achou-validacao-guia as log
field in-liberado-contas like moviproc.in-liberado-contas
field cd-erro-sistema as int
field ds-mensagem as char format "x(30)".

Âncora__RefHeading__19413_2053127524__RefHeading__19413_2053127524 Âncora__RefHeading__5568_486694287__RefHeading__5568_486694287 Âncora__RefHeading__779_213273755__RefHeading__779_213273755 Âncora__RefHeading__10177_644533341__RefHeading__10177_644533341 Âncora__RefHeading__86075_1756225838__RefHeading__86075_1756225838Definição campo a campo da tabela de saída

• lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
• ds-msg-erro – Deve conter a mensagem de erro, se ocorrer, quando o parâmetro lg-msg-tela estiver desabilitado.
• tp-saida – Tipo de saída definido pela operadora. (Os valores de domínio são de 0 até 5 para consulta e 0 até 6 para SP/SADT).
• cd-tipo-cob –
• cd-validacao –
• cd-user-valida –
• cd-forma-pagto-cob –
• vl-perc-usu-indevido –
• cd-tipo-pagamento –
• lg-achou-validacao-guia –
• in-liberado-contas –
• cd-erro-sistema –
• ds-mensagem –