udesenv

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

BH3

DATA

BH3990

Contrato Parâmetro Reajustes

Contrato Parámetro Reajustes

Adjustment parameter contract

C

E

0

N

33

1

2

0

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

BH3

01

BH3_FILIAL

C

2

0

Filial

1

s

033

BH3

02

BH3_CODINT

C

4

0

Operadora

@R !.!!!

BG9->BG9_CODINT

1

S

V

BH3

03

BH3_CODIGO

C

4

0

Codigo

@!

BG9->BG9_CODIGO

1

S

V

BH3

04

BH3_DESCRI

C

30

0

Grp.Empresa

Grupo Empresa

@!

BG9->BG9_DESCRI

1

S

V

BG9->BG9_DESCRI

BH3

05

BH3_NUMCON

C

12

0

Num.Contrato

Numero do Contrato

@!

BT5->BT5_NUMCON

1

S

V

BH3

06

BH3_VERSAO

C

3

0

Versao

@!

BT5->BT5_VERSAO

1

S

V

BH3

07

BH3_ANO

C

4

0

Ano

@!

1

S

BH3

08

BH3_MES

C

2

0

Mes

@!

1

S

BG9->BG9_TIPO=="2"

BH3

09

BH3_TIPOGR

C

1

0

Tipo Grupo

@!

BG9->BG9_TIPO

1

S

V

1=Pessoa Fisica;2=Pessoa Juridica

BG9->BG9_TIPO

BH3

10

BH3_TIPOIN

C

1

0

Tipo Analise

Tipo de Analise

@!

1

S

1=Considerar Aniversario da Familia;2=Considerar Aniversario do Contrato/Empresa

BH3

11

BH3_INDRSM

C

6

0

Ind.Rea.Sim.

Indice Reajuste Simulacao

@!

Vazio() .Or. ExistCpo("AAD")

AAD

1

S

BH3

12

BH3_REAJSM

N

12

2

Per.Rea.Ind.

Percentual Reajuste Ind.

@E 999,999,999.99

1

S

V

M->BH3_PERRSM==0

BH3

13

BH3_PERRSM

N

12

2

Per.Sim.Fixo

Percentual Reajuste Fixo

@E 999,999,999.99

1

S

EMPTY(M->BH3_REAJSM)

BH3

14

BH3_INDRRL

C

6

0

Ind.Rea.Rea.

Indice Reajuste Real

@!

Vazio() .Or. ExistCpo("AAD")

AAD

1

S

BH3

15

BH3_REAJRL

N

12

2

Per.Rea.Ind.

Percentual Reajuste Ind.

@E 999,999,999.99

If(Inclui,0,PLSBUSIND(BH3->BH3_INDRRL,BH3->BH3_ANO,BH3->BH3_MES))

1

S

V

M->BH3_PERRRL==0

BH3

16

BH3_PERRRL

N

12

2

Per.Rea.Fix.

Percentual Reajuste Fixo

@E 999,999,999.99

1

S

Empty(M->BH3_INDRRL)

BH3

17

BH3_TIPO

C

1

0

Tipo

@!

1

S

1=Incondicional;2=Familias com mais de 12 meses de plano

BH3

18

BH3_PROD

C

1

0

Rea.Produto?

Reajuste Produto?

@!

"1"

1

S

1=Sim;0=Nao

BH3

19

BH3_OPC

C

1

0

Reaj.Opc?

Reajuste Opcional?

@!

"1"

1

S

1=Sim;0=Nao

BH3

20

BH3_DATOPC

C

1

0

Cons.Opc

Considera Opcional pela D

@!

"0"

1

N

A

R

1=Data Opcional;0=Data Plano

BH3

21

BH3_TAX

C

1

0

Reaj.Tx.Ade?

Reajuste Taxa Adesao?

@!

"1"

1

S

1=Sim;0=Nao

BH3

22

BH3_DATAIN

D

8

0

Data Inicio

1

BH3

23

BH3_OBS1

C

250

0

Observação 1

@!

1

S

A

R

BH3

24

BH3_OBS2

C

250

0

Observação 2

@!

1

S

A

R

BH3

25

BH3_OBS3

C

250

0

Observação 3

@!

1

S

A

R

BH3

26

BH3_TIPREA

C

1

0

Reaj/Ajus ?

Reajuste ou Ajuste ?

@!

"1"

1

