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

BDC

DATA

BDC990

Cabeçalho de Cobrança

Encabezamiento de Cobranza

Collection header

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

BDC

01

BDC_FILIAL

C

2

0

Filial

Filial do Sistema

1

033

BDC

02

BDC_CODOPE

C

4

0

Operadora

@!

(lRet := PLSVLDINT(M->BDC_CODOPE), If(lRet, (cCodInt := M->BDC_CODOPE, .T.), .F.))

cCodInt := PLSINTPAD(RETCODUSR())

B89PLS

1

S

BDC

03

BDC_DESOPE

C

40

0

Descricao

Posicione("BA0",1,xFilial("BA0")+M->BDC_CODOPE,"BA0_NOMINT")

1

V

BDC

04

BDC_NUMERO

C

8

0

Numero Seq.

Numero de Sequencia

@!

ExistChav("BDC",M->BDC_CODOPE+M->BDC_NUMERO,1)

"AUTO"

1

S

V

BDC

05

BDC_DATGER

D

8

0

Data Geracao

@D

dDataBase

1

S

V

BDC

06

BDC_USUOPE

C

25

0

Operador

Operador do Sistema

PLRETOPE()

1

S

V

BDC

07

BDC_HORA

C

8

0

Hora Inicial

Hora inicial

@!

Time()

1

S

V

BDC

08

BDC_HORAF

C

8

0

Hora final

@!

Time()

1

S

V

BDC

09

BDC_ANOINI

C

4

0

Ano Inicial

9999

1

S

BDC

10

BDC_MESINI

C

2

0

Mes Inicial

99

Vazio() .or. M->BDC_MESINI >= "01" .And. M->BDC_MESINI <= "12"

1

S

BDC

11

BDC_ANOFIM

C

4

0

Ano Final

9999

Vazio() .or. M->BDC_ANOFIM >= M->BDC_ANOINI

1

S

BDC

12

BDC_MESFIM

C

2

0

Mes Final

99

PLS627VLD()

1

S

BDC

13

BDC_EXPFIF

C

249

0

Filtro Fam.

Filtro Arquivo Familia

@!

Vazio() .or. A627CTERR()

1

IIF(BDC->(FieldPos('BDC_REEMB'))>0,M->BDC_REEMB<>'1',.T.)

BDC

14

BDC_TIPO

C

1

0

Fis/Juridica

Juridica/Fisica ?

@!

"1"

1

S

1=Juridica;2=Fisica

BDC

15

BDC_GRPCOB

C

4

0

Grupo Cobran

Grupo de cobranca

@!

Iif(VAZIO() .OR. BR0->(ExistCpo('BR0',M->BDC_GRPCOB,1)), eval({||M->BDC_GRCOBV:=Space(TamSX3('BDC_GRCOBV')[1]),.T.}), .F.)

BR0PLS

1

S

A

IIF(BDC->(FieldPos('BDC_REEMB'))>0,M->BDC_REEMB<>'1',.T.)

BDC

16

BDC_DESGRP

C

30

0

Descr. Grupo

Descr. Grupo de cobranca

@!

IIF(INCLUI,"",Posicione("BR0",1,xFilial("BR0")+BDC->BDC_GRPCOB,"BR0_DESCRI"))

1

V

BDC

17

BDC_LOTREN

C

12

0

Lote Renovac

Lote de renovacao de cont

@9

Vazio() .or. ExistCpo("BDE", M->(BDC_CODOPE + BDC_LOTREN),1)

BEDPLS

1

IIF(BDC->(FieldPos('BDC_REEMB'))>0,M->BDC_REEMB<>'1',.T.)

BDC

18

BDC_CONGER

N

6

0

Tit. Gerados

Titulos Gerados

999999

1

V

BDC

19

BDC_CONCRI

N

6

0

Tit. Critic.

Titulos Criticados

999999

1

V

BDC

20

BDC_VALOR

N

16

2

Valor Total

@E 9,999,999,999,999.99

1

V

BDC

21

BDC_VENINI

N

2

0

Vencto Ini.

Vencimento Inicial

99

Entre(01,31,M->BDC_VENINI)

1

