Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin

 Este documento é material de especificação dos requisitos de inovação, trata-se de conteúdo extremamente técnico.                                                             

  

Informações Gerais

 

Especificação

Produto

Microsiga Protheus

Módulo

SIGAPLS

Segmento Executor

Saúde

Chamado

TULEJM

País

( x ) Brasil  (  ) Argentina  (  ) Mexico  (  ) Chile  (  ) Paraguai  (  ) Equador

(  ) USA  (  ) Colombia   (  ) Outro _____________.

Objetivo

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.

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, 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 do quadro financeiro - Fluxo Caixa Trimestral no DIOPS X-Press.

Definição da Regra de Negócio

Os dados do Fluxo de Caixa Trimestral devem ser exportados através do Protheus em formato CSV de acordo com o layout abaixo:

Descrição da conta;valor

Exemplo:

Recebimentos de Plano Saúde;22664.00 

 

Rotina

Tipo de Operação

Opção de Menu

Regras de Negócio

PLSDFLCXTR

Inclusão

Miscelânea -> DIOPS -> Fluxo Trimestral

-

 

  1. Criar novo fonte PLSDFLCXTR cuja funcionalidade é gerar o arquivo CSV resultante desta especificação.
  2. Criar novo grupo de perguntas PLSDFLCXTR contendo as seguintes opções:
    1. Data Inicial
    2. Data Final
    3. Cód. Config. Livros?Período: 1 - Diário; 2 - Mensal
       
  3. Criar novas funções no fonte para montar arquivo temporário com os valores de recebimentos e pagamentos, seguindo exemplo do relatório CTBR560(Contabilidade Gerencial - Relatórios - Demonstrativos - Dem. Fluxo Caixa).:
    1. Utilizar a função CTBSetOf, passando como parâmetro o código do livro. O retorno é um array que contém as informações necessárias para serem usadas na função CtGerPlan.
    2. Utilizar a mesma função do relatório (CTBR560) - CtGerPlan. Essa função gera um alias temporário com todas as informações contábeis informadas na visão gerencial.  Usar a CTGerPlan com a função MsgMeter, como no exemplo: 
      1. MsgMeter({| oMeter, oText, oDlg, lEnd | ;
        CTGerPlan( oMeter, oText, oDlg, @lEnd, @cArqTmp, dFinalA+1, dFinal;
        , "", "", "", Repl( "Z", Len( CT1->CT1_CONTA )), ""; 
        , Repl( "Z", Len(CTT->CTT_CUSTO)), "", Repl("Z", Len(CTD->CTD_ITEM));
        , "", Repl("Z", Len(CTH->CTH_CLVL)), mv_par03, /*MV_PAR15*/cSaldos, aSetOfBook, Space(2);
        , Space(20), Repl("Z", 20), Space(30),,,,, mv_par04=1, mv_par05;
        , ,lVlrZerado,,,,,,,,,,,,,,,,,,,,,,,,,cMoedaDesc,lMovPeriodo,aSelFil,,.T.,MV_PAR17==1)};
        ,STR0006, STR0001)

      2. Para usar a função CTGerPlan é necessário passar como parâmetros alguns dados como:

        oMeter: Controle da régua 

         

        oText: Controle da régua 

         

        oDlg: Janela                                              

         

        lEnd = .T.

         

        cArqtmp: pode passar em branco

         

        dDataIni: MV_PAR01

         

        dDataFim: MV_PAR02

         

        cAlias: "CT7"

         

        cIdent: ""

         

        cContaIni: ""

         

        cContaFim: Repl( "Z", Len( CT1->CT1_CONTA ))

         

        cCCIni: ""

         

        cCCFim: Repl( "Z", Len(CTT->CTT_CUSTO))

         

        cItemIni: ""

         

        cItemFim: Repl("Z", Len(CTD->CTD_ITEM))

         

        cClvlIni: ""

         

        cClVlFim: Repl("Z", Len(CTH->CTH_CLVL))

         

        cMoeda: "01"

         

        cSaldos: CT510TRTSL()

         

        aSetOfBook: CTBSetOf(mv_par03)

         

        cSegmento: pode passar em branco
        cSegIni: ""

         

        cSegFim: Repl("Z", 20)

         

        cFiltSegm: Space(30)

         

        lNImpMov: pode passar em branco

         

        lImpConta: pode passar em branco

         

        nGrupo:pode passar em branco

         

        cHeader: pode passar em branco

         

        lImpAntLP: .F. 

         

        dDataLP: pode passar em branco 
        nDivide: pode passar em branco

         

        lVlrZerado: .T.

         

        cFiltroEnt: pode passar em branco

         

        cCodFilEnt: pode passar em branco

         

        cSegmentoG: pode passar em branco

         

        cSegIniG: pode passar em branco

         

        cSegFimG: pode passar em branco

         

        cFiltSegmG: pode passar em branco
        lUsGaap: pode passar em branco

         

        cMoedConv: pode passar em branco

         

        cConsCrit: pode passar em branco

         

        dDataConv: pode passar em branco

         

        nTaxaConv: pode passar em branco

         

        aGeren: pode passar em branco

         

        lImpMov: pode passar em branco

         

        lImpSint: pode passar em branco

         

        cFilUSU: pode passar em branco

         

        lRecDesp0: pode passar em branco
        cRecDesp: pode passar em branco

         

        dDtZeraRD: pode passar em branco

         

        lImp3Ent: pode passar em branco

         

        lImp4Ent: pode passar em branco

         

        lImpEntGer: pode passar em branco

         

        lFiltraCC: pode passar em branco

         

        lFiltraIt: pode passar em branco

         

        lFiltraCV: pode passar em branco

         

        cMoedaDsc: pode passar em branco

         

        lMovPeriodo: pode passar em branco

         

        aSelFil: pode passar em branco

         

        dDtCorte: pode passar em branco

         

        lPlGerSint: pode passar em branco

         

        lConsSaldo: .T.

         

        lCompEnt: pode passar em branco

         

        cArqAux: pode passar em branco

         

        lUsaNmVis: pode passar em branco

         

        cNomeVis: pode passar em branco

         

        lCttSint: pode passar em branco
        lTodasFil: pode passar em branco

         

        cQuadroCTB: pode passar em branco

         

        aEntidades: pode passar em branco

         

        cCodEntidade: pode passar em branco

    3. Com o resultado da função CtGerPlan, percorrer todos os registros do alias temporário e gravar no array as informações da DIOPS: Descrição da conta e o saldo atual respectivo.
    4. Considerar o parâmetro "Cód. Config. Livros" para buscar a tabela CTN, em seguida será verificada a visão gerencial do quadro da DIOPS associada à configuração do livro, sendo possível encontrar as visões gerenciais e as contas contábeis (tabela CTS), através do vínculo: CTN_PLAGER = CTS_CODPLA.
    5. Através da visão gerencial(CTS) serão localizadas as movimentações contábeis (Tabela CT2) das contas definidas, através do relacionamento CTS_CT1INI >= CT2_CREDIT ou CT2_DEBITO e CTS_CT1FIM  <=  CT2_CREDIT ou CT2_DEBITO.
    6. Seguindo o exemplo CTBR560, criar função PLSDFLCXTR() similar a CtbR560(), modificando os parâmetros utilizando o pergunte criado anteriormente (PLSDFLCXTR), além de alterar o cTitulo para "Fluxo de Caixa Trimestral";
    7. Criar nova função similar a função CTBR560R3() para verificação se os parâmetros Data Inicial e Data Final estão dentro do calendário cadastrado na CTG;
    8. Criar nova função similar a função Ctr560Det() para criação dos detalhes do relatório, como as linhas do relatório não são contas contábeis, deverá fazer um rastro para identificar os títulos correspondentes a cada linha.
      Exemplo: Recebimentos de plano de saúde
      Na visão gerencial será criado esta linha “Recebimentos de Plano de Saúde” e vinculada a conta contábil 3111...,  porém nesta conta contábil totaliza todas as Contraprestações emitidas. Sendo assim para saber o valor  somente dos recebidos desta  conta, deverá fazer o seguinte rastro:
    9. Código de configuração de livro (CTN) de acordo com o conteúdo do parâmetro;
    10. Visão gerencial (CTS) de acordo com o código de configuração do livro;
    11. Contas relacionadas (CT1) à Visão Gerencial;
    12. Verificar os lançamento contabilizados na conta encontrada (exemplo: 3111...) no período informado.
    13. Verificar o campo CT5_ATIVCR que será o número do lote de cobrança.
    14. Ir na BM1 e verificar todos os títulos vinculados neste lote de cobrança. Campo BM1_PREFIX + BM1_NUMTITI.
    15. Ir na SE5 e verificar se este títulos estão baixados, não considerando os títulos que estão baixados por FAT, DAC, LIQ.
    16. Criar laço while para percorrer todos os registros localizados pela query e somar os valores localizados, seguindo o exemplo existente na função Ctr560Det:
       

      Bloco de código
      languagedelphi
      titleRepetição query
      Do Case
      				Case nPosCol = 1
      					nSaldo		:= cArqTmp->SALDOATU
      					If cArqTmp->TIPOCONTA == "1" .AND. Empty( cArqTmp->SUPERIOR ) .AND. cArqTmp->TOTVIS == "1"
      						nSaldoAtu 	+= nSaldo
      					EndIf
      				Case nPosCol = 2
      					nSaldo		:= cArqTmp->SALDOANT
      					If cArqTmp->TIPOCONTA == "1" .AND. Empty( cArqTmp->SUPERIOR ) .AND. cArqTmp->TOTVIS == "1"
      						nSaldoAnt 	+= nSaldo
      					EndIf
      				Case nPosCol = 3
      					nSaldo		:= GetVarEnt(cArqTmp->CONTA,cCodVis,cArqTmp->ORDEM)//cArqTmp->(SALDOATU-SALDOANT)
      					If cArqTmp->TIPOCONTA == "1" .AND. Empty( cArqTmp->SUPERIOR ) .AND. cArqTmp->TOTVIS == "1"
      						nSaldoVar 	+= nSaldo
      					EndIf
      			EndCase

       

    17. Utilizar a função (PLSGerCSV) para geração do arquivo CSV, passando os seguintes parâmetros:
      - Nome do arquivo
      - cabeçalho do arquivo
      - array com os dados. Ex: {Recebimentos de Plano Saúde;22664.00 }Image Removed

      Exemplo da DIOPS de Fluxo Trimestral:

      Image Added

Tabelas Utilizadas

  • CTN
  • CTS
  • CT1
  • CT2
  • CVN
  • CVD

Grupo de Perguntas

 

Nome: PLSDFLCXTR 

X1_ORDEM

01

X1_PERGUNT

Data Inicial

X1_TIPO

D

X1_TAMANHO

8

X1_GSC

G

X1_VAR01

MV_PAR01

X1_DEF01

Comum

X1_CNT01

 


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

Período

Cód. Config. Livros

X1_TIPO

C

X1_TAMANHO

1

3

X1_GSC

C

X1_VAR01

MV_PAR03

X1_

DEF01

"Diário"

X1_DEF02

"Mensal"

X1_HELP

Informa se o período para geração do DIOPS será diário (1) ou mensal (2).

X1_ORDEM

04

X1_PERGUNT

Período Anterior

X1_TIPO

C

X1_TAMANHO

1

X1_GSC

G

X1_VAR01

MV_PAR04

X1_DEF01

"Sim"

X1_DEF02"Não"

X1_HELP

Informa se será considerado período anterior para gerar DIOPS de fluxo de caixa trimestral

HELP

Código do livro para considerar na busca.

 Este documento é material de especificação dos requisitos de inovação, trata-se de conteúdo extremamente técnico.