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

GD6

DATA

GD6990

Despesas Tax e Dia Paciente

Gastos Tasa y Dia. Paciente

Patient Fees and D.Rate Expens

E

0

S

51

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

GD6

01

GD6_FILIAL

C

2

0

Filial

1

N

033

GD6

02

GD6_CODLOC

C

2

0

Setor

@!

HS_VldP12()

cLctCodLoc

GCS

1

S

A

R

GD6

03

GD6_NOMLOC

C

30

0

Descricao

Descricao do setor

@!

HS_INomLoc("GD6")

1

S

V

GD6

04

GD6_DATDES

D

8

0

Data

Data do lancamento

@D

HS_DATPAT(.T.)

1

S

A

R

GD6

05

GD6_HORDES

C

5

0

Hora

Hora do lancamento

99:99

HS_DATPAT(.F.)

1

S

A

R

GD6

06

GD6_QTDDES

N

10

4

Quantidade

Quantidade da taxa/diaria

@E 99,999.9999

HS_VQtdTD(M->GD6_QTDDES)

1

S

A

R

GD6

07

GD6_CODDES

C

10

0

Taxa/Diaria

Codigo da taxa/diaria

@!

HS_VldM24(, 38)

ZRB

1

S

A

R

GD6

08

GD6_DDESPE

C

30

0

Descricao

Descricao do taxa/diaria

@!

IIf(!Inclui, Posicione("GAA", 1, xFilial("GAA") + GD6->GD6_CODDES, "GAA_DESC"), "")

1

S

V

Posicione("GAA",1,xFilial("GAA")+GD6->GD6_CODDES,"GAA_DESC")

GD6

09

GD6_CODCRM

C

7

0

CRM

CRM do medico

@!

HS_VldM24(, 17)

MED

1

S

A

R

GD6

10

GD6_NOMMED

C

30

0

Nome

Nome do medico

@!

HS_INIPADR('SRA',11,GD6->GD6_CODCRM,'RA_NOME')

1

S

V

HS_INIPADR('SRA',11,GE7->GE7_CODCRM,'RA_NOME')

GD6

11

GD6_VALDES

N

10

4

Preco

@E 99,999.9999

HS_CalcDsc()

1

S

V

R

GD6

12

GD6_DESPER

N

5

2

Desc. Percen

Desconto Percentual

@E 99.99

HS_VldM24(, 40)

1

S

A

R

GD6

13

GD6_DESVAL

N

10

2

Desc. Valor

Desconto em Valor

@E 999,999.99

HS_VldM24(, 40)

1

S

A

R

GD6

14

GD6_VALTOT

N

10

2

Valor Total

@E 999,999.99

HS_RTotais('GD6_VALTOT')

1

S

V

GD6

15

GD6_TOTDSC

N

10

2

Total c/ Dsc

Total com Desconto

@E 999,999.99

HS_RTotais('GD6_TOTDSC')

1

S

V

GD6

16

GD6_DESOBS

C

100

0

Obs. Descont

Observacao Desconto

@!

HS_VldM24(, 41)

1

S

A

R

GD6

17

GD6_PCUDES

N

10

4

Preco Custo

Preco custo taxa/diaria

@E 99,999.9999

1

N

V

R

GD6

18

GD6_GLODES

C

1

0

Ind de Glosa

Indicador de glosa

@!

Pertence("012")

1

N

V

R

0=Normal;1=Indevida;2=Excecao

GD6

19

GD6_CODPCT

C

6

0

Proc. Padrao

Codigo Proced. Padrao

@!

HS_VldM24(, 44)

HSP008

1

S

A

R

EMPTY(M->GD6_CODPCT)

GD6

20

GD6_DESPCT

C

30

0

Descricao

Descricao Proced. Padrao

@!

IIf(!Inclui, Posicione("GA1", 1, xFilial("GA1") + GD6->GD6_CODPCT, "GA1_DESC"), "")

1

S

V

Posicione("GA1", 1, xFilial("GA1") + GD6->GD6_CODPCT, "GA1_DESC")

GD6

21

GD6_CODKIT

C

5

0

Cod do Kit

Codigo do Kit

@!

1

S

V

R

GD6

22

GD6_DESKIT

C

30

0

Descricao

Descricao do Kit

@!

IIf(!Inclui, Posicione("GAF", 1, xFilial("GAF") + GD6->GD6_CODKIT, "GAF_DESKIT"), "")

1

S

V

Posicione("GAF", 1, xFilial("GAF") + GD6->GD6_CODKIT, "GAF_DESKIT")

GD6

23

GD6_SEQDES

C

8

0

Seq.Despesa

Sequencia da despesa

@!

1

S

V

R

GD6

24

GD6_NRSEQG

C

6

0

Nro.Seq.Guia

Numero sequencial da guia