M->BDC_TIPO=="2"

BDC

22

BDC_DTEMIS

D

8

0

Dt Emissao

Data de emiissão do tit

@D

dDataBase

1

S

R

BDC

23

BDC_VENFIM

N

2

0

Vencto Final

Vencimento Final

99

Entre(01,31,M->BDC_VENFIM)

31

1

M->BDC_TIPO=="2"

BDC

24

BDC_VENCTO

N

2

0

Dia Vencto.

Dia Vencimento

99

Vazio() .Or. Entre(1,Day(LastDay(dDataBase)),M->BDC_VENCTO)

1

BDC

25

BDC_MODPAG

C

1

0

Modal. Cobr.

Modalidade de Pagamento

@!

"3"

1

S

1=Pre-Pagamento;2=Custo Operacional;3=Ambas

IIF(BDC->(FieldPos('BDC_REEMB'))>0,M->BDC_REEMB<>'1',.T.)

BDC

26

BDC_INTERC

C

1

0

Intercambio

@!

"0"

1

S

0=Nao;1=Sim

IIF(BDC->(FieldPos('BDC_REEMB'))>0,M->BDC_REEMB<>'1',.T.)

BDC

27

BDC_AGLUTI

C

1

0

Aglut. Lanc.

Aglutina Lanc. de Fat. ?

@!

"1"

1

0=Nao;1=Sim

IIF(BDC->(FieldPos('BDC_REEMB'))>0,M->BDC_REEMB<>'1',.T.)

BDC

28

BDC_CARIMP

C

1

0

Carne ?

@!

1

0=Nao;1=Sim

IIF(BDC->(FieldPos('BDC_REEMB'))>0,M->BDC_REEMB<>'1',.T.)

BDC

29

BDC_FATGR

C

1

0

FatGr

@!

Iif(FindFunction('PLCOGRID'),PLCOGRID(),'0')

1

1=Sim;0=Não

IIF(BDC->(FieldPos('BDC_REEMB'))>0,M->BDC_REEMB<>'1',.T.)

BDC

30

BDC_GRCOBV

C

50

0

Var. Grp Co

Varios Grp de cobrança

@!

Iif( PLVLDCGR(),Eval({||M->BDC_GRPCOB := Space(TamSX3('BDC_GRPCOB')[1]),M->BDC_DESGRP:=''}) ,NIL)

BGVPLS

1

V

IIF(BDC->(FieldPos('BDC_REEMB'))>0,M->BDC_REEMB<>'1',.T.)

BDC

31

BDC_REEMB

C

1

0

Som. Reemb?

Somente Reembolso

@!

"2"

1

S

A

R

0=Nao;1=Sim;2=Ambos

GETNEWPAR("MV_PLSDTPG",.F.)

BDC

32

BDC_DTPREE

D

8

0

Dt Pag Reemb

Data Pagamento Reembolso

@D

BDC990

1

S

A

R

M->BDC_REEMB=="1"

BDC

33

BDC_CONSAD

C

1

0

Cons.Adicio.

Considera Adicionais

@!

Pertence("01")

1

S

A

0=Nao;1=Sim

BDC

34

BDC_RATIMP

C

1

0

Rat. Imposto

Rateio de Impostos

@!

"0"

1

A

R

0=Não;1=Sim

INDICE	ORDEM	CHAVE	DESCRICAO	DESCSPA	DESCENG	PROPRI	F3	NICKNAME	SHOWPESQ	IX_VIRTUAL	IX_VIRCUST
BDC	1	BDC_FILIAL+BDC_CODOPE+BDC_NUMERO	Operadora + Numero Seq.	Operadora + Num.Secuenc.	Operator + Sequence No.	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
BDC_CODOPE	001	Posicione("BA0",1,xFilial("BA0")+M->BDC_CODOPE,"BA0_NOMINT")	BDC_DESOPE	P	N		0			S
BDC_GRPCOB	001	BR0->BR0_DESCRI	BDC_DESGRP	P	S	BR0	1	XFILIAL("BR0")+M->BDC_GRPCOB		S
BDC_REEMB	001	CTOD(" / / ")	BDC_DTPREE	P	N		0			S