Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

CPC-BOSAU-PROCESSA-A500.P

Produto:

Gestão de Planos de SaúdeTOTVS Saúde Planos - Linha Datasul

Módulo:HRC - Revisão de Contas Médicas
Versão:A partir da 12.1.29.1115, 12.1.31.6 10 e 12.1.32.15
Assuntos:

cpc-bosau-importprocessa-A500


  • Programa para importação do PTU A500 XML.
  • Caso o cliente não queira executar a chamada da CPC deve colocar "CPC ativo" como "não" no seu cadastro.

Pontos de utilização

  • "GLOSAANTES-CRIA-IMPORT"
  • "DATA-RECEBIM"
  • "TRATA-PROC"
  • "DADOS-INTERN"
  • "LOC-TRANS-GUIA"
  • DOC" - Permite a validação e/ou alteração dos dados dos documento e movimentos importados antes da criação dos registros nas tabelas do banco de dados;
  • "DEPOIS-CRIA-DOC" - Ponto localizado no final do processo após a criação dos documentos com os movimentos importados, nesse ponto as tabelas temporárias (tmp-documento, tmp-procedimento e tmp-insumo) possuem a chave do documento/movimento criado na base o que possibilita a localização dos registros. A alteração das tabelas temporárias não terão impacto na importação dos movimentos.
  • "ANT-DADOS-PROC" - Altera o código do procedimento importado caso ele esteja fora do período de vigência.
  • "ANT-DADOS-INSU" - Altera o código do insumo importado caso ele esteja fora do período de vigência.
  • "PREST-DIV-HONO" - Ponto liberado a partir da versão 12.1.2307
  • "APOS-NOTAPRES" - Ponto liberado a partir da versão 12.1.2311.
  • "APOS-VALID-TRAN" - Ponto implementado após validar transação. Liberado a partir da versão 12.1.2411."BUSCA-TRANS-DOC"

Include das definições das tabelas temporárias

  • {cpc/cpc-bosau-importprocessa-A500.i}


Tabelas de entrada e de saída

Bloco de código
titleTabela de entrada:

...

tmp-cpc-

...

processa-A500-entrada
def temp-table tmp-cpc-

...

processa-a500-entrada no-undo

...


field nm-ponto-chamada-cpc          as char format "x(15)"

...


    field in-evento-programa            as char format "x(06)"
    field idi-tipo-arquivo-ptu          as integer
    field dt-realizacao                 as date
    field cd-movto                      as char
    field cd-tipo-tab                   as int
	field aa-fatura                     as int 
	field dt-emissao                    as date
    field cd-transacao                  as int
    field cod-guia-tiss-prestador       as char
    field lg-erro-docto                 as log
    field h-buffer-docto-ptu            as handle
    field h-tmp-erros-ptu-imp           as handle.
Definição campo a campo da tabela de entrada
  • in-evento-programa - nome do evento (utilizado para pontos que possuem múltiplas chamadas);
  • nm-ponto-chamada-cpc - nome do ponto de chamada da CPC;
  • cd
  • idi-tipo-
  • unidade - código da unidade;
  • cd-unidade-prestadora - código da unidade prestadora;
  • arquivo-ptu - indicador do tipo de arquivo importado. Valores: 500 - PTU A500 Cobrança, 520 - PTU A500 Aviso;
  • dt-realizacao - data de realização do movimento
  • cd-transacao - código da transação
  • ;
  • cd-
  • unidade
  • movto -
  • principal - código da unidade principal
  • código do movimento importado;
  • cd-
  • prestador
  • tipo-
  • principal - código do prestador principal
  • tab - tipo de tabela de insumos;
  • cd
  • aa-
  • unidade
  • fatura -
  • solicitante - código da unidade solicitante;
  • cd-prestador-solicitante - código do prestador solicitante;
  • nr-serie-doc-original - série do documento;
  • nr-doc-original - número do documento;
  • in-tp-movto - tipo do movimento;
  • cd-tipo-insumo - código do tipo do insumo;
  • cd-movto - código do movimento;
  • lg-benef-base - indica se beneficiário é da base ou não;
  • recid-benef - identificador do usuário;
  • recid-guia-autor - identificador da guia;
  • in-classe-nota - identificador da classe de nota;
  • lg-movto-divi - identificador;
  • cd-tipo-vinculo - identificador do tipo de vínculo;
  • cd-esp-prest-executante - código da especialidade;
  • dt-realizacao - data de realização;
  • aa-guia-atendimento - ano da guia;
  • nr-guia-atendimento - número da guia;
  • cd-serie-nf - série da fatura;
  • aa-fatura - ano da fatura;
  • nr-fatura - número da fatura;
  • dt-emissao - data de emissão;
  • dt-recebimento - data de recebimento;
  • cd-unidade-ant - código da unidade anterior;
  • cd-carteira-usuario-ant - código da carteira anterior;
  • cd-modalidade-ant - código da modalidade anterior;
  • cd-usuario-ant - código do usuário anterior;
  • nr-ter-adesao-ant - número do termo de adesão anterior;
  • nr-via-carteira-ant - número da via da carteira anterior;
  • cd-unidade-carteira - código da unidade da carteira;
  • cd-carteira-usuario - número da carteira do usuário;
  • nr-via-carteira - número da via da carteira;
  • in-glosa - identificador do tipo de glosa;
  • cd-proc-insu - código do procedimento/insumo;
  • cd-unidade-executante - código da unidade executante;
  • cd-prestador-executante - código do prestador executante;
  • lg-urgencia - indicador de urgência;
  • lg-layout-serious - identificador de layout Serious ou PTU;
  • lg-utiliza-palm - indica se utiliza palm;
  • nr-seq-interno - número sequencial interno;
  • nr-processo - número do processo;
  • nr-seq-digitacao - número da sequencia de digitação;
  • in-tipo-movimento - procedimento ou insumo - P ou I;
  • cd-unidade-imp - código da unidade de importação;
  • cd-prestador-imp - código da unidade de importação;
  • nr-lote-imp  - número do lote de importação;
  • nr-sequencia-imp - número da sequencia do lote de importação;
  • in-ato-medico - identifica o tipo de ato médico;
  • r-movto - identificador do movimento;
  • linha-arquivo - número da linha do arquivo;
  • tp-atend - indicador do tipo de atendimento;
  • tp-nota - indicador do tipo da nota;
  • cd-trans-classe - código da associativa transação x classe de nota.

