Histórico da Página
...
- Quando da verificação da necessidade da solicitação do CID, dentro do programa AT0111C.P;
- Quando da solicitação do código da clinica, dentro do programa AT0111C.P;
- Quando da solicitação do Tipo de Guia TISS (logo após a informação do prestador solicitante), dentro do programa AT0111C.P;
- Quando da solicitação da autorização origem, dentro do programa AT0111C.P;
- Geração da Senha de Autorização da Guia;
- Após a informação (input) da unidade da carteira do beneficiário;
- Após a informação (inclusão) do código do procedimento.
- Antes da realização das consistências da unidade da carteira.
- Na inclusão da guia, após digitar a informação do ano e número da guia anterior.
- Na atual função de "F10" que atualmente mostra o frame "Valores da Guia".
- Após a informação da unidade e prestador principal.
- Antes de salvar os dados na tabela guiautor.
- No momento de informar o anexo da guia, sendo possível alterar toda a lógica da tela.
- Após gravar e gerar o número da guia.
- Antes da solicitação da justificativa do procedimento.
Ponto de Utilização
- "SOLIC-CID"
- "INC-CLINICA"
- "CLASSE-NOTA"
- "GUIA-ORIGEM"
- "VERIFICA-SENHA"
- "UNIDADE-BENEFIC"
- "VALIDA-PROC"
- "CONV-UNID-CART"
- "GUIA-ASSOC"
- "VALOR-INSUMO"
- "GRAVA-MOTIVO"
- "PRES-ALT-CUS"
- "VALIDA-PREST"
- "ANEXOS-GUIA"
- "FIM-GRAVA-GUIA"
- "APOS-SOLIC"
- "VALIDA-JUSTIFIC"
Include das definições das tabelas temporárias
...
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-tipo-guia like tip-guia.cd-tipo-guia
field cd-unidade-carteira like unimed.cd-unimed
field cd-carteira-usuario like guiautor.cd-carteira-usuario
field cd-unidade-exec like preserv.cd-unidade
field cd-prestador-exec like preserv.cd-prestador
field cd-esp-exec like procguia.cd-esp-prest-executante
field cd-unidade-princ like preserv.cd-unidade
field cd-prestador-princ like preserv.cd-prestador
field cd-unidade-solic like preserv.cd-unidade
field cd-prestador-solic like preserv.cd-prestador
field cd-transacao like tranrevi.cd-transacao
field cd-userid like preserv.cd-userid
field cd-modalidade like propost.cd-modalidade
field cd-plano like propost.cd-plano
field cd-tipo-plano like propost.cd-tipo-plano
field ds-motivo as char format "x(750)"
field r-guiautor as rowid
field cd-proced-completo as int format "99999999"
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field lg-guia-principal as log
field vl-custo-op as dec
field vl-taxa-part as dec
field vl-tot-val as dec
field lg-dados-internacao like tranrevi.lg-dados-internacao
field cd-tipo-insu like insuguia.cd-tipo-insumo
field cd-insumo like insuguia.cd-insumo
field nr-proposta like propost.nr-proposta
field cd-usuario like guiautor.cd-usuario
field r-usuario as recid
field rowid-usuario as rowid
field r-unicamco as rowid
field dt-realizacao as date format 99/99/9999
field r-out-uni as rowid
field in-proc-insu as char format "x(1)"
field r-propost as rowid
field cd-unid-neg as int
field cd-prestador-executante like preserv.cd-prestador
field cd-unidade-executante like preserv.cd-unidade
field dt-controle as date
field cd-local-aten as int
field cd-clinica as int
field cd-vinculo-executante as int
field cd-esp-executante as int
field lg-preco-padrao as log
field cd-esp-prest-executante as int
field lg-trab-cooperado like procguia.lg-trab-cooperado
field cd-cid like docrecon.cd-cid
field dt-interna-ini as date format 99/99/9999
field dt-interna-fim as date format 99/99/9999
field in-classe-nota like guiautor.in-classe-nota
field lg-possui-anterior-valido as log
field cd-classe-erro-realiz as int.
Definição campo a campo da tabela de entrada
- in-evento-programa – Evento do programa que chama CPC-AT0111C.P. O valor desse campo pode ser "INCLUI;
- nm-ponto-chamada-cpc – "SOLIC-CID", "INC-CLINICA", "CLASSE-NOTA", "GUIA-ORIGEM", "UNIDADE-BENEF", "VALIDA-PROC", "CONV-UNID-CART" , "GUIA-ASSOC" e "VALOR-INSUMO"Nome do ponto de cpc;
- cd-tipo-guia – Código do tipo da guia utilizado pela Guia (AIH);
- cd-unidade-carteira – Código da unidade da carteira do beneficiário;
- cd-carteira-usuario – Código da carteira do beneficiário;
- cd-unidade-exec – Código da unidade do prestador executante;
- cd-prestador-exec – Código do prestador executante;
- cd-esp-exec – Código da especialidade do prestador executante;
- cd-unidade-princ – Código da unidade do prestador principal;
- cd-prestador-princ – Código do prestador principal;
- cd-unidade-solic – Código da unidade do prestador solicitante;
- cd-prestador-solic - Código do prestador solicitante;
- cd-transacao – Código da transação associada a Guia de Autorização digitada;
- cd-userid – Usuário logado ao sistema para a digitação da Guia de Atendimento;
- cd-proced-completo – Código do procedimento em autorização completo, ou seja com oito dígitos;
- aa-guia-atendimento – Ano da guia de atendimento anterior;
- nr-guia-atendimento – Número da guia de atendimento anterior;
- lg-guia-principal – Indica se esta é a guia principal;
- vl-custo-op – Valor do custo operacional;
- vl-taxa-part – Valor da taxa de participação,
- vl-tot-val – Valor total da guia (custo operacional + participação).
- lg-dados-internacao - Indica dados internação
- cd-tipo-insu - Tipo Insumo
- cd-insumo - insumo Insumo
- nr-proposta proposta - Número da proposta
- cd-usuario usuario - Código beneficiário
- r-usuario usuario - Beneficiário da base
- rowid-usuario - usuario Beneficiário da base
- r-unicamco - unicamco Negociação entre Unidades
- dt-realizacao realizacao - Data realização
- r-out-uni- Beneficiário de fora
- in-proc-insu - Procedimento ou Insumo
- r-propost - propost Proposta
- cd-unid-neg - Unidade
- cd-prestador-executante executante - Prestador
- cd-unidade-executante - executante Unidade Prestador
- dt-controle - controle Data controle
- cd-local-aten - Código do Local de atendimento
- cd-clinica - clinica Código da Clínica
- cd-vinculo-executante executante - Vínculo executante
- cd-esp-executante - Especialidade executante
- lg-preco-padrao - padrao Preço padrão
- cd-esp-prest-executante - Especialidade executante
- lg-trab-cooperado - cooperado Trabalho cooperado
- cd-cid like- Código CID
- dt-interna-ini -ini - Data de internação inicial
- dt-interna-fim - Data de internação final
- in-classe-nota-nota - Classe de nota
- lg-possui-anterior-valido - Possui autorização anterior valida.
- cd-classe-erro-realiz - Classe de Erro 163.
Tabela de saída tmp-cpc-at0111c-saida
...
field lg-erro as log
field ds-mensagem as char format "x(75)"
field lg-pede-cid-depois as log
field cd-clinica like clinpres.cd-clinica
field in-classe-nota like guiautor.in-classe-nota
field lg-senha-emissao as log
field lg-gera-senha as log
field lg-autoriza as log
field lg-alt-carte-benef as log
field nr-recid-usuario as recid
field nr-recid-outuni as recid
field nr-recid-unicamco as recid
field nr-recid-proposta as recid
field cd-unidade-carteira like car-ide.cd-unimed
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field in-liberado-guias like guiautor.in-liberado-guias
field lg-undo-retry as log
field lg-bloq-mod-insu as log
field lg-atualiza-insumo as log
field dt-interna-ini as date
field dt-interna-fim as date
field lg-alerta as log
field lg-altera-dados as log
field lg-possui-anterior-valido as log.
Definição campo a campo da tabela de saída
...
- lg-senha-emissao – Indicador de que a Guia de Autorização ira gerar Senha.
- lg-gera-senha – Indica se a geração da Senha será ou não autormatica.
- lg-autoriza – Indica se a Guia de Atendimento gerada via Senha será ou não Autorizada;
- lg-alt-carte-benef – Indica se ocorreu a alteração da carteira do beneficiário dentro da CPC;
- nr-recid-usuario – recid da tabela USUARIO. Deverá possuir conteúdo quando o parâmetro lg-alt-carte-benef estiver habilitado e o beneficiário for da base;
- nr-recid-outuni – recid da tabela OUT-UNI. Deverá possuir conteúdo quando o parâmetro lg-alt-carte-benef estiver habilitado e o beneficiário for de intercâmbio;
- nr-recid-unicamco – recid da tabela UNICAMCO. Deverá possuir conteúdo quando o parâmetro lg-alt-carte-benef estiver habilitado e o beneficiário for de intercâmbio;
- nr-recid-proposta – recid da tabela PROPOST. Deverá possuir conteúdo quando o parâmetro lg-alt-carte-benef estiver habilitado e o beneficiário for da base;
- cd-unidade-carteira – código Código da unidade da carteira do beneficiário;
- aa-guia-atendimento – ano Ano da guia de atendimento;
- nr-guia-atendimento – número Número da guia de atendimento;
- in-liberado-guias – situação de liberação da guia de atendimento,
- 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.
- lg-bloq-mod-insu - Bloqueia
- lg-atualiza-insumo - Atualiza insumo
- dt-interna-ini - Data de internação inicial
- dt-interna-fim - Data de internação final
- lg-alerta - Retorna se a mensagem deverá ser somente um alerta, sem parar o processo.
- lg-altera-dados - Retorna se a mensagem deverá ser somente um alertaos dados podem ser alterados
- lg-possui-anterior-valido - Possui autorização anterior valida.
Tabela de entrada tmp-cpc-at0111c-insuguia
...