Melhoria na validação/gravação da especialidade de arquivos XML.

Descrição

Realizada melhoria no processo de gravação da especialidade de guias oriundas de importação XML. Todos os blocos e funções referentes à submissão/importação de XML que envolviam a interpretação do CBOs dos arquivos foram estudados e reescritos em novas funções. 

Introdução

No fluxograma acima podemos observar o início do processo de submissão/importação do XML que será explorado nessa documentação.
Com a TISS 3 existe a necessidade de gravar a especialidade dos eventos executados com base no CBOS do Solicitante e Executante, tais informações são de suma importância em processos posteriores à importação XML, como por exemplo a validação de regras de cobertura das críticas 017 (Limite de Quantidade ultrapassada.) e 018 (Limite de Periodicidade ultrapassada.), uma vez que as mesmas podem ser parametrizadas para levar em consideração a especialidade enviada no atendimento, a incoerência nessas informações pode levar o sistema a negar ou autorizar um atendimento indevidamente.

Caminhos das tags de CBOs

Conforme ultima versão vigente dos SCHEMAS das guias TISS, esses são os caminhos em que o prestador pode enviar o CBOS nos diferentes tipos de guias XML tratados pelo sistema:

Alterações realizadas

Antes de partirmos para as alterações realizadas nesse chamado, devemos entender os passos básicos no fluxo de processamento XML TISS dentro do sistema.

Índice de funções envolvidas no processo:

PNewVldXML – 

PAjustUnic – 

PlsVarTISS – Cria as variáveis dinâmicas da tabela BVP (NOME).

PlsExecExp – Executa as expressões das criticas da tabela BVN (NOME).

PlTrCBOSUB – Função genérica para validação de criticas referentes ao CBOs enviados no arquivo.

PLCarCBOVar – Inicializa as variáveis dinâmicas referente às TAGs de CBOS e especialidade dos profissionais da guia.

LEGENDA:

Funções envolvidas

Funções alteradas

Funções criadas

As validações de CBOS no processo de submissão do XML se divide nas seguintes etapas:

PNewVldXML
Armazena todas as TAGS e dados do XML na matriz aDados. Toda a validação gira em torno dessa matriz pois o sistema carrega as críticas cadastradas na tabela BVN (NOME DA TABELA), e as executa conforme parametrização. (cTpVld).
Com o aDados inicializado o sistema monta uma outra matriz com dados únicos, ou seja, uma matriz que contém todos os dados do XML porém sem tags repetidas. Porém as tags de CBOs entram em uma exceção, já que as tags possuem o mesmo nome mas contém dados tanto do solicitante quanto do executante.

PlsVarTISS
Antes de iniciar o loop na matriz aDados, é feita a carga inicial de todas as variáveis dinâmicas utilizadas nas expressões das críticas da tabela BVN. Posteriormente, a cada loop que o sistema faz em cima da matriz aDados, é verificado se existe alguma TAG na chamada da expressão cadastrada na tabela BVP para que a variável seja atualizada antes da execução da regra de validação da crítica. Por exemplo: Se estou validando a TAG <ans:codigoProcedimento> e existe a variável CCODPRO que utiliza essa informação em sua expressão, o sistema chama novamente a função para atualizar os dados da variável dinâmica CCODPRO.

PLCarCBOVar

Função criada para inicializar o conteúdo das novas variáveis dinâmicas de CBOs e Especialidade (_CCBOSOL, _CCBOEXE, _CESPSOL, _CESPEXE, _CCODESP). A função identifica qual o tipo de dado solicitado no cadastro da tabela BVP, e faz a busca na matriz de dados únicos conforme o caminho definido no Schema do XML. 

PAjustUnic
A cada dado do XML validado, o sistema faz a chamada da função de ajuste da matriz de dados únicos.

