Árvore de páginas

Versões comparadas

Chave

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

...

contratadoExecutante e dadosExecutante

Campo Protheus

Regra 

BD6_NOMEDI

nome
BD5/BE4_PESEDI e BD6_TPRDAE

Tamanho do conteúdo na tag CPF_CNPJ

BD5/BE4_CGCEDI e BD6_CNPJED

CPF_CNPJ

BD5/BE4_CNESED

CNES

BD5/BE4_MUNEDI

cd_MunicipioCont

Não gravado

tp_RedeMin

BD6_TRDAED

tp_Prestador

BD6_RPEDI

id_RecProprio

...

Campo Protheus

Regra 

BD7_NOMPRE

nome

BD7_SIGLA

sg_Conselho

BD7_REGPRE

nr_Conselho

BD7_ESTPRE

UF(de-para BTU tabela 59)

BD6_ESPEDI

CBO

BD7_CODESPCBO(de-para BAQ)

dadosGuia

Campo Protheus

Regra 

Observação

BD5/BE4_TISVER

nr_Ver_TISS


BD5/BE4_TIPCON

tp_Consulta

Somente guias de Consulta
BD5/BE4_INDACI

tp_IndAcidente

Somente guias de Consulta
BD5/BE4_GUIJUR

id_Liminar


BD5/BE4_NUMIMP

nr_GuiaTissPrestador


BD5/BE4_DATPRO / BD5/BE4_HORPRO

dt_Atendimento


BD6_DATPRO / BD6_HORPRO

dt_Atendimento

Somente guias de consulta

BE4_PRVINT

dt_Atendimento

Somente guias de Resumo de Internação

BE4_DATVAL

dt_Atendimento + MV_PLPRZAI

Somente guias de Resumo de Internação

BE4/BD5_SENHAnr_autorização
BE4_GUIINTBE4_CODOPE+BE4_ANOINT+BE4_MESINT+BE4_NUMINTSomente quando encontra a guia de internação através do nr_GuiaTissPrincipal

complemento

Campo Protheus

Regra 

BD5/BE4_INDCLI / BD5/BE4_INDCL2

nm_DescComplemento Tipo 1

BZC_OBSNO1 / BZC_OBSNO2

nm_DescComplemento Tipo 2

BZC_JUSTE1 / BZC_JUSTE2

nm_DescComplemento Tipo 3

BZC_ESMAT1 / BZC_ESMAT2

nm_DescComplemento Tipo 4

...

Tags x Campos  (Nota fiscal do fornecedor)

Campo ProtheusRegra
BD5_GUIPRInr_GuiaTissPrincipal
BD6_NRAOPE/BD5_SENHAnr_Autorizacao
BD6_MATCOBcd_Unimed+id_Benef
BD6_NFnr_NotaFiscalFornecedor
BD5_GUIJUR

id_Liminar

Procedimentos  (Infor_OPME)

Campo ProtheusRegra

BX6_SEQPTU

seq_item

BX6_IDUNIC

id_itemUnico

BD6_CODPAD

tp_Tabela

BD6_CODPRO

cd_Servico

BD6_DES500

ds_Servico

BD6_DATPRO

dt_Execucao

BD5_DATPRO

dt_Execucao

BD6_VALORI

vl_ServCobrado

BD6_VLTXAP

tx_AdmServico

BD6_QTDPRO

qt_Cobrada

BD6_VLRAPR

vl_ServCobrado / qt_Cobrada

Campos herdados da solicitação de autorização/internação

Guia

Solicitação

BD5_

TIPPAC

CDPFSO

BEA_

TIPPAC

BD5_TIPCON

BEA_TIPCON

CDPFSO / BE4_CDPFSO

BD5_

TIPADM

DATSOL

BEA_DATSOL / BE4_

TIPADM

DTDIGI

BD5_

TIPATE

ESTSOL

BEA_ESTSOL / BE4_

TIPATE

ESTSOL

BD5_INDACI

BEA_INDACI / BE4_INDACI

BD5_

NUMIMP

NOMSOL

BEA_

NUMIMP

NOMSOL / BE4_NOMSOL

BD5_

DATSOL

NRAOPE

BEA_NRAOPE / BE4_

DATSOL

NRAOPE

BD5_

OPESOL

NUMIMP

BEA_

OPESOL

NUMIMP / BE4_NUMIMP

BD5_

ESTSOL

OPESOL

BEA_

ESTSOL

OPESOL / BE4_OPESOL

BD5_

SIGLA

REGSOL

BEA_

SIGLA

REGSOL / BE4_REGSOL

BD5_

REGSOL

SIGLA

BEA_SIGLA / BE4_

REGSOL

SIGLA

BD5_

NOMSOL

TIPADM

BEA_TIPADM / BE4_

NOMSOL

TIPADM

BD5_

CDPFSO

TIPATE

BEA_

CDPFSO

