Cabeçalho

Tabela 2410 BS4

Autor: Eurai Criado: 01/03/2025 Atualizado: 01/03/2025 Protheus

Postagem

Salve salve, blz?

Tabela BS4. #BS4

SX2 - TABELA

X2_CHAVE

X2_PATH

X2_ARQUIVO

X2_NOME

X2_NOMESPA

X2_NOMEENG

X2_ROTINA

X2_MODO

X2_MODOUN

X2_MODOEMP

X2_DELET

X2_TTS

X2_UNICO

X2_PYME

X2_MODULO

X2_DISPLAY

X2_SYSOBJ

X2_USROBJ

X2_POSLGT

X2_CLOB

X2_AUTREC

X2_TAMFIL

X2_TAMUN

X2_TAMEMP

X2_STAMP

X2_INSDT

BS4

DATA

BS4990

Preços dos Médicamentos

Precios de los Medicamentos

Medicine prices

SX3 - CAMPOS

X3_ARQUIVO

X3_ORDEM

X3_CAMPO

X3_TIPO

X3_TAMANHO

X3_DECIMAL

X3_TITULO

X3_DESCRIC

X3_PICTURE

X3_VALID

X3_RELACAO

X3_F3

X3_NIVEL

X3_TRIGGER

X3_BROWSE

X3_VISUAL

X3_CONTEXT

X3_OBRIGAT

X3_CBOX

X3_PICTVAR

X3_WHEN

X3_INIBRW

X3_GRPSXG

X3_FOLDER

BS4

BS4_FILIAL

Filial

033

BS4

BS4_CODINT

Operadora

@R !.!!!

cCodInt

BS4

BS4_TABMED

Cd Tab Medic

Cd Tab de Medicamento

cCodTab

BS4

BS4_DESCRI

Descr.Tb Med

Desc Tab de Medicamento

Posicione("BS5",1,xFilial("BS5")+cCodInt+cCodTab,"BS5_DESCRI")

Posicione("BS5",1,xFilial("BS5")+cCodInt+BS4->BS4_TABMED,"BS5_DESCRI")

BS4

BS4_PREMED

Cd.Medicam.

Codigo do Medicamento

PlsZero() .And. PlsSeek("BS3",1,cCodInt+cCodTab+M->BS4_PREMED,"BS4_MEDESC","BS3_MEDESC") .And. PLS075Vld()

BS3PLS

PLS075When()

BS4

BS4_MEDESC

150

Descr.Medic.

Descricao de Medicamento

If(Inclui,"",Posicione("BS3",1,xFilial("BS3")+BS4->(BS4_CODINT+BS4_TABMED+BS4_PREMED),"BS3_MEDESC"))

PLS075When()

Posicione("BS3",1,xFilial("BS3")+cCodInt+cCodTab+BS4->BS4_PREMED,"BS3_MEDESC")

BS4

BS4_SEQAPR

Sq.Apresent.

Sequencial Apresentacao

PLS075When()

BS4

BS4_PREAPR

Cd.Apresent.

Codigo da Apresentacao

PlsZero() .And. PlsSeek("BS1",1,cCodInt+cCodTab+M->BS4_PREAPR,"BS4_APDESC","BS1_APDESC") .And. PLS075Vld()

BS1PLS

PLS075When()

BS4

BS4_APDESC

150

Descr.Apres.

Descricao de Apresentacao

If(Inclui,"",Posicione("BS1",1,xFilial("BS1")+BS4->(BS4_CODINT+BS4_TABMED+BS4_PREAPR),"BS1_APDESC"))

PLS075When()

Posicione("BS1",1,xFilial("BS1")+cCodInt+cCodTab+BS4->BS4_PREAPR,"BS1_APDESC")

BS4

BS4_SEQLAB

Sq.Laborat.

Sequencial de Laboratorio

PLS075When()

BS4

BS4_PRELAB

Cd.Laborat.

Codigo do Laboratorio

PlsZero() .And. PlsSeek("BS2",1,cCodInt+cCodTab+M->BS4_PRELAB,"BS4_LADESC","BS2_LADESC") .And. PLS075Vld()

BS2PLS

PLS075When()

BS4

BS4_LADESC

150

Descr.Labor.