Tabela de saída: tmp-cpc-export-A500-saida

def temp-table tmp-cpc-import-a500-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char format "x(75)"
field cd-movto-saida like ambcbhpm.cd-amb
field cd-transacao like moviproc.cd-transacao
field lg-obriga-dt-receb as log
field lg-glosa-movimento as log
field lg-cart-ant as log
field cd-carteira-benef like car-ide.cd-carteira-inteira
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field cd-unidade-carteira like car-ide.cd-unimed
field cd-tipo-insumo like tipoinsu.cd-tipo-insumo
field lg-urgencia as log
field cd-unidade-prestador like moviproc.cd-unidade-prestador
field cd-prestador like moviproc.cd-prestador
field lg-desconsidera-internacao as log
field lg-verif-prest-exe as log.

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

  • lg-undo-retry - campo que indica se ocorreram erros na CPC. Deve retornar "yes" se ocorrer algum erro ou "no" se o processo for concluído sem erros;
  • ds-mensagem - mensagem de erro que deve ser retornada para o programa chamador caso ocorra algum erro na CPC;
  • cd-movto-saida - código procedimento na saída da cpc;
  • cd-transacao - código da transação;
  • lg-obriga-dt-receb - indica se obriga informar data de recebimento do arquivo;
  • lg-glosa-movimento - indica se vai glosar o movimento;
  • lg-cart-ant - indica se busca o beneficiário pela carteira antiga;
  • cd-carteira-benef - código da unidade da carteira;
  • aa-guia-atendimento - ano da guia;
  • nr-guia-atendimento - número da guia;
  • cd-unidade-carteira - número da carteira do usuário;
  • cd-tipo-insumo - código do tipo do insumo;
  • lg-urgencia - indicador de urgência;
  • cd-unidade-prestador - código da unidade do prestador;
  • cd-prestador - código do prestador;
  • lg-desconsidera-internacao - indicador se considera ou não internação;
  • lg-verif-prest-exe - indica se o prestador executante será igual ao principal
    • ano da fatura.
    • dt-emissao - data de emissão.
    • cd-transacao - código da transação do documento.
    • lg-erro-docto - indicador de erro do documento.
    • h-buffer-docto-ptu - buffer da tabela docto-ptu
    • h-tmp-erros-ptu-imp - handle da tabela temporária tmp-erros-ptu-imp


    Bloco de código
    titleTabela de saída: tmp-cpc-processa-A500-saida
    def temp-table tmp-cpc-processa-a500-saida no-undo
    field lg-undo-retry                 as log
        field cd-erro                       as int
        field ds-mensagem                   as char format "x(75)"
        field cd-movto-saida                as char
        field cd-tipo-tab-saida             as int
        field lg-continua-divisao           as log
    	field aa-fatura                     as int
    	field lg-erro-docto                 as log.

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

    • lg-undo-retry - campo que indica se ocorreram erros na CPC. Deve retornar "yes" se ocorrer algum erro ou "no" se o processo for concluído sem erros;
    • cd-erro - código do erro, pode ser valor zero;
    • ds-mensagem - mensagem de erro que deve ser retornada para o programa chamador caso ocorra algum erro na CPC;
    • cd-movto-saida - código do movimento alterado pela CPC;
    • cd-tipo-tab-saida - tipo de tabela de insumos alterado pela CPC;
    • lg-continua-divisao - campo que indica se continua ou não o processo de divisão de honorários;
    • aa-fatura - ano da fatura.
    • lg-erro-docto - indicador de erro do documento.
    Informações

    O retorno de um registro da tabela temporária de saída tmp-cpc-processa-a500-saida é obrigatório


    O programa da CPC deve receber as tabelas tmp-documento, tmp-procedimento e tmp-insumo que estão definidas na include:

    • {hrc/bosau/bosau-processa-a500.i}


    Exemplo da definição dos parâmetros de entrada para o programa CPC-BOSAU-PROCESSA-A500.P.

    Bloco de código
    /* --------------------------------------------------------- TEMPORARIAS --- */
    {cpc/cpc-bosau-processa-a500.i}
    {hrc/bosau/bosau-processa-a500.i}
    
    /* ---------------------------------------------------------- PARAMETROS --- */
    define input        parameter table for tmp-cpc-processa-a500-entrada.
    define output       parameter table for tmp-cpc-processa-a500-saida.
    define input-output parameter table for tmp-documento   .
    define input-output parameter table for tmp-procedimento.
    define input-output parameter table for tmp-insumo      .