cpc-rc0312a3.p1

Rotina utilizada para permitir a operadora efetuar consultas e criticas especificas sobre os documentos em alteração quando o acesso a este(s) documento(s) ocorrer pela modulo RC na opção RC-04-C.
Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
Localização
Após a montagem do browser com os documentos selecionados para modificação, dentro do programa rc0312a3.p Ressalta-se que somente será chamada a CPC caso ela esteja ativa, no cadastro de CPC.
Para o ponto "ALTERA-INTER" a Localização ocorre após a alteração dos dados de internação.
Ponto "APOS-MOVTO" após a manutenção de procedimentos, utilizando o evento "APOS-PROCED" e após a manutenção de insumos, utilizando o evento "APOS-INSUMO".
Ponto "APOS-CARTEIRA" após o display dos dados referentes a carteira do beneficiário.
Ponto de Utilização
"CONS-CLIENTE"
"APÓS-ALT-DOCTO"
"CONS-PROF-SOL"
"CONS-PRESTADOR"
"TRATA-GUIA"
"CONS-TP-SAIDA"
"ALTERA-INTER"
"APOS-MOVTO"
"APOS-CARTEIRA"
Include das definições das tabelas temporárias
cpc-rc0312a3.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rc0312a3-entrada
def temp-table tmp-cpc-rc0312a3-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field tp-pesquisa as char format "x(03)"
field cd-unidade-prestadora like docusos.cd-unidade-prestadora
field cd-transacao like docusos.cd-transacao
field cd-unidade-principal like docusos.cd-unidade-principal
field cd-vinculo-principal like docrecon.cd-vinculo-principal
field cd-prestador-principal like docusos.cd-prestador-principal
field dt-anoref like perimovi.dt-anoref
field nr-perref like perimovi.nr-perref
field cd-serie like docrecon.cd-serie-nf
field aa-fatura like docrecon.aa-fatura
field nr-fatura like docrecon.nr-fatura
field cd-unidade like docusos.cd-unidade
field aa-guia-atendimento like docusos.aa-guia-atendimento
field nr-guia-atendimento like docusos.nr-guia-atendimento
field cd-clinica like docusos.cd-clinica
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 cd-unidade-seccional like preserv.cd-unidade-seccional
field lg-movto-sem-tp-saida as log format "Sim/Nao"
field dt-internacao like docrecon.dt-internacao
field dt-alta like docrecon.dt-alta.
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a cpc-rc0312a3.p. O valores desse campo pode ser:
"CONSULTA", "MODIFICA"
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rc0312a3.p:
"CONS-CLIENTE", "APOS-ALT-DOCTO", "CONS-PROF-SOL", "CONS-PRESTADOR", "TRATA-GUIA", "CONS-TP-SAIDA", "ALTERA-INTER", "APOS-MOVTO" e "APOS-CARTEIRA".
tp-pesquisa – Código do tipo da pesquisa selecionada pelo usuário do Sistema. Os possíveis tipo de pesquisa são:
"Sem": Sem Nota/Fatura;
"Atr": Através de Guias;
"Com": Com Nota/Fatura;
"Por": Por Clinica;
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-vinculo-principal – Código do vinculo do prestador principal;
cd-prestador-principal – Código do prestador principal;
dt-anoref – Ano de referência;
nr-perref – Período de referência;
cd-serie – Série do documento;
aa-fatura – Ano da fatura;
nr-fatura – Número da fatura;
cd-unidade – Código da Unidade;
aa-guia-atendimento – Ano da guia de autorização
nr-guia-atendimento – Número da guia de autorização;
cd-clinica – Código da Clinica.
nr-serie-doc-original – Serie do documento;
nr-doc-original – Número do documento original;
nr-doc-sistem – Número do documento do sistema;
cd-unidade-secciona- Unidade seccional do prestador;
lg-movto-sem-tp-saida – Indica se o documento possui ou não movimentos pendentes em virtude da não informação do Tipo de Saída.
dt-internacao – data de internação do documento de internaçao
dt-alta – data alta do documento de internação
Tabela de saída tmp-cpc-rc0312a3-saida
def temp-table tmp-cpc-rc0312a3-saida no-undo
field lg-undo-retry as log
field nm-prof-sol as char
field cd-conselho as char
field nr-registro as int
field cd-uf-conselho as char
field lg-erro-perref as log.
Definição campo a campo da tabela de saída
lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM indicará que erros aconteceram se se o retorno for igual a NÃO indicará que o processo foi concluído por completo.
Nm-prof-sol – Nome do profisisonal solicitante
Cd-conselho – Conselho do profissional solciitante
Nr-registro – Número do registro do conselho do prof. Solicitante
Cd-uf-conselho – UF do conselho do profissional solicitante
Lg-erro-perref – Indica a ocorrência de restrição com relação ao período de referencia;