CPC-RCAPI020.P0

Rotina utilizada para:

• Permitir alterar o local de atendimento da tabela de documentos (docrecon).
• Permitir a entrada de documento com a série duplicada, quando parametrizado na transação "Tipo d Seqüência = 04 –Seq. Serie/Documento".
• Permite sobrepor a ação parametrizada na transação sobre uma guia de atendimento.
• 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 rcapi020.p. após a inclusão do documento;
• Dentro do programa rcapi020.p. quando da consistência do número do documento com o parâmetro, da transação, "Tipo d Seqüência = 04 –Seq. Serie/Documento" ;
• Dentro do programa rcapi020.p, ao localizar transação.

Ponto de Utilização

• "ALT-LOC-ATEND" , "SEQ-SERIE-DOCTO" , "CART-ANT", "FINAL-INC", "DADOS-INTERNAC" ou "ACAO-GUIA".

Include das definições das tabelas temporárias

• CPC-RCAPI020.I

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rcapi020-entrada

def temp-table tmp-cpc-rcapi020-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 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 r-docrecon                                             as recid
field cd-unidade-ant                                       like car-ide.cd-unimed
field cd-carteira-usuario-ant

...

                         like car-ide.cd-carteira-inteira
field cd-modalidade-ant                                 like docretmp.cd-modalidade
field cd-usuario-ant

...

                                       like docretmp.cd-usuario
field nr-ter-adesao-ant                                   like docretmp.nr-ter-adesao
field nr-via-carteira-ant

...

                                 like docretmp.nr-via-carteira
field tp-atendimento                                       as int
field aa-guia-atendimento

...

                             like guiautor.aa-guia-atendimento
field nr-guia-atendimento                               like guiautor.nr-guia-atendimento
field in-acao-guia                                           as int
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 a cpc-rcapi020.p.
• "ALTERA" , "IMPORTACAO" ou "BUSCA-GUIA".

...

• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rcapi020.p:
• "ALT-LOC-ATEND" , "SEQ-SERIE-DOCTO" ou "CART-ANT".

...

• 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 do prestador principal

...

• Cd-prestador-principal – Código do prestador Principal;

...

• Nr-serie-doc-original – Número da Série do documento;

...

• Nr-doc-original – Número do documento;

...

• R-docrecon – Identificação do registro apontado;

...

• Cd-unidade-ant– código da unidade da carteira;

...

• Cd-carteira-usuario-ant – código da carteira do usuário;

...

• Cd-modalidade-ant- código da modalidade;

...

• Cd-usuario-ant- código do usuário;

...

• Nr-ter-adesao-ant- Número do termo de adesão ;

...

• Nr-via-carteira-ant- Número da via da carteira.

...

• Tp-atendimento – Tipo de Atendimento.

...

• Aa-guia-atendimento – Ano da guia de atendimento.

...

• Nr-guia-atendimento – Número da guia de atendimento.

...

• In-acao-guia – Acao realizada sobre a guia de atendimento.

...

• Nr-doc-sistema – número do documento do sistema.

Tabela de saída tmp-cpc-rcapi020–saida

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

field cd-local-atendimento                               like docrecon.cd-local-atendimento
field lg-undo-retry                                             as log
field ds-mensagem

...

                                         as char format "x(75)"
field lg-cart-ant                                                 as log
field lg-dados-internacao                                 as log
field in-acao-guia                                             as int.

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

...

• Cd-local-atendimento – Código do local de atendimento do documento

...

• Lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros acontecerem e NÃO se o processo foi concluído por completo.

...

• Ds-mensagem – Mensagem de aviso ou de erro.

...

• Lg-cart-ant- Variável que controla se o erro 654 será mostrado ou não.

...

• Lg-dados-internacao – Internação Sim/Não.

...

• In-acao-guia – Acao realizada sobre a guia de atendimento.