Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS Saúde Planos

Linha de Produto:

Linha Protheus

Segmento:

Saúde

Módulo:

Planos - Linha Protheus - Atendimento

Função:
País:Brasil
Story:DSAUREV-8580


02. SITUAÇÃO/REQUISITO

Necessário implementar campo para preenchimento do Motivos de ausência do código de validação (Tabela 74 da Terminologia TISS) nas rotinas de Atendimento.

03. SOLUÇÃO

Implementada melhoria com a criação de campos para preenchimento do Motivos de ausência do código de validação (Tabela 74 da Terminologia TISS) nas rotinas de Atendimento. Adicionada também os campos de Token e Motivos de ausência do código de validação na integração de guias HAT x PLS.


Foram criados os campos BEA_AUSVLD, BE1_AUSVLD e BE4_AUSVLD. As opções do campo utilizam a tabela 74 da terminologia TISS. A mesma pode ser carregada através dos passos descritos nesse documento: Versões TISS - Automação de virada de versão PLSA447 e PLSA444 - Plano de Saúde - P12


Novo campo Cod.Aus.Vld na rotina de Liberação SADT (PLSA094B).

04. DEMAIS INFORMAÇÕES


Atualização do Arquivo SX3 (Campos): 

  • Tabela BEA:

Campo

Conteúdo

X3_ARQUIVBEA
X3_CAMPOBEA_TOKEDI
X3_TIPOCaracter
X3_TAMANHO10
X3_DECIMAL0
X3_TITULOToken
X3_DESCRIToken Atendimento
X3_PICTURE@!
X3_F3
X3_BROWSENão
X3_VISUALAlterar
X3_CONTEXTReal
X3_WHEN
X3_VALID



Campo

Conteúdo

X3_ARQUIVBEA
X3_CAMPOBEA_AUSVLD
X3_TIPOCaracter
X3_TAMANHO2
X3_DECIMAL0
X3_TITULOCod.Aus.Vld.
X3_DESCRICod Ausencia Validacao
X3_PICTURE@!
X3_F3
X3_BROWSENão
X3_VISUALAlterar
X3_CONTEXTReal
X3_WHEN
X3_VALID


  • Tabela BE4:

Campo

Conteúdo

X3_ARQUIVBE4
X3_CAMPOBE4_TOKEDI
X3_TIPOCaracter
X3_TAMANHO10
X3_DECIMAL0
X3_TITULOToken
X3_DESCRIToken Atendimento
X3_PICTURE@!
X3_F3
X3_BROWSENão
X3_VISUALAlterar
X3_CONTEXTReal
X3_WHENEmpty(M->BE4_AUSVLD)
X3_VALIDIf(Inclui, If(Empty(M->BE4_USUARI),.T.,PLBE4USUAR()),.T.)



Campo

Conteúdo

X3_ARQUIVBE4
X3_CAMPOBE4_AUSVLD
X3_TIPOCaracter
X3_TAMANHO2
X3_DECIMAL0
X3_TITULOCod.Aus.Vld.
X3_DESCRICod Ausencia Validacao
X3_PICTURE@!
X3_F3PLSB4E
X3_BROWSENão
X3_VISUALAlterar
X3_CONTEXTReal
X3_WHENEmpty(M->BE4_TOKEDI)
X3_VALIDPLSA09Aprt(.t.)[2]


  • Tabela BE1:

Campo

Conteúdo

X3_ARQUIVBE1
X3_CAMPOBE1_TOKEDI
X3_TIPOCaracter
X3_TAMANHO10
X3_DECIMAL0
X3_TITULOToken
X3_DESCRIToken Atendimento
X3_PICTURE@!
X3_F3
X3_BROWSENão
X3_VISUALAlterar
X3_CONTEXTVirtual
X3_WHENEmpty(M->BE1_AUSVLD)
X3_VALIDIf(Inclui, If(Empty(M->BE1_USUARI),.T.,PLSA090DAT("2")),.T.)
X3_RELACAOIf(inclui,"",BEA->BEA_TOKEDI)



Campo

Conteúdo

X3_ARQUIVBE1
X3_CAMPOBE1_AUSVLD
X3_TIPOCaracter
X3_TAMANHO2
X3_DECIMAL0
X3_TITULOCod.Aus.Vld.
X3_DESCRICod Ausencia Validacao
X3_PICTURE@!
X3_F3PLSB4E
X3_BROWSENão
X3_VISUALAlterar
X3_CONTEXTVirtual
X3_WHENEmpty(M->BE1_TOKEDI)
X3_VALIDPLSA09Aprt(.t.)[2]
X3_RELACAOIf(inclui,"",BEA->BEA_AUSVLD)


05. ASSUNTOS RELACIONADOS