Árvore de páginas

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
oin-evento-programa – Evento do programa que chama a cpc-rcapi020.p.
"ALTERA" , "IMPORTACAO" ou "BUSCA-GUIA".
onm-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".
oCd-unidade – Código da Unidade;
oCd-unidade-prestadora – Código da Unidade Prestadora;
oCd-transacao – Código da Transação;
oCd-unidade-principal – Código da Unidade do prestador principal
oCd-prestador-principal – Código do prestador Principal;
oNr-serie-doc-original – Número da Série do documento;
oNr-doc-original – Número do documento;
oR-docrecon – Identificação do registro apontado;
oCd-unidade-ant– código da unidade da carteira;
oCd-carteira-usuario-ant – código da carteira do usuário;
oCd-modalidade-ant- código da modalidade;
oCd-usuario-ant- código do usuário;
oNr-ter-adesao-ant- Número do termo de adesão ;
oNr-via-carteira-ant- Número da via da carteira.
oTp-atendimento – Tipo de Atendimento.
oAa-guia-atendimento – Ano da guia de atendimento.
oNr-guia-atendimento – Número da guia de atendimento.
oIn-acao-guia – Acao realizada sobre a guia de atendimento.
oNr-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
oCd-local-atendimento – Código do local de atendimento do documento
oLg-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.
oDs-mensagem – Mensagem de aviso ou de erro.
oLg-cart-ant- Variável que controla se o erro 654 será mostrado ou não.
oLg-dados-internacao – Internação Sim/Não.
oIn-acao-guia – Acao realizada sobre a guia de atendimento.

  • Sem rótulos