@!

1

N

V

R

GD6

25

GD6_PGTMED

C

1

0

Tp Rec Med

Tipo recebimento medico

@!

Pertence('0123') .And. HS_GDAtrib(oGDPR, {{nPRStaReg, 'BR_AMARELO', 'BR_VERDE'}}) .And. HS_CalcDsc()

1

S

A

R

0=Direto;1=Repasse Faturamento;2=Repasse Acatamento;3=Repasse Quitacao

GD6

26

GD6_REPAMB

N

6

2

Repasse(%)

@E 999.99

1

S

V

R

GD6

27

GD6_REPINT

N

7

2

Rep.Int(%)

Rep. Internacao Normal

@E 9999.99

1

S

A

R

GD6

28

GD6_VALREP

N

15

4

Repasse

Valor do repasse medico

@E 9,999,999,999.9999

1

S

A

R

GD6

29

GD6_VALREB

N

15

4

Rep. Bruto

Repasse Bruto

@E 9,999,999,999.9999

1

S

V

R

GD6

30

GD6_CODPRE

C

6

0

Prestador

Codigo do Prestador

1

N

V

R

GD6

31

GD6_NREXTM

C

8

0

Cod. Extrato

Cod. lcto extrato medico

1

N

V

R

GD6

32

GD6_REGATE

C

6

0

Reg. Atendim

Registro de Atendimento

@!

1

N

V

R

GD6

33

GD6_IDMARC

C

2

0

Id. Marca

Identif. Reg. Marcado

1

N

A

R

GD6

34

GD6_FATPAR

C

1

0

Fatura Part.

Fatura como particular

@!

Pertence("01")

"1"

1

S

A

R

0=Nao;1=Sim

GD6

35

GD6_SEQGE6

C

8

0

Seq.Des.Fat.

Seq. despesa faturamento

@!

1

N

V

R

GD6

36

GD6_CODPCO

C

10

0

Cod Pacote

Codigo do Pacote

@!

1

S

V

R

GD6

37

GD6_CODTXC

C

10

0

Tax/Dia Conv

Cod Taxa/Diaria Convenio

@!

1

S

V

R

GD6

38

GD6_DESTXC

C

40

0

Descricao

Descricao do Produto

@!

1

S

V

R

GD6

39

GD6_LOGARQ

C

40

0

Log do Arq

Log do arquivo

HS_LogArq()

1

N

V

R

GD6

40

GD6_TABELA

C

6

0

Tabela Calc.

Código da Tabela Calc.

@!

1

S

A

R

GD6

41

GD6_VLRGLO

N

10

4

Rep. Glosa

Vlr Repasse de Glosa

@E 99,999.9999

0

1

N

A

R

GD6

42

GD6_VLRREC

N

10

4

Rep. Recup.

Vlr Repasse Recuperado

@E 99,999.9999

0

1

N

A

R

GD6

43

GD6_STATUS

C

1

0

Status

@!

Pertence('123')

'1'

1

N

V

R

1=Aberto;2=Associado;3=Encerrado

GD6

44

GD6_DATSTA

D

8

0

Dt Status

Dt atualizacao status

1

N

A

R

GD6

45

GD6_HORSTA

C

5

0

Hr Status

Hr. atualizacao status

99:99

1

N

A

R

INDICE	ORDEM	CHAVE	DESCRICAO	DESCSPA	DESCENG	PROPRI	F3	NICKNAME	SHOWPESQ	IX_VIRTUAL	IX_VIRCUST
GD6	1	GD6_FILIAL+GD6_SEQDES	Seq.Despesa	Sec. Gasto	Expense Seq.	S			S	2	3
GD6	2	GD6_FILIAL+GD6_NRSEQG+DTOS(GD6_DATDES)	Nro.Seq.Guia + Data	Nro.Sec.Form + Fecha	Form Seq.Nbr + Date	S			S	2	3
GD6	3	GD6_FILIAL+GD6_REGATE+GD6_NRSEQG+GD6_CODDES+GD6_SEQGE6	Reg. Atendim + Nro.Seq.Guia + Taxa/Diaria + Seq.Des.Fat.	Reg. Atenc. + Nro.Sec.Form + Tasa/Diaria + Sec.Gas.Fac.	Service rec. + Form Seq.Nbr + Daily / Rate + Bil.Exp.Seq.	S			S	2	3
GD6	4	GD6_FILIAL+DTOS(GD6_DATDES)	Data	Fecha	Date	S			S	2	3
GD6	5	GD6_FILIAL+GD6_NRSEQG+GD6_CODDES+DTOS(GD6_DATDES)	Nro.Seq.Guia + Taxa/Diaria + Data	Nro.Sec.Form + Tasa/Diaria + Fecha	Form Seq.Nbr + Daily / Rate + Date	S			S	2	3