TIPATE / '07' - (internação)

BD5_

NRAOPE

TIPCON

BEA_TIPCON / BE4_

NRAOPE

TIPCON

BD5_

SENHA

TIPPAC

BEA_

SENHA

TIPPAC / GetNewPar("MV_PLSTPAA","9")

BD6_

RDAEDI

NOMEDI

BEA_

RDAEDI

NOMEDI / BE4_NOMED

BD6_

NOMEDI

RDAEDI

BEA_RDAEDI / BE4_

NOMEDI

RDAEDI

BD7_

SIGLA

ESTPRE

BEA_ESTEXE / BE4_

SIGEXE

ESTEXE

BD7_NOMPRE

BEA_NOMEXE / BE4_NOMEXE

BD7_

ESTPRE

REGPRE

BEA_REGEXE / BE4_

ESTEXE

BD7_REGPRE

BEA_REGEXE

...

REGEXE

BD7_SIGLA

BEA_SIGEXE / BE4_SIGLA

07. Reembolso

Conforme instituído pela unimed do Brasil, o processo consiste em guias de fatura de uma Unimed Prestadora (onde o usuário foi atendido) para a Unimed Origem (detentora do contrato) ao qual foram pagas despesas pelo beneficiário referente a assistência à saúde (honorários médicos), ou seja, o arquivo PTU A500 Cobrança de Reembolso terá os valores repassados pela Unimed Prestadora para o pagamento futuro da Unimed Origem, desde que reembolso realizado para o beneficiário tenha sido feito pela Prestadora de Serviço.

Tags x Campos  (Reembolso)

Campo ProtheusRegra
BD5_SENHAidReembolso
BD5_DATPROdt_Reembolso
BD5_TIPADMcaraterAtendimento (De-para Tabela 23)

Procedimentos  (Honorários Médicos)

Campo ProtheusRegra

BX6_SEQPTU

seq_item

BX6_IDUNIC

id_itemUnico

BD6_CODPAD

tp_Tabela

BD6_CODPRO

cd_Servico

BD6_DES500

ds_Servico

BD6_DATPRO

dt_Execucao

BD6_VALORI

vl_a_restituir

BD6_QTDPRO

qt_Cobrada

BD6_VLRAPR

vl_a_restituir/ qt_Cobrada

08. PARAMETROS

CONFIGURAÇÃO DE PARÂMETROS

...

Nome:

MV_PLSPTUL

Tipo:Caractere
Cont.Port:0003
Descrição:Parâmetro utilizado para definir o código do local de digitação da guia incluída no PTU A500 
Nome:

MV_081CRI

Tipo:Lógico
Cont.Port:.F. (Default) / .T.Cont.Port:0003
Descrição:Parâmetro utilizado para definir o código do local de digitação da guia incluída no PTU A500 

...

Ignora o valor do campo BR8_RISCO, e se caso ativo realiza a validação das liberações (senha de autorização) de todos procedimentos.



09. PONTOS DE ENTRADA

Ponto de Entrada 

PLS500UNM

Descrição

O Ponto de Entrada (P.E.) PLS500UNM está localizado nos fontes PLSP500X PLSUA500X, ele é acionado uma única vez quando a tela inicial da rotina é aberta. 

Ele permite a manipulação das variáveis que indicam o tipo de unidade (BD7_CODUNM) a serem exportados e importados de acordo com a regra do PTU A500.(vl_ServCobrado, vl_CO_Cobrado ,vl_FilmeCobrado)

Fonte

PLSP500X,PLSUA500X


Parâmetros

O P.E. recebe os seguintes parâmetros:

Parâmetro

Tipo

DefaultDescrição

cServ

Caractere

PPM,HM,HMR,VMT,VMD,REA,VTX,VDI

Unidades de honorário médico

cAux

Caractere

AUX,AUR

Unidades de auxiliar

cAnest

Caractere

PAP,PA,PAR

Unidades de porta anestésico

cCusOpe

Caractere

COR,COP,UCO

Unidades de custo operacional

cFilm

Caractere

FIL

Unidades de filme



Retorno

O P.E. deve retornar uma string, contendo os códigos de unidade.

Parâmetro

Variável

Descrição

Obrigatório

cServ

CaractereUnidades de honorário médicoSim

cAux

CaractereUnidades de auxiliarSim

cAnest

CaractereUnidades de porta anestésicoSim

cCusOpe

CaractereUnidades de custo operacionalSim

cFilm

CaractereUnidades de filmeSim



Exemplo

#INCLUDE "PROTHEUS.CH"


USER FUNCTION PLS500UNM()
local aParam       := paramixb
local cServ          := aParam[1]
local cAux           := aParam[2]
local cAnest        := aParam[3]
local cCusOpe    := aParam[4]
local cFilm          := aParam[5]

cAnest += "XPA"

Return {cServ,cAux,cAnest,cCusOpe,cFilm}         

