PTU A500/A550/A560

- Versão 8.0

Características do Requisito

Microsiga Protheus

Saúde

SIGAPLS

Importação Layout A500

PLSUA500

Exportação Layout A500

PLSA470

Gerar Contas a Pagar

Brasil

Todos relacionados

Descrição

Implementada melhoria com a adequação dos PTU´s A500/A550/A560 para a nova versão 8.0.

Segue registros atualizados na versão PTU Batch - 8.0 Layout A500L:

R501 - 1 registro alterado

  - NR_VER_TRA = '26';

R502 - 5 registros adicionados

• ID_LIMINAR;
• TP_PESSOA;
• NR_CNPJ_CPF;
• CD_CNES_CONT_EXEC;
• CD_MUNIC_CONT_EXEC;

R504 - 3 registros alterados, 1 adicionado

• CD_CNES_PREST - Alterado para RESERVADO;
• ID_ALTO_CUSTO - Alterado para RESERVADO;
• CD_MUNIC - Alterado para RESERVADO;
• TIPO_REDE_MIN;

R507:

• Retirado os registros referentes a Itens do registro R507 e incluidos no R508;

R509

•  QT_TOT_R508;

R998 -Inclusão de registro

• Hash.

Segue registros atualizados na versão PTU Batch - 8.0 Layout A550H:

R551 - 1 registro alterado

  - NR_VER_TRA = '14';

R557:

• Retirado os registros referentes a Itens do registro R507 e incluidos no R508;

R999 R998 -Inclusão de registro

• Hash.

Segue registros atualizados na versão PTU Batch - 8.0 Layout A560E:

R561 - 1 registro alterado

  - NR_VER_TRA = '14';

Procedimento para Implantação

Para geração do Registro R998 - Hash é necessário a leitura de todo o arquivo gerado retirando as quebras de linha.

Devido a limitação do sistema conseguir armazenar em suas variáveis o tamanho de até 1MB será necessário adicionar o parâmetro MaxStringSize com no minimo 2 no seu APPSERVER.INI para prevenir o erro de String size overflow.

Segue a documentação e exemplo:

Seção [general], chave MaxStringSize

AppServer.Ini

1. Abra o appserver.ini localizado dentro da pasta AppServer.
2. Localize a seção [General] e adicione o seguinte trecho:
   1. MaxStringSize=5 

Aplicando os layouts:

     Layout A500: 

• No Plano de Saúde (SIGAPLS) acesse Miscêlanea / E.d.i. / Aplicação Lay-out (PLSPTUAPL). Copie os arquivos DBF´s que compõem o pacote em uma pasta no Rootpath da instalação Protheus.
• Na pergunta Lay-Out? infome A500L e na pergunta Path?, indique a pasta indicada na etapa acima. Confirme, o Layout PTU é atualizado.

     Layout A550:  

• No Plano de Saúde (SIGAPLS) acesse Miscêlanea / E.d.i. / Aplicação Lay-out (PLSPTUAPL). Copie os arquivos DBF´s que compõem o pacote em uma pasta no Rootpath da instalação Protheus.
• Na pergunta Lay-Out? infome A550H e na pergunta Path?, indique a pasta indicada na etapa acima. Confirme, o Layout PTU é atualizado.

        Layout A560:  

• No Plano de Saúde (SIGAPLS) acesse Miscêlanea / E.d.i. / Aplicação Lay-out (PLSPTUAPL). Copie os arquivos DBF´s que compõem o pacote em uma pasta no Rootpath da instalação Protheus.
• Na pergunta Lay-Out? infome A560E e na pergunta Path?, indique a pasta indicada na etapa acima. Confirme, o Layout PTU é atualizado.

Procedimento para

