Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

  • 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

...