Histórico da Página
Ajuste Crítica Quantidade de Dias para Procedimento Seriado
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||||
Segmento: | Saúde | ||||||||||
Módulo: | Plano de Saúde | ||||||||||
Rotina: |
| ||||||||||
Ponto de Entrada: | PL09009S | ||||||||||
Tickets relacionados | 3482765 | ||||||||||
País(es): | Brasil | ||||||||||
Banco(s) de Dados: | Todos relacionais | ||||||||||
Sistema(s) Operacional(is): | Todos |
Descrição
Implementado melhoria para que o sistema não apresente a crítica 09S - Quantidade de dias permitido para execução da guia foi ultrapassado quando carregada uma liberação com procedimento seriado com saldo.
Criado o ponto de entrada PL09009S para manipular o retorno da crítica 09S.
Importante: para definir se um item é seriado, o sistema verificará a Classe de Procedimento (PLSA202) do mesmo, campo Tipo de Classe (BJE_TIPO) = 2-Seriado. O vínculo do evento com a Classe é realizada na Tabela Padrão (PLSA940), campo Classe Proc. (BR8_CLASSE).
Ajuste realizado para atender a legislação vigente conforme:
6.4.21. No tratamento seriado, a continuidade do atendimento poderá ser prestada após a validade de 60 (sessenta) dias e enquanto o beneficiário estiver de posse do cartão de identificação válido, considerando como limite o número de sessões liberadas pela Unimed Origem, que efetuará o pagamento total das sessões realizadas.
Ponto de Entrada PL09009S
Este PE é acionado ao carregar uma Liberação , e e a data de validade da guia (BEA_VALSEN) é inferior a database do sistema. O ponto percorre todos os eventos da Guia da mesmaguia.
Os parâmetros do ponto são:
paramixb[1] - Chave da guia (BEA_OPEMOV+BEA_ANOAUT+BEA_MESAUT+BEA_NUMAUT)
paramixb[2] - Sequencial do evento (BE2_SEQUEN)
paramixb[3] - Se a chamada é oriunda de fontes RPC (Portal).
Obs: Os Alias BEA e BE2 estão posicionados.
O retorno do ponto é um array contendo:
aRet[1] - Se a crítica 09S deve ser apresentada para este evento (se qualquer evento retornar .F. a crítica 09S não será apresentada para a guia).
aRet[2] - Se o evento posicionado é seriado (importante indicar, pois só serão carregados para execução os eventos seriados).
Procedimento para Implantação
O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.
Procedimento para Utilização
1. No Plano de Saúde (SIGAPLS), acesse Atualizações / Atendimento / Autorização SADT (PLSA094A).
2. Clique em Incluir.
3. No campo Nr. Liberação (BE1_NUMLIB) informe uma guia com validade vencida. O sistema verifica se o evento é seriado para aplicar a crítica 09S - Quantidade de dias permitido para execução da guia foi ultrapassado.
Ponto de Entrada PL09009S
Descrição: | Ponto de Entrada para indicar se a crítica 09S deve ser apresentada ao carregar uma Liberação. | ||||||||||||||||
Localização: | Atualizações/Atendimento | ||||||||||||||||
Eventos: | Autorização SADT (PLSA094A) | ||||||||||||||||
Programa Fonte: | PLSA090 PLSMFUN | ||||||||||||||||
Função: | SIGAPLS | ||||||||||||||||
Parâmetros: |
| ||||||||||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function PL09009S()
Local cGuia := paramixb[1]
Local cSequen := paramixb[2]
Local lWeb := paramixb[3]
Local lCritica := .F.
Local lSeriado := .F.
//Tratamento para indicar se deve apresentar a critica 09S
//Tratamento para indicar se o evento e seriado
Return {lCritica,lSeriado}