PlsExecExp
Antes da chamada da função PlsExecExp, uma matriz é alimentada com todas as críticas existentes para a TAG em validação. A partir dessa matriz, o sistema chama as funções de validação das críticas X25 e 047.
Critério para alimentar a matriz: caminho e nome e caminho da tag que está sendo validada deve estar contida nos campos BVN_CAMTAG e BVN_TAG respectivamente. 

PlTrCBOSub

Image Added
Nova função genérica de validação de críticas de CBOs. Recebe os parâmetros cCodGlo, cCboExe, cCboSol, cCodEsp, cEspExe e cEspSol.
O conteúdo da variável cCodGlo corresponde a crítica que está sendo analisada no momento e o restante são as variáveis dinâmicas definidas na função PLCarCBOVar.

047 - Especialidade bloqueada para esta RDA.

Validação Única: Retorna uma variável lógica informando se a especialidade enviada pelo executante está no cadastro de especialidades do Prestador (BAX). Caso a mesma não exista, existe a possibilidade de considerar as especialidades definidas no parâmetro MV_PESPPLA. 

X25 - Especialidade nao encontrada no sistema com base no CBOS informado no arquivo.
Primeira Validação: Verifica se para o CBO enviado, existe vinculo De/Para cadastrado no sistema.
Segunda Validação: Verifica se para a especialidade retornada a partir do De/Para, o Profissional Executante a possui em seu cadastro. Também é feito o tratamento para o CBO não informado (Codigo de terminologia ‘999999’).

Se ambas validações retornarem o valor lógico Verdadeiro, o arquivo é acatado caso não haja nenhuma outra crítica pertinente a submissão.

Essa função pode ser customizada, para maiores informações acesse este link e confira a documentação do ponto de entrada PLTISESP.

Procedimento para Implantação

O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.

1. Aplique o patch do chamado e execute a rotina Versões TISS
2. Selecione a a versão desejada e clieque em Ações Relacionadas/Recarregar
3. Leia atentamente o alerta exibido
4. Confirme se estiver de acordo.
5. As tabelas serão atualizadas referente a submissão dos arquivos TISS serão recarregadas.

Procedimento para Configuração

(Estes procedimentos devem ser feitos quando for necessário configurar parâmetros e/ou  rotinas no menu).

CONFIGURAÇÃO DE PARÂMETROS

1. No Configurador (SIGACFG), acesse Ambientes/Cadastros/Parâmetros (CFGX017). Crie/configure (mantenha somente a instrução correspondente) o(s) parâmetro(s) a seguir:
   (É necessário criar uma tabela para cada parâmetro descrito no item Parâmetro(s), da tabela Características do Requisito)

CONFIGURAÇÃO DE MENUS

2.  No Configurador (SIGACFG), acesse Ambientes/Cadastro/Menu (CFGX013). Informe a nova opção de menu do informe o nome do módulo, conforme instruções a seguir:

Procedimento para Utilização

       1.            No Plano de Saúde (SIGAPLS), acesse Atualizações / Produto Saúde / Produto Saúde (PLSA800).

O sistema apresenta a janela de produtos cadastrados.

       2.            Posicione o cursor em um produto e clique em Alterar.

       3.            Na pasta Cobertura/Carências selecione a subpasta Tipo de Prestador.

       4.            Dê duplo clique no campo TP Prestador (BCW_TIPPRE).

O sistema apresenta a janela Tipo de Prestador – Coparticipação – Alterar.

       5.            Informe os dados conforme orientação do help de campo e observe o preenchimento do novo campo:

                      Som. p/Compra (BCW_SOMCOM): selecione Sim para indicar se a coparticipação cadastrada será válida somente para efeito de compra de procedimentos ou Não, caso contrário.

       6.            Confira os dados e confirme.

Ponto de Entrada

Exemplo:

#Include 'Protheus.ch'

User Function CN120ALT()

Local aCab:= PARAMIXB[1]

Local cTipo:= PARAMIXB[2]

If cTipo == '1'

    aCab[4][2]:= 'NF' //Validações do usuário

EndIf

Return aCab