Descricao de Laboratorio

If(Inclui,"",Posicione("BS2",1,xFilial("BS2")+BS4->(BS4_CODINT+BS4_TABMED+BS4_PRELAB),"BS2_LADESC"))

PLS075When()

Posicione("BS2",1,xFilial("BS2")+cCodInt+cCodTab+BS4->BS4_PRELAB,"BS2_LADESC")

BS4

BS4_SEQMED

Seq.Medicam.

Sequencia do Medicamento

PLS036When()

BS4

BS4_VIGDE

Vigencia Ini

Data de Vigencia Inicial

PLS075Vld()

PLS075When()

BS4

BS4_VIGATE

Vigencia Fim

Data de Vigencia Final

BS4

BS4_PREPRE

Preco Medic.

Preco do Medicamento

@E 9,999,999,999.99

PLS075When()

BS4

BS4_PRTIPO

Tipo Preco

Tipo do Preco

PLS075When()

BS4

BS4_CODDOC

Un.Med.Valor

Unidade Medida Valor

ExistCpo("BD3",M->BS4_CODDOC,1)

B87PLS

PLS075When()

BS4

BS4_DESDOC

Desc.Un.Med.

Descricao Unidade Medida

If(Inclui,"",Posicione("BD3",1,xFilial("BD3")+BS4->BS4_CODDOC,"BD3_DESCRI"))

BS4

BS4_PRFLAG

Flag

Flag do Brasindice

PLS075When()

BS4

BS4_PREDIS

Edicao

Numero da Edicao

PLS075When()

BS4

BS4_PRPORT

Controle

Controle do Medicamento

PLS075When()

BS4

BS4_PRGENE

Generico

identifica Generico

PLS075When()

BS4

BS4_RECPD1

Receita L.1

Receita padrao linha 1

PLS075When()

BS4

BS4_RECPD2

Receita L.2

Receita padrao linha 2

PLS075When()

BS4

BS4_RECPD3

Receita L.3

Receita padrao linha 3

PLS075When()

BS4

BS4_PRDATA

Dt. Brasind.

Data do Brasindice

PLS075When()

BS4

BS4_FLAG

Flag Uso

Uso do registro

SIX - INDICES

INDICE	ORDEM	CHAVE	DESCRICAO	DESCSPA	DESCENG	PROPRI	F3	NICKNAME	SHOWPESQ	IX_VIRTUAL	IX_VIRCUST
BS4	1	BS4_FILIAL+BS4_CODINT+BS4_TABMED+BS4_PREMED+BS4_PREAPR+BS4_PRELAB+DTOS(BS4_VIGDE)	Operadora + Cd Tab Medic + Cd.Medicam. + Cd.Apresent. + Cd.Laborat. +	Operadora + Cd Tab Medic + Cd. Medicam. + Cd. Present. + Cd.Laborat. +	Operator + Med.TableCd. + Medic. code + Present.Code + Lab code + Init	S			S	2	3
BS4	2	BS4_FILIAL+BS4_CODINT+BS4_TABMED+BS4_PREMED+BS4_PREAPR+BS4_PRELAB+BS4_SEQMED	Operadora + Cd Tab Medic + Cd.Medicam. + Cd.Apresent. + Cd.Laborat. +	Operadora + Cd Tab Medic + Cd. Medicam. + Cd. Present. + Cd.Laborat. +	Operator + Med.TableCd. + Medic. code + Present.Code + Lab code + Medi	S			S	2	3

SX7 - GATILHOS

X7_CAMPO	X7_SEQUENC	X7_REGRA	X7_CDOMIN	X7_TIPO	X7_SEEK	X7_ALIAS	X7_ORDEM	X7_CHAVE	X7_CONDIC	X7_PROPRI
BS4_CODDOC	001	BD3->BD3_DESCRI	BS4_DESDOC	P	S	BD3	1	xFilial("BD3")+M->BS4_CODDOC		S
BS4_PREAPR	001	PLSBS4Seq()	BS4_SEQMED	P	N		0			S
BS4_PRELAB	001	PLSBS4Seq()	BS4_SEQMED	P	N		0			S
BS4_PREMED	001	PLSBS4Seq()	BS4_SEQMED	P	N		0			S