Histórico da Página
Este documento é material de especificação dos requisitos de inovação, trata-se de conteúdo extremamente técnico. |
---|
(Obrigatório)
Informações Gerais
Especificação | |||
Produto | Microsiga Protheus | Módulo | SIGAPLS |
Segmento Executor | Saúde | ||
Chamado2 | TULEO2 | ||
País | (x ) Brasil ( ) Argentina ( ) Mexico ( ) Chile ( ) Paraguai ( ) Equador ( ) USA ( ) Colombia ( ) Outro _____________. | ||
Outros | <Caso necessário informe outras referências que sejam pertinentes a esta especificação. Exemplo: links de outros documentos ou subtarefas relacionadas>. |
Legenda: 1 – Inovação 2 – Manutenção (Os demais campos devem ser preenchidos para ambos os processos).
TULEO2 _ER_DIOPS_SOLVÊNCIA
(Obrigatório)Objetivo
O DIOPS é o Documento de Informações Periódicas das Operadoras de Planos de Saúde, que devem ser enviados trimestralmente à ANS. As informações que compõem este documento são: quadros cadastrais, quadros financeiros, quadros gerenciais e informações gerais. O documento tem por objetivo fornecer condições para que a DIOPS (ANS) possa efetuar o controle, o monitoramento e o acompanhamento das operadoras.
Um novo padrão foi estabelecido pela ANS para recebimento dessas informações. O padrão definido segue os conceitos da Troca de Informação em Saúde Suplementar (TISS), cujos dados são enviados pelas operadoras para a ANS em arquivos XML.
A ANS verifica e valida o conteúdo desses arquivos através do seu site, no entanto, algumas ferramentas estão disponíveis para execução dessa tarefa antes do envio, como o DIOPS X-Press. Com esta ferramenta, não é necessário submeter o XML ao site da ANS, permitindo que erros sejam corrigidos antes do envio à ANS.
Além disso, a ferramenta permite a importação de arquivos com layouts pré-definidos ou digitação das informações manualmente em todos os quadros. Essa especificação contempla todas as informações necessárias para o desenvolvimento do relatório para preenchimento da Solvência no DIOPS X-Press.
(Obrigatório)Definição da Regra de Negócio
Os dados da Solvência devem ser exportados através do Protheus em formato CSV e, posteriormente, incluídos manualmente no DIOPS X-Press, pois não existe a importação automática do arquivo para essa modalidade na ferramenta.
Premissa: para emissão do arquivo deverá ser criada uma Visão Gerencial com o Plano de Contas da ANS e uma configuração de Livro vinculando esta visão.
Rotina | Tipo de Operação | Opção de Menu | Regras de Negócio |
PLSDSOLV | Inclusão | Miscelânea -> DIOPS -> Solvência |
|
- Criar novo fonte PLSDSOLV cuja funcionalidade é gerar o arquivo CSV resultante desta especificação.
- Criar novo grupo de perguntas PLSDSOLV contendo as seguintes opções:
- Data Inicial
- Data Final
- Cód. Config. Livros
- Qtd Meses Contraprestação: 12 - Meses; 36 - Meses
- Qtd Meses Eventos: 12 - Meses; 36 – Meses
- Realizar as devidas verificações nos parâmetros de datas e do código do livro. Sobre o código do livro, utilizar a função CtbSetOf, para retornar os dados do Livro;
- Usar a função CTGerPlan (ou utilizar como base) para montar arquivo temporário com a somatória (débito e crédito) de cada conta filtrado pelos parâmetros, seguindo exemplo do relatório CTBR510 (Contabilidade Gerencial - Relatórios - Demonstrativos - Demons. resultados).
- Sendo assim para saber o valor da conta, deverá fazer o seguinte rastro:
- Código de configuração de livro (CTN) de acordo com o conteúdo do parâmetro;
- Visão gerencial (CTS) de acordo com o código de configuração do livro;
- Contas relacionadas (CT1) à Visão Gerencial;
- Verificar os lançamentos contabilizados na conta encontrada (exemplo: 3111...) no período informado.
- Criar função para gerar o arquivo CSV com o seguinte layout;
- Descrição da Conta
o Valor
Exemplo de função para montagem do CSV:
cDirCsv := cGetFile("TOTVS","Selecione o diretorio",,"",.T.,GETF_OVERWRITEPROMPT + GETF_NETWORKDRIVE + GETF_LOCALHARD + GETF_RETDIRECTORY)
nFileCsv := FCreate(cDirCsv+"NOME_ARQUIVO.csv",0,,.F.)
If nFileCsv > 0
FWrite(nFileCSV,"Coluna 1;Coluna 2"+CRLF)
For nI := 1 TO Len(aFluxo)
FWrite(nFileCSV,aFluxo[nI,1]+";"+aFluxo[nI,2]+CRLF)
Next nI
FClose(nFileCSV)
Else
MsgInfo("Não foi possível criar o arquivo " + cDirCsv+cFileRPX,"TOTVS")
EndIf
Tabelas Utilizadas
- CTN
- CTS
- CT1
- CT2
- CVN
(Opcional)
Grupo de Perguntas
Nome: PLSDSOLV
X1_ORDEM | 01 |
X1_PERGUNT | Data Inicial |
X1_TIPO | D |
X1_TAMANHO | 8 |
X1_GSC | G |
X1_VAR01 | MV_PAR01 |
X1_HELP | Data inicial do intervalo para emissão do DIOPS de fluxo de caixa trimestral |
X1_ORDEM | 02 |
---|---|
X1_PERGUNT | Data Final |
X1_TIPO | D |
X1_TAMANHO | 8 |
X1_GSC | G |
X1_VAR01 | MV_PAR02 |
X1_HELP | Data final do intervalo para emissão do DIOPS de fluxo de caixa trimestral |
X1_ORDEM | 03 |
---|---|
X1_PERGUNT | Cód. Conf. Livros |
X1_TIPO | C |
X1_TAMANHO | 3 |
X1_GSC | G |
X1_VAR01 | MV_PAR03 |
X1_HELP | Código da configuração do livro que será considerado na busca de ativos vinculados para o DIOPS. |
X1_F3 | CTN |
X1_ORDEM | 04 |
---|
(Opcional)
Consulta Padrão
<Informações utilizadas na linha Protheus>
Consulta: AMB
X1_PERGUNT | Qtd Meses Contraprestação |
X1_TIPO | C |
X1_TAMANHO | 1 |
X1_GSC | C |
X1_VAR01 | MV_PAR04 |
X1_DEF01 | "12" |
X1_DEF02 | "36" |
X1_HELP | Informa a quantidade de meses Contraprestação: 12 (1) ou 36 (2). |
X1_ORDEM | 05 |
---|---|
X1_PERGUNT | Qtd Meses Eventos |
X1_TIPO | C |
X1_TAMANHO | 1 |
X1_GSC | C |
X1_VAR01 | MV_PAR05 |
X1_DEF01 | "12" |
X1_DEF02 | "36" |
X1_HELP | Informa a quantidade de meses Eventos: 12 (1) ou 36 (2). |
Descrição
Configurações de Planejamento
Tipo
Consulta Padrão
Tabela
“AMB”
Índice
“Código”
Campo
“Código”; ”Descrição”
Retorno
Este documento é material de especificação dos requisitos de inovação, trata-se de conteúdo extremamente técnico. |
---|