Cabeçalho

Tabela 2410 BGD

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

Postagem

Salve salve, blz?

Tabela BGD. #BGD

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

BGD

DATA

BGD990

Prod x Cob x Proc x Co-Part

Produti/cob/municip./copartic.

Porduct/Coll./City/Co-part

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

BGD

BGD_FILIAL

Filial

033

BGD

BGD_CODIGO

Cod. Plano

Codigo do Plano

BGD

BGD_VERSAO

Versao

Codigo Versao

BGD

BGD_CODMUN

Municipio

cCodMun

BGD

BGD_TIPO

Reg Atendto

Tipo

1=Internacao;2=Ambulatorial;3=Ambos

BGD

BGD_QTD

Qtd. Até

Quantidade

999999

BGD

BGD_PERCOP

% Co-Part.

% Co-Participacao

@E 9,999,999,999,999.99

BGD

BGD_CODTAB

Tab.CoPar.

Cod Tabela Co-Partip.

@R !!!!.!!!

ExistCpo("BF8",M->BGD_CODTAB,1)

B68PLS

BGD

BGD_TXADM

Taxa Admin.

Taxa de Administracao

@E 9,999,999,999,999.99

BGD

BGD_PAGATO

Pagto no Ato

Pagamento Ato do Evento?

"0"

1=Sim;0=Nao

BGD

BGD_VALUS

Valor U.S

Valor da U.S

@E 99,999,999,999.9999

M->BGD_PERCOP>0

BGD

BGD_CODPAD

Cd.Tp.Tabela

Codigo Tipo de Tabela

ExistCpo("BR4",M->BGD_CODPAD,1)

GETMV("MV_PLSTBPD")

B41PLS

BGD

BGD_CODPRO

Cod.Proced.

Codigo do Procedimento

ExistCpo("BR8",M->BGD_CODPAD+M->BGD_CODPRO,1)

BR2PLS

BGD

BGD_DESCRI

Descricao

If(Inclui,"",BR8->(Posicione("BR8",1,xFilial("BR8")+BGD->(BGD_CODPAD+BGD_CODPRO),"BR8_DESCRI")))

BGD

BGD_TIPUSR

Tipo Benef.

Tipo de Beneficiario

If(Empty(M->BGD_TIPUSR),.T.,ExistCpo("BIH",M->BGD_TIPUSR,1))

B47PLS

BGD

BGD_DESTIP

Descricao

If(Inclui .Or. Empty(BGD->BGD_TIPUSR) ,"",Posicione("BIH",1,xFilial("BIH")+BGD->BGD_TIPUSR,"BIH_DESCRI"))

BGD

BGD_GRAUPA

Grau Parent.

Grau Parentesco

IF(Empty(M->BGD_GRAUPA),.T.,ExistCpo("BRP",M->BGD_GRAUPA,1))

B37PLS

BGD

BGD_DESGRA

Descricao

Descricao Grau Parentesco

If(Inclui,"",Posicione("BRP",1,xFilial("BRP")+BGD->BGD_GRAUPA,"BRP_DESCRI"))

BGD

BGD_IDAINI

Idade Minima

999

Positivo() .AND. M->BGD_IDAINI <= M->BGD_IDAFIN

BGD

BGD_IDAFIN

Idade Máxima

999

Positivo() .AND. If(!Empty(M->BGD_IDAINI),M->BGD_IDAFIN >= M->BGD_IDAINI,.T.)

999

BGD

BGD_FAISAL

Fxa Salarial

Codigo da Faixa Salarial

Pertence('12345')

1=Nivel 1;2=Nivel 2;3=Nivel 3;4=Nivel 4;5=Nivel 5

BGD

BGD_RDACRE

Rede Credenc

Rede Credenciada

Pertence("12")

1=Sim;2=Nao

BGD

BGD_RDAPRE

Rede Prefere

Rede Preferencial

Pertence("12")

1=Sim;2=Nao

M->BGD_RDACRE = "1"

BGD

BGD_PERCO2

% Co-Part2

@E 9,999,999,999,999.99

M->BGD_VLRCO2 = 0

BGD

BGD_VALCOP

Vlr.CoPar.

Valor Co-partici.

@E 9,999,999,999,999.99

BGD

BGD_VLRCO2

Vlr.Co-Par2

@E 9,999,999,999,999.99

M->BGD_PERCO2 = 0

BGD

BGD_VLRMIN

Valor Minimo

Valor Minimo Co-Participa

@E 9,999,999,999,999.99

BGD

BGD_ACUMUL

Cons. p/Acum

Considerar para Acumulo

Pertence("12")

1=Inclusao do Contrato;2=Inclusao do Usuario

BGD

BGD_VIGINI

Vig. Inicial

Data de inicio da Vigênci

PlsVldBGD()

BGD

BGD_VIGFIN

Vig. Final

Data Final da Vigência

PlsVldBGD()

BGD

BGD_FINATE

Finalidade

Finalidade Atendimento

Vazio() .or. PlsSeek("BGY",1,M->BI3_CODINT+M->BGD_FINATE,"","")

BGYPLS

BGD

BGD_DESFIN

Ds Finalidad

Desc. Finalidade Atend.

If(Inclui,"",BGY->(Posicione("BGY",1,xFilial("BGY")+BGD->(Left(BGD_CODIGO,4)+BGD_FINATE),"BGY_DESCRI")))

SIX - INDICES

INDICE	ORDEM	CHAVE	DESCRICAO	DESCSPA	DESCENG	PROPRI	F3	NICKNAME	SHOWPESQ	IX_VIRTUAL	IX_VIRCUST
BGD	1	BGD_FILIAL+BGD_CODIGO+BGD_VERSAO+BGD_CODMUN+BGD_CODPAD+BGD_CODPRO	Cod. Plano + Versao + Municipio + Cd.Tp.Tabela + Cod.Proced.	Cod. Plan + Version + Municipio + Cd.Tp.Tabla + Cod.Proced.	Plan Code + Version + City + TableTpCode + Proced. Code	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
BGD_CODPRO	001	BR8->BR8_DESCRI	BGD_DESCRI	P	S	BR8	1	xFilial("BR8")+M->BGD_CODPAD+M->BGD_CODPRO		S
BGD_GRAUPA	001	BRP->BRP_DESCRI	BGD_DESGRA	P	S	BRP	1	xFilial("BRP")+M->BGD_GRAUPA		S
BGD_TIPUSR	001	If(M->BGD_TIPUSR==GETMV("MV_PLCDTIT"),GETMV("MV_PLCDTGP"),"")	BGD_GRAUPA	P	N		0			S
BGD_TIPUSR	002	BRP->BRP_DESCRI	BGD_DESGRA	P	S	BRP	1	xFilial("BRP")+M->BGD_GRAUPA	M->BGD_TIPUSR==GETMV("MV_PLCDTIT")	S
BGD_TIPUSR	003	BIH->BIH_DESCRI	BGD_DESTIP	P	S	BIH	1	xFilial("BIH")+M->BGD_TIPUSR		S