(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

• Descreva os procedimentos, passo a passo (caso de uso), que serão realizados pelos usuários para que a melhoria seja visualizada identificando as seguintes informações:
• Localização da rotina no menu;
• Localização dos novos campos e/ou perguntas e respectivas pastas de cadastro que são visualizadas pelo usuário;
• Caso seja necessário ter algum cadastro feito previamente, faça uma observação.

Exemplo:

       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.

Vídeo

• Vídeo hospedado no youtube e inserido no template por meio da macro Widget Connector.

** Canal do youtube e software de vídeoem definição.

Utilização 

Processo AJIUS - Operadora Origem

1. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importar PTU 500 (PLSEDIA500).
2. Informe os parâmetros indicando na pergunta Layout o conteúdo A500L. Confirme e realize a importação.
3. No Plano de Saúde (SIGAPLS), acesse Atualizações / Proc. Contas / Digitação Contas (PLSA498). Realize a análise das guias importadas.
4. Acesse Atualizações / Pagamento RDA/ Lotes de Pagamento (PLSA470).
5. Selecione o menu “Novo Lote pagto”. Informe no parâmetro o sequencial do Lote de importação.
6. Vá até ao menu “Gerar Pagto” em ações relacionadas e confirme a geração do pagamento.
7. Se houveram glosas, vamos iniciar o processo AJIUS. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 550 (PLSUA550). 
8. Selecione o layout A550L, a fatura correspondente e exporte o arquivo.
9. Neste passo é realizada a negociação com a Operadora Executora através do AJIUS. A partir deste passo, vamos simular um processo onde existirão dois arquivos Parciais.
10. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importação PTU 550 (PLSP550). 
11. Selecione o Layout A550H, o arquivo Parcial 1 que será importado e nas perguntas Executora/Origem selecione "Origem", e na Reembolso Anestesista "Não".
12. Ao confirmar as guias que houveram negociação são clonadas.
13. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 560 (PLSUA560). Selecione a opção Origem.
14. Selecione a fatura importada e clique em Exportar. O sistema gera o título de recebimento e arquivo A560 correspondente a Parcial 1.
15. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importação PTU 550 (PLSP550). 
16. Selecione o Layout A550H, o arquivo Parcial 2 que será importado e nas perguntas Executora/Origem selecione "Origem", e na Reembolso Anestesista "Não".
17. Ao confirmar as guias que houveram negociação são clonadas.
18. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 560 (PLSUA560). Selecione a opção Origem.
19. Selecione a fatura importada e clique em Exportar. O sistema gera o título de recebimento e arquivo A560 correspondente a Parcial 2.

Processo AJIUS - Operadora Executora 

1. Com guias de intercâmbio já digitadas, no Plano de Saúde (SIGAPLS), acesse Atualizações / Faturamento /Lotes Intercâmbio(PLSA628).
2. Clique em Novo Lote, preencha os campos e confirme, o lote de intercâmbio é gerado.
3. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportar PTU 500 (PLSUA500)
4. Informar o parâmetro layout com o conteúdo A500L e confirmar, o arquivo PTU é gerado.
5. Neste passo é realizada a negociação com a Operadora Executora através do AJIUS. A partir deste passo, vamos simular um processo onde existirão dois arquivos Parciais.
6. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importação PTU 550 (PLSP550). 
7. Selecione o Layout A550H, o arquivo Parcial 1 que será importado e nas perguntas Executora/Origem selecione "Executora", e na Reembolso Anestesista "Não".
8. Ao confirmar as guias que houveram negociação são clonadas.
9. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 560 (PLSUA560). Selecione a opção Executora.
10. Selecione a fatura exportada e clique em Exportar. O sistema gera o título de recebimento e arquivo A560 correspondente a Parcial 1.
11. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importação PTU 550 (PLSP550). 
12. Selecione o Layout A550H, o arquivo Parcial 2 que será importado e nas perguntas Executora/Origem selecione "Executora", e na Reembolso Anestesista "Não".
13. Ao confirmar as guias que houveram negociação são clonadas.
14. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 560 (PLSUA560). Selecione a opção Executora.
15. Selecione a fatura exportada e clique em Exportar. O sistema gera o título de recebimento e arquivo A560 correspondente a Parcial 2.

Reembolso Anestesista - Origem Beneficiário 

1.  No Plano de Saúde (SIGAPLS), acesse Atualizações / Atendimento / Autorização Reemb. (PLSA001) 
2.  Informe o campo “Rede Não Ref” B44_CODREF.
3.  Informe o campo “Anestesista?”  B44_REEANE – deve colocar este campo como 1-Sim.
4.  Informe um profissional executante e a Operadora do profissional executante deverá ser a da Operadora de intercâmbio
5.  Incluir um procedimento que deverá ter a composição de anestesista parametrizada no MV_PLSREAN.
6.  Informe o valor de pagamento e selecione o menu “Valorar”.
7.  Confirme o Reembolso.
8.  No Plano de Saúde (SIGAPLS), acesse Atualizações / Faturamento /Lotes Intercâmbio (PLSA628)
9.  Nos parâmetros informar o Mês e Ano do Reembolso e o campo “Anestesista?” colocar como Sim.
10.  Selecione Confirmar será gerado lote de intercâmbio com um título no valor da diferença do valor reembolsado e contratado.
11.  No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportar PTU 500 (PLSUA500)
12.  Informar o parâmetro layout com o conteúdo A500L e o Tipo de Lote preencher como Reembolso Anest.
13.  Selecione o Lote de Intercambio que acabamos de gerar. 
14.  Será gerado o Arquivo A500 com Registro R507 com informações do Lote de Intercambio/ Reembolso de Anestesista.
15. Neste passo é realizada a negociação com a Operadora Executora através do AJIUS. A partir deste passo, vamos simular um processo onde existirão dois arquivos Parciais.
16. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importação PTU 550 (PLSP550). 
17. Selecione o Layout A550H, o arquivo Parcial 1 que será importado e nas perguntas Reembolso Anestesista informe "Sim" e Ree.Ane. Prest/Benef? informe 2-Or.Beneficiár.
18. Confirme para realizar a importação do arquivo.
19. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 560 (PLSUA560). Selecione a opção Ree. Anest - Or.Benef.
20. Selecione a fatura exportada e clique em Exportar. O sistema gera o título de recebimento e arquivo A560 correspondente a Parcial 1.
21. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importação PTU 550 (PLSP550). 
22. Selecione o Layout A550H, o arquivo Parcial 2 que será importado e nas perguntas Reembolso Anestesista informe "Sim" e Ree.Ane. Prest/Benef? informe 2-Or.Beneficiár.
23. Confirme para realizar a importação do arquivo.
24. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 560 (PLSUA560). Selecione a opção Ree. Anest - Or.Benef.
25. Selecione a fatura exportada e clique em Exportar. O sistema gera o título de recebimento e arquivo A560 correspondente a Parcial 2.

Reembolso Anestesista - Origem Prestador 

1. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importar PTU 500 (PLSP500) 
2.  Informe parâmetros: Layout com A500L , caminho do Arquivo a Importar, código procedimento genérico diferente ao que você esta importando e Tipo de Lote igual a "Reembolso Anest"
3.  Confirme a Importação.
4.  Em ações relacionadas selecione o menu “Guia reemb Anestesista” e visualize os registros R507 importados
5.  Clique em visualizar para analisarmos os registros e após irmos a rotina de pagamento para pagar o valor da diferença.
6.  No Plano de Saúde (SIGAPLS), acesse Atualizações / Pagamento RDA/ Lotes de Pagamento (PLSA470)
7.  Selecione o menu “Novo Lote pagto”
8.   Informe no parâmetro o sequencial do Lote de importação e o pagamento de anestesista como igual a Sim.
9.   Ir ao menu “Gerar Pagto” em ações relacionadas e confirme a geração do pagamento.
10.   Ao confirmar o pagamento vamos voltar a rotina de Importação de PTU A500 (PLSP500) e note que o status mudou para importado e pago
11. Se houver glosas, vamos iniciar o processo AJIUS. 
12. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 550 (PLSUA550). 
13. Selecione o layout A550H, a fatura correspondente e exporte o arquivo.
14. Neste passo é realizada a negociação com a Operadora Executora através do AJIUS. A partir deste passo, vamos simular um processo onde existirão dois arquivos Parciais.
15. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importação PTU 550 (PLSP550). 
16. Selecione o Layout A550H, o arquivo Parcial 1 que será importado e nas perguntas Reembolso Anestesista informe "Sim" e Ree.Ane. Prest/Benef? informe 2-Or.Prestador.
17. Ao confirmar as guias que houveram negociação são clonadas.
18. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 560 (PLSUA560). Selecione a opção Ree. Anest - Or.Prest.
19. Selecione a fatura importada e clique em Exportar. O sistema gera o título de recebimento e arquivo A560 correspondente a Parcial 1.
20. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Importação PTU 550 (PLSP550). 
21. Selecione o Layout A550H, o arquivo Parcial 2 que será importado e nas perguntas Reembolso Anestesista informe "Sim" e Ree.Ane. Prest/Benef? informe 2-Or.Prestador.
22. Ao confirmar as guias que houveram negociação são clonadas.
23. No Plano de Saúde (SIGAPLS), acesse Miscelânea / Unimed / Exportação PTU 560 (PLSUA560). Selecione a opção Ree. Anest - Or.Prest.
24. Selecione a fatura importada e clique em Exportar. O sistema gera o título de recebimento e arquivo A560 correspondente a Parcial 2.

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