Árvore de páginas

Versões comparadas

Chave

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

...

Implementada melhoria com a criação do WebService TISS Online tissComunicacaoBeneficiario. O mesmo tem como objetivo indicar a data início e alta de uma internação de um beneficiário.

Ao receber uma transação, o sistema realiza uma Query na tabela de Internação BE4 baseado com o conteúdo <ans:tipoEvento>:

  • tipoEvento com conteúdo I (Internação): a query busca registros na tabela BE4 para o usuário indicado na tag <ans:numeroCarteira> com os campos BE4_DATPROBE4_HORPRO vazios.
  • tipoEvento com conteúdo A (Alta): a query busca registros na tabela BE4 para o usuário indicado na tag <ans:numeroCarteira> com os campos BE4_DTALTA e BE4_HRALTA vazios.

No caso de uma Alta, o sistema também realiza um De-Para códigos TISS Online com a tag </ans:motivoEncerramento> utilizando a tabela de terminologias 39.


Card documentos
InformacaoCaso o sistema encontre mais de uma internação com a ação recebida (internação ou alta), por padrão, a mesma será realizada no registro mais recente. É possível selecionar outro registro com a utilização do novo ponto de entrada PCOMBE01.
TituloIMPORTANTE!

...

Totvs custom tabs box
tabsPasso 01, Passo 02, Passo 03, Passo 04
idspasso1,passo2
Totvs custom tabs box items
defaultyes
referenciapasso1
  • Acesse sua pasta ProtheusData\tiss\schema.
  • Copie os arquivos .XSD e .WSDL relacionados ao TISS Online disponibilizados pela ANS.

Totvs custom tabs box items
defaultno
referenciapasso2

Configure o parâmetro MV_PLLGSN:

ParâmetroMV_PLLGSN
TipoLógico
Conteúdo.T. ou .F.
DescriçãoIndica se os Webservices TISS realiza login baseado no node <ans:loginSenhaPrestador>




04. DEMAIS INFORMAÇÕES


Pontos de entrada:

Ponto de Entrada:PCOMBE01
Programa fonte:PComunBen.prw
Objetivo:Posicionar no registro BE4 que será atualizado ao recebe uma comunicação tissComunicacaoBeneficiario.
Parâmetros:

Nome

Tipo

Descrição

Obrigatório

lRetBooleanLógico indicando se o sistema encontrou um registro BE4Sim
nRecnoIntegerRecno do registro encontradoSim
Retorno

Nome

Tipo

Descrição

Obrigatório

lRetBoolean

Lógico indicando se o sistema encontrou um registro BE4.

Importante: é necessário deixar o registro BE4 desejado posicionado.

Sim


Exemplo:

Bloco de código
titleExemplo PCOMBE01
linenumberstrue
#Include 'Protheus.ch'
 
User Function PCOMBE01()
 
    LOCAL lRet   := paramixb[1]
    LOCAL nRecno := paramixb[2]
   	
	//Regra aplicada pelo cliente
 
Return lREt

...