S

R

1=Reajuste;2=Ajuste

BH3

27

BH3_FRANQ

C

1

0

Reaj.Franq?

Reajusta franquia

@!

"0"

1

N

1=Sim;0=Não

BH3

28

BH3_ZERAIN

C

1

0

Zera Indice

@!

Pertence('SN')

'N'

1

N

A

R

S=Sim;N=Não

BH3

29

BH3_USRBLQ

C

1

0

Usr. Bloq ?

Usuarios bloqueados ?

@!

1

S

A

R

0=Não;1=Sim

BH3

30

BH3_IRCPFX

C

6

0

In.Re.Cop.Fx

Ind. Reaj. Cop. Vlr. Fixo

@!

(Vazio() .Or. ExistCpo("AAD")) .And. eval({|| M->BH3_PICPFX := PLSBUSIND(M->BH3_IRCPFX,M->BH3_ANO,M->BH3_MES), .T.})

AAD

1

S

A

R

BH3

31

BH3_PICPFX

N

12

2

P.In.Cop.Fx.

Perc. Ind. Cop. Vlr. Fixo

@E 999,999,999.99

IF(INCLUI,0,PLSBUSIND(BH3->BH3_IRCPFX,BH3->BH3_ANO,BH3->BH3_MES))

1

S

V

M->BH3_PRCPFX==0

BH3

32

BH3_PRCPFX

N

12

2

Reaj.Cop.Fx.

Per. Reaj. Cop. Vlr. Fixo

@E 999,999,999.99

1

S

A

R

Empty(M->BH3_IRCPFX)

BH3

33

BH3_IRCPPE

C

6

0

In.Re.Cop.Pe

Ind. Reaj. Cop. Per.

@!

(Vazio() .Or. ExistCpo("AAD")) .And. eval({|| M->BH3_PICPPE := PLSBUSIND(M->BH3_IRCPPE,M->BH3_ANO,M->BH3_MES), .T.})

AAD

1

S

A

R

BH3

34

BH3_PICPPE

N

12

2

P.In.Cop.Pe.

Perc. Ind. Cop. Percent.

@E 999,999,999.99

IF(INCLUI,0,PLSBUSIND(BH3->BH3_IRCPPE,BH3->BH3_ANO,BH3->BH3_MES))

1

S

V

M->BH3_PRCPPE==0

BH3

35

BH3_PRCPPE

N

12

2

Reaj.Cop.Pe.

Per. Reaj. Cop. Percent.

@E 999,999,999.99

1

S

A

R

BH3

36

BH3_PERRPC

N

12

2

Percent. RPC

Percent. Considerado RPC

@E 999,999,999.99

1

N

A

R

INDICE	ORDEM	CHAVE	DESCRICAO	DESCSPA	DESCENG	PROPRI	F3	NICKNAME	SHOWPESQ	IX_VIRTUAL	IX_VIRCUST
BH3	1	BH3_FILIAL+BH3_CODINT+BH3_CODIGO+BH3_NUMCON+BH3_VERSAO+BH3_ANO+BH3_MES	Operadora + Codigo + Num.Contrato + Versao + Ano + Mes	Operadora + Codigo + Num.Contrato + Version + Ano + Mes	Operator + Code + Contract Nbr + Version + Year + Month	S			S	2	3
BH3	2	BH3_FILIAL+BH3_CODINT+BH3_CODIGO+BH3_NUMCON+BH3_VERSAO+BH3_ANO+BH3_MES+BH3_TIPREA	Operadora + Codigo + Num.Contrato + Versao + Ano + Mes + Reaj/Ajus ?	Operadora + Codigo + Num.Contrato + Version + Ano + Mes + ¿Reaj/Ajus?	Operator + Code + Contract Nbr + Version + Year + Month + Readj/Adjus?	S			S	2	3

X7_CAMPO	X7_SEQUENC	X7_REGRA	X7_CDOMIN	X7_TIPO	X7_SEEK	X7_ALIAS	X7_ORDEM	X7_CHAVE	X7_CONDIC	X7_PROPRI
BH3_INDRRL	001	PLSBUSIND(M->BH3_INDRRL,M->BH3_ANO,M->BH3_MES)	BH3_REAJRL	P	N		0			S
BH3_INDRRL	002	0	BH3_PERRRL	P	N		0		!Empty(M->BH3_INDRRL)	S