Árvore de páginas

CPC-BOSAUINSS

Produto:

TOTVS Saúde Planos - Linha Datasul

Módulo:Todos
Versão:a partir da versão 12.1.34
Assuntos:

cpc-bosauinss.p


  • Rotina responsável por retornar o demonstrativo de INSS referente as APIs do APP da Unimed Brasil.


Localização

  • Dentro do programa appUnimedBrasil/Medico/bosau/bosauINSS.p

Ponto de Utilização

  • "ANTES-PROCESSO"
  • "DEPOIS-PROCESSO"

Include das definições das tabelas temporárias

  • cpc/cpc-bosauinss.i


Tabelas de entrada e saída

Tabela de entrada  tmp-cpc-bosauinss-entrada

Tabela Temporária de Entrada
def temp-table tmp-cpc-bosauinss-entrada   no-undo    
    field nm-ponto-chamada-cpc       as char format "x(20)".

Definição campo a campo da tabela de entrada

  • nm-ponto-chamada-cpc - Ponto de chamada da CPC.


Tabela de entrada e saída tmpParams

Tabela Temporária de Entrada e Saída
def temp-table tmpParams no-undo
	field X-Matricula as integer
    field competencia as character.

Definição campo a campo da tabela 

  • X-Matricula - Matricula do médico.
  • competencia - Competência referente ao INSS.


Tabela de entrada e saída tmp-titupres

Tabela Temporária de Entrada e Saída
def temp-table tmp-titupres no-undo
	field cd-unidade-prestador        like titupres.cd-unidade-prestador
    field cd-prestador                like titupres.cd-prestador
    field cd-tipo-medicina            like titupres.cd-tipo-medicina
    field cod-esp                     like titupres.cod-esp
    field nr-docto                    like titupres.cod-docto-ap
    field parcela                     like titupres.parcela
    field vl-saldo                    like titupres.vl-saldo
    field dt-anoref                   like titupres.dt-anoref
    field nr-perref                   like titupres.nr-perref
    field dt-vencimento               like titupres.dt-vencimento
    field in-tipo-titulo              like titupres.in-tipo-titulo.

Tabela de entrada e saída tmp-comprovante

Tabela Temporária de Entrada e Saída
def temp-table tmp-comprovnate no-undo
	field nm-unimed                   like Unimed.nm-unimed
    field mm-aa-venc                  as char format "99/9999"
    field mm-aa-prod                  as char format "99/9999"
    field ds-endereco                 as char
    field nr-cgc                      like unimed.nr-cgc
    field nm-prestador                like preserv.nm-prestador
    field nr-inscricao-inss           like preserv.nr-inscricao-inss
    field nr-cgc-cpf                  like preserv.nr-cgc-cpf
    field vl-remuneracao              as dec
    field vl-base-inss-movto          like titupres.vl-base-inss-movto
    field vl-base-inss-ben-movto      like titupres.vl-base-inss-ben-movto
    field vl-base-inss-jur-movto      like titupres.vl-base-inss-jur-movto
    field vl-base-inss-pro-movto      like titupres.vl-base-inss-jur-movto
    field vl-inss-movto               as dec
    field vl-irf-fisica-movto         like titupres.vl-irf-fisica-movto
    field vl-iss-movto                like titupres.vl-inss-movto
    field vl-cofins-movto             like titupres.vl-cofins-movto
    field vl-pispasep-movto           like titupres.vl-pis-pasep-movto
    field vl-csll-movto               like titupres.vl-inss-movto
    field vl-imp-unico                like titupres.vl-unico-movto
    field vl-saldo                    like titupres.vl-saldo
    field ds-data                     as char format "x(40)"
    field ds-cidade                   as char format "x(40)"
    field nm-responsavel              like preserv.nm-prestador
    field tp-pessoa                   as char format "x(1)".

Tabela de saida tmp-cpc-bosauinss-saida

Tabela Temporária de Saída
def temp-table tmp-cpc-bosauinss-saida     no-undo
    field lg-ignora-bo                    as logical    
    field lg-undo-retry                   as logical                             
    field ds-mensagem                     as char format "x(75)". 

Definição campo a campo da tabela de saída

  • lg-ignora-bo – Indica se a lógica da BO será ignorada, considerando apenas a regra da CPC para criação das tabelas de saída da BO. É válido apenas para o ponto "ANTES-PROCESSO".
  • ds-mensagem – Aponta a mensagem de erro tratado que ocorreu na CPC.
  • lg-undo-retry - Indica que ocorreu erro. Ao preencher esse campo será criada um registro na rowerrors com a mensagem definida no campo ds-mensagem.