Nome:

DEPARAIMP

Descrição:

Este Ponto de Entrada permite a manipulação do código de tabela e procedimento a serem importados.

Exemplo:

user function DEPARAIMP()


cCodPad := paramixb[1]
cCodPro := paramixb[2]
cDatPro  := paramixb[3]

cCodRda := paramixb[4]


return {.t.,"22","10101012"}

Função:

dePara

Localização:

Importação PTU A500

Parâmetros:

 conteúdo das tags:  tp_Tabela, cd_Servico, dt_Execucao e BCI_CODRDA

Programa Fonte:

PLSP500X

Retorno:

aRet

aRet[1] - lAchou - Variável lógica, se retornar .T. irá considerar o retorno do PE e não fará o de-para padrão na BTU, se retornar .F. irá realizar o de-para padrão do sistema.

aRet[2]- cCodPad - Código da tabela padrão tiss (00,18,19,20,22 e etc)

aRet[3] - cCodPro - Código de procedimento.

...

10. ALTERAÇÕES DA VERSÃO 2.

...

1

  • O sistema identificará de forma automática qual versão deve validar através da tag nrVerTra_PTU, se quando estiver lendo o arquivo, identificar que o valor da tag esta como "0305" saberá que deve validar nos schemas da versão atual  2.2.0

    IMPORTANTE

  • Para isso será necessário a criação da subpasta  V2_0 2 dentro da pasta de Schemas já existente: Protheus_data\plsptu\schemas ,para armazenar os novos Schemas. 
    Portanto  para funcionamento correto da versão 2.0 2 os novos schemas devem ficar no diretório: Protheus_data\plsptu\schemas\V2_02

...


11. MENU

  • No Configurador (SIGACFG), acesse Ambientes/Cadastro/Menu (CFGX013). Informe a nova opção de menu do SIGAPLS, conforme instruções a seguir:

Menu

Miscelânea

Submenu

Unimed

SubmenuImportação

Nome da Rotina

PTU A500

Programa

PLSP500X

Módulo

Plano de Saúde

...



12. ALTERAÇÕES DICIONÁRIO

  • No Configurador (SIGACFG), acesse Banco de Dados/Dicionário/Bases de Dados, expanda o menu a esquerda, clique em Dicionário de Dados, clique na Lupa(Pesquisar) e procure por BCI clique em Editar, expanda o menu a esquerda, clique em Campos, clique em Incluir, preencha os dados conforme tabela abaixo

    Campo

    Valor

    Campo

    BCI_LOTEDI

    TipoCaracter

    Tamanho

    12

    Contexto

    Real

    Propriedade

    Visualizar

    TítuloSeq.Import.
    DescriçãoSequencia da Importacao
  • É necessário alterar o X2_UNICO da tabela B6L - PTU Online x Pacote, para adicionar os campos B6L_CODPEG + B6L_NUMERO na chave, devendo ficar:

    Tabela B6L - X2_UNICO
    X2_UNICOB6L_FILIAL+B6L_OPEMOV+B6L_ANOAUT+B6L_MESAUT+B6L_NUMAUT+B6L_SEQUEN+B6L_ALIAS+B6L_NRTROL +B6L_CODPEG + B6L_NUMERO
    Nota

    É necessário realizar a alteração do X2_UNICO da tabela BRJ, incluindo o seguinte valor: BRJ_FILIAL+BRJ_CODIGO+BRJ_REGPRI

  • Criação dos campos novos na BX6, referente a reapresentação de itens glosados. 

    Expandir
    titleCampos BX6 - Tabela BX6 - Inf. Adic. Event. Proc. Contas

    Tabela BX6 - Inf. Adic. Event. Proc. Contas    
    SX3 - Informações dos Campos
    CampoDescrição
    CampoBX6_REAPRE
    TipoCaractere
    Tamanho1
    Decimal0
    Formato@!
    TítuloItem reapres
    DescriçãoItem de reapresentação?
    UsadoSim
    ObrigatórioNão
    BrowseSim
    Ordem27
    Opções0=Não;1=Sim
    ContextoReal
    PropriedadeVisualizar

    CampoDescrição
    CampoBX6_DOC1GL
    TipoCaractere
    Tamanho20
    Decimal0
    Formato@!
    TítuloDoc. Glosa 1
    DescriçãoNúm. Doc. 1 glosado AJIUS
    UsadoSim
    ObrigatórioNão
    BrowseSim
    ContextoReal
    PropriedadeVisualizar
    Ordem28

    CampoDescrição
    CampoBX6_DOC2GL
    TipoCaractere
    Tamanho20
    Decimal0
    Formato@!
    TítuloBX6_DOC2GL
    DescriçãoNúm. Doc. 2 glosado AJIUS
    UsadoSim
    ObrigatórioNão
    BrowseSim
    ContextoReal
    PropriedadeVisualizar
    Ordem29

...