Tabela |
BD5 |
Processamento de Contas |
Campo |
Tipo |
Tamanho |
Decimal |
Titulo |
Formato |
Validacao |
F3 |
Contexto |
Lista |
Condicao |
PYME |
BD5_FILIAL |
C |
2 |
0 |
Filial |
|
|
|
|
|
|
S |
BD5_ERRO |
C |
1 |
0 |
Erro Integr. |
@! |
|
|
|
1=Sim;0=Nao |
|
S |
BD5_CODOPE |
C |
4 |
0 |
Operadora |
@! |
|
|
|
|
|
S |
BD5_TIPPAC |
C |
2 |
0 |
Tp. Paciente |
@C |
BGY->(ExistCpo("BGY",PLSINTPAD()+M->BD5_TIPPAC,1)) |
BGYPLS |
|
|
|
S |
BD5_DESPAC |
C |
30 |
0 |
Descricao |
@C |
|
|
V |
|
|
S |
BD5_CODPAD |
C |
2 |
0 |
Cd.Tp.Tabela |
@! |
ExistCpo("BR4",M->BD5_CODPAD) |
B41PLS |
V |
|
|
S |
BD5_CODPRO |
C |
16 |
0 |
Cod.Proced. |
@! |
(BR8->(ExistCpo("BR8",M->BD5_CODPAD+M->BD5_CODPRO,1)).AND. PlsCkCon(BCI->BCI_TIPGUI,M->BD5_CODPAD,M->BD5_CODPRO)).OR. VAZIO() |
|
V |
|
|
S |
BD5_DESSTA |
C |
15 |
0 |
Situacao |
@! |
|
|
V |
|
|
S |
BD5_DESFAS |
C |
15 |
0 |
Fase |
@! |
|
|
V |
|
|
S |
BD5_CODLDP |
C |
4 |
0 |
Cd.Local Dig |
@! |
|
|
|
|
|
S |
BD5_CODPEG |
C |
8 |
0 |
Codigo PEG |
@! |
|
|
|
|
|
S |
BD5_NUMERO |
C |
8 |
0 |
Numero |
@! |
|
|
|
|
|
S |
BD5_NUMIMP |
C |
20 |
0 |
Nr. Impresso |
@! |
( Vazio() ) .Or. ( plszero() .And. PLSA720IMP() ) |
|
R |
|
|
S |
BD5_DATPRO |
D |
8 |
0 |
Data Evento |
|
dtos(M->BD5_DATPRO) <= dtos(Date()) .and. PLSVLDRDG(M->BD5_CODRDA) |
|
|
|
|
S |
BD5_HORPRO |
C |
6 |
0 |
Hora Evento |
@R !!:!!:!! |
PLSVLDHOR(M->BD5_HORPRO) |
|
|
|
|
S |
BD5_OPEUSR |
C |
4 |
0 |
Oper. Usr. |
@R !.!!! |
PLSVLDINT(M->BD5_OPEUSR) |
B89PLS |
|
|
|
S |
BD5_USUARI |
C |
17 |
0 |
Matricula |
@! |
Vazio() .Or. PLSA090USR(M->BD5_USUARI,M->BD5_DATPRO,M->BD5_HORPRO,"BD5",nil,nil,nil,"2") |
BD5PLS |
V |
|
|
S |
BD5_MATANT |
C |
17 |
0 |
Matr.Antiga |
@! |
|
|
|
|
|
S |
BD5_NOMUSR |
C |
70 |
0 |
Usuario |
@! |
|
|
|
|
|
S |
BD5_CODRDA |
C |
6 |
0 |
Cd.Cred/Coop |
@! |
PlAtuRda() |
BASPLS |
|
|
|
S |
BD5_OPERDA |
C |
4 |
0 |
Oper. RDA |
@R !.!!! |
PSVLDINT(M->BD5_OPERDA) |
B89PLS |
|
|
|
S |
BD5_LOCATE |
C |
6 |
0 |
Local |
@R !!!.!!! |
PLSVLLCBD5() |
BT6PLS |
V |
|
|
S |
BD5_TIPRDA |
C |
1 |
0 |
Tp. RDA |
@! |
|
|
|
F=Pessoa Fisica;J=Pessoa Juridica |
|
S |
BD5_NOMRDA |
C |
40 |
0 |
Nm.Cred/Coop |
@! |
|
|
|
|
|
S |
BD5_DESLOC |
C |
40 |
0 |
Desc. Local |
@! |
|
|
|
|
|
S |
BD5_ENDLOC |
C |
100 |
0 |
End. Local |
@! |
|
|
|
|
|
S |
BD5_CODESP |
C |
3 |
0 |
Cd. Espec. |
@! |
PLSVLESBD5() |
BBGPLS |
|
|
|
S |
BD5_DESESP |
C |
40 |
0 |
Desc. Espec. |
@! |
|
|
V |
|
|
S |
BD5_SUBESP |
C |
3 |
0 |
Sub-Espec. |
@! |
ExistCpo("BFN",M->BD5_OPERDA+M->BD5_CODESP+M->BD5_SUBESP,1) |
BFEPLS |
|
|
|
S |
BD5_DESSUB |
C |
30 |
0 |
Desc.Sub-Esp |
@! |
|
|
V |
|
|
S |
BD5_CID |
C |
8 |
0 |
CID |
@! |
Vazio() .Or. BA9->(ExistCpo("BA9",M->BD5_CID,1)) |
BA9PLS |
|
|
|
S |
BD5_DESCID |
C |
50 |
0 |
Desc. CID |
@! |
|
|
V |
|
|
S |
BD5_ESTSOL |
C |
2 |
0 |
UF Solic. |
@! |
ExistCpo("SX5","12"+M->BD5_ESTSOL,1) |
12 |
|
|
|
S |
BD5_CIDSEC |
C |
8 |
0 |
CID Secund. |
@! |
BA9->(ExistCpo("BA9",M->BD5_CIDSEC,1)) .And. M->BD5_CID <> M->BD5_CIDSEC |
BA9PLS |
|
|
|
S |
BD5_OPESOL |
C |
4 |
0 |
Oper. Sol. |
@R !.!!! |
BA0->(ExistCpo("BA0",M->BD5_OPESOL,1)) |
B89PLS |
|
|
|
S |
BD5_SIGLA |
C |
7 |
0 |
Sigla C.R. |
@! |
If(Empty(M->BD5_SIGLA),.T.,ExistCpo("BAH",M->BD5_SIGLA)) |
B53PLS |
|
|
|
S |
BD5_DSCDSC |
C |
40 |
0 |
Desc.Cid Sec |
@! |
|
|
V |
|
|
S |
BD5_REGSOL |
C |
15 |
0 |
C.R. Solic. |
@R !!!!!!!!!!!!!!! |
If(M->BD5_OPESOL==PLSINTPAD(),(BB0->(PLVLDPFS("BB0",M->BD5_ESTSOL+M->BD5_REGSOL+M->BD5_SIGLA,4,M->BD5_DATPRO))),.T.) |
BTYPLS |
|
|
|
S |
BD5_NOMSOL |
C |
30 |
0 |
Solicitante |
@! |
|
|
|
|
|
S |
BD5_GRAPAR |
C |
2 |
0 |
Grau Partic. |
@! |
VAZIO() .OR. BWT->(EXISTCPO("BWT", PLSINTPAD()+M->BD5_GRAPAR,1)) |
B5DPLS |
R |
|
M->BD5_TIPGUI == '06' |
N |
BD5_TIPCON |
C |
1 |
0 |
Tp. Consulta |
@! |
|
|
|
1=Primeira;2=Seguimento;3=Pre-Natal;4=Por Encaminhamento;5=Retorno |
|
S |
BD5_TIPGUI |
C |
2 |
0 |
Tp. Guia |
@! |
|
|
|
|
|
S |
BD5_ATEAMB |
C |
1 |
0 |
Atdo.Amb.? |
@! |
|
|
|
1=Sim;0=Nao |
|
S |
BD5_CDPFSO |
C |
6 |
0 |
Cd.Prf.Solic |
@! |
|
|
|
|
M->BD5_TIPRDA="J" |
S |
BD5_CODEMP |
C |
4 |
0 |
Grp/Empresa |
@! |
|
|
|
|
|
S |
BD5_MATRIC |
C |
6 |
0 |
Matricula |
@! |
|
|
|
|
|
S |
BD5_TIPREG |
C |
2 |
0 |
Tp. Reg. |
@! |
|
|
|
|
|
S |
BD5_CPFUSR |
C |
11 |
0 |
CPF Usuario |
@! |
|
|
|
|
|
S |
BD5_IDUSR |
C |
11 |
0 |
Iden.Usuario |
@! |
|
|
|
|
|
S |
BD5_DATNAS |
D |
8 |
0 |
Dt.Nasc.Usr. |
@D |
|
|
|
|
|
S |
BD5_CPFRDA |
C |
14 |
0 |
CPF RDA |
@! |
|
|
|
|
|
S |
BD5_VALOR |
N |
16 |
2 |
Vlr.Compra |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_VLRBPR |
N |
16 |
2 |
Vlr.Contr. |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_VLRMAN |
N |
16 |
2 |
Vlr.Bs.Pagto |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_VLRGLO |
N |
16 |
2 |
Vlr.Glosas |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_VLRPAG |
N |
16 |
2 |
Vlr.Pagto |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_VLRBPF |
N |
16 |
2 |
Vlr.Base PF |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_VLRPF |
N |
16 |
2 |
Vlr.Co-Par |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_SEQPF |
C |
6 |
0 |
Sequencia |
@! |
|
|
|
|
|
S |
BD5_FASE |
C |
1 |
0 |
Fase |
@! |
|
|
|
1=Digitacao;2=Conferencia;3=Pronta;4=Faturada;5=Processando |
|
S |
BD5_SITUAC |
C |
1 |
0 |
Situacao |
@! |
|
|
|
1=Ativa;2=Cancelada;3=Bloqueada |
|
S |
BD5_NUMATE |
C |
12 |
0 |
Nr.Atendto |
@! |
|
|
|
|
|
S |
BD5_DIGITO |
C |
1 |
0 |
Digito |
@! |
|
|
|
|
|
S |
BD5_CONEMP |
C |
12 |
0 |
Cont Empresa |
@! |
|
|
|
|
|
S |
BD5_VERCON |
C |
3 |
0 |
Versao Emp. |
@! |
|
|
|
|
|
S |
BD5_SUBCON |
C |
9 |
0 |
Subcontrato |
@! |
|
|
|
|
|
S |
BD5_VERSUB |
C |
3 |
0 |
Versao Subc. |
@! |
|
|
|
|
|
S |
BD5_LOCAL |
C |
3 |
0 |
Localidade |
@! |
|
|
|
|
|
S |
BD5_CODLOC |
C |
3 |
0 |
Cd.Local |
@! |
|
|
|
|
|
S |
BD5_MATVID |
C |
8 |
0 |
Matr.Vida |
@! |
|
|
|
|
|
S |
BD5_DTDIGI |
D |
8 |
0 |
Dt.Digitacao |
@D |
|
|
|
|
|
S |
BD5_MATUSA |
C |
1 |
0 |
Matr.Usada |
@! |
|
|
|
1=Matricula Principal;2=Matricula Antiga |
|
S |
BD5_QTDEVE |
N |
6 |
0 |
Qtd Eventos |
999999 |
|
|
|
|
|
S |
BD5_ATERNA |
C |
1 |
0 |
Atdo.Rec.Na? |
@! |
|
|
|
1=Sim;0=Nao |
|
S |
BD5_GUIORI |
C |
32 |
0 |
Guia Orig. |
@R !!!!.!!!!.!!!!!!!!.!!!!!!!! |
|
|
|
|
|
S |
BD5_PACOTE |
C |
1 |
0 |
Pacote? |
@! |
|
|
|
1=Sim;0=Nao |
|
S |
BD5_VLRPAC |
N |
16 |
2 |
Vlr.Pacote |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_SENHA |
C |
20 |
0 |
Senha |
@! |
|
|
R |
|
|
S |
BD5_CID3 |
C |
8 |
0 |
CID 3 |
@! |
BA9->(ExistCpo("BA9",M->BD5_CID3,1)) |
BA9PLS |
|
|
|
S |
BD5_DESCI3 |
C |
50 |
0 |
Desc. CID 3 |
@! |
|
|
V |
|
|
S |
BD5_CID4 |
C |
8 |
0 |
CID 4 |
@! |
BA9->(ExistCpo("BA9",M->BD5_CID4,1)) |
BA9PLS |
|
|
|
S |
BD5_DESCI4 |
C |
50 |
0 |
Desc. CID 4 |
@! |
|
|
V |
|
|
S |
BD5_CID5 |
C |
8 |
0 |
CID 5 |
@! |
BA9->(ExistCpo("BA9",M->BD5_CID5,1)) |
BA9PLS |
|
|
|
S |
BD5_DESCI5 |
C |
50 |
0 |
Desc. CID 5 |
@! |
|
|
V |
|
|
S |
BD5_REGEXE |
C |
15 |
0 |
C.R. Execut. |
@R !!!!!!!!!!!!!!! |
Vazio() .Or. BB0->(PLVLDPFS("BB0",M->BD5_ESTEXE+M->BD5_REGEXE+M->BD5_SIGEXE,4,M->BD5_DATPRO)) |
BTYPLS |
|
|
|
S |
BD5_OPEEXE |
C |
4 |
0 |
Oper. Exe. |
@R !.!!! |
|
|
|
|
|
S |
BD5_NOMEXE |
C |
30 |
0 |
Executante |
@! |
|
|
V |
|
|
S |
BD5_CDPFRE |
C |
6 |
0 |
Cd.Prf.Resp. |
@! |
|
|
|
|
|
S |
BD5_ESTEXE |
C |
2 |
0 |
UF Execut. |
@! |
SX5->(ExistCpo("SX5","12"+M->BD5_ESTEXE,1)) |
12 |
|
|
|
S |
BD5_SIGEXE |
C |
7 |
0 |
Sigla Exec. |
@! |
If(Empty(M->BD5_SIGEXE),.T.,ExistCpo("BAH",M->BD5_SIGEXE)) |
B53PLS |
R |
|
|
S |
BD5_ORIMOV |
C |
1 |
0 |
Origem Movto |
@! |
|
|
|
1=Guias de Consultas/Servicos;2=Guia de Internacao;3=Outros;5=Dig. Off-Line;6=Novo Autorizador |
|
S |
BD5_VLRTAD |
N |
16 |
2 |
Vlr.Taxa.Adm |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_VLRTPF |
N |
16 |
2 |
Vlr.Total PF |
@E 9,999,999,999,999.99 |
|
|
|
|
|
S |
BD5_MESPAG |
C |
2 |
0 |
Mes Pagto |
@! |
|
|
|
|
|
S |
BD5_ANOPAG |
C |
4 |
0 |
Ano Pagto |
@! |
|
|
|
|
|
S |
BD5_OPELOT |
C |
4 |
0 |
Oper. Lt. |
@R !.!!! |
|
|
|
|
|
S |
BD5_NUMLOT |
C |
10 |
0 |
Lote Pagto |
@! |
|
|
|
|
|
S |
BD5_GUIACO |
C |
1 |
0 |
Guia Comp. |
@! |
|
|
|
1=Sim;0=Nao |
|
S |
BD5_QUACOB |
C |
1 |
0 |
Quando Cobr. |
@! |
|
|
|
1=No Ato;2=Na Fatura |
|
S |
BD5_CODCLI |
C |
6 |
0 |
Cd.Cliente |
@! |
|
|
|
|
|
S |
BD5_LOJA |
C |
2 |
0 |
Loja |
@! |
|
|
|
|
|
S |
BD5_LIBERA |
C |
1 |
0 |
Liberacao? |
@! |
|
|
|
1=Sim;0=Nao |
|
S |
BD5_PAGATO |
C |
1 |
0 |
Pagto Ato? |
@! |
|
|
|
|
|
S |
BD5_CC |
C |
9 |
0 |
Centro Custo |
@! |
|
|
|
|
|
S |
BD5_TIPPRE |
C |
3 |
0 |
Tp. RDA |
@! |
|
B42PLS |
|
|
|
S |
BD5_RGIMP |
C |
1 |
0 |
Reg. Imp.? |
@! |
|
|
|
1=Sim;0=Nao |
|
S |
BD5_NRAEMP |
C |
20 |
0 |
Nr.Aut.Empr. |
@! |
|
|
|
|
|
S |
BD5_NRAOPE |
C |
20 |
0 |
Nr.Aut.Oper. |
@! |
|
|
|
|
|
|
BD5_CODPLA |
C |
4 |
0 |
Cd.Produto |
@! |
|
|
V |
|
|
S |
BD5_DESPLA |
C |
40 |
0 |
Desc.Produto |
@! |
|
|
V |
|
|
S |
BD5_LOCREQ |
C |
1 |
0 |
Loc.Requisic |
@! |
|
|
R |
1=Consultorio;2=Pronto Atendimento;3=Hospital;4=Medicina do Trabalho;5=Medico/Desntista Na Empresa;6=Transcricao |
|
S |
BD5_TPGRV |
C |
1 |
0 |
Tp. Gravacao |
@! |
|
|
|
1=Remote Protheus;2=Internet(RPC);3=POS;4=Importacao Manual |
|
S |
BD5_PODRFS |
C |
1 |
0 |
Pode Rt.Fase |
@! |
|
|
|
1=Sim;0=Nao |
|
S |
BD5_MOTBLO |
C |
3 |
0 |
Mot.Bloq. |
@! |
|
|
|
|
|
S |
BD5_DESBLO |
C |
30 |
0 |
Desc.Bloquei |
@! |
|
|
V |
|
|
S |
BD5_SEQIMP |
C |
8 |
0 |
Seq.Import. |
@! |
BRJ->(ExistCpo("BRJ")) |
BRJPLS |
|
|
|
S |
BD5_OPEFAT |
C |
4 |
0 |
Oper. Fat. |
@! |
|
|
|
|
|
S |
BD5_NUMFAT |
C |
12 |
0 |
Nr. Fatura |
@! |
|
|
|
|
|
S |
BD5_STAFAT |
C |
1 |
0 |
Status Fat. |
@! |
|
|
|
1=Aberto;0=Faturado |
|
S |
BD5_INTFAT |
C |
1 |
0 |
Interc. Fat. |
@! |
|
|
|
0=Nao;1=Sim |
|
S |
BD5_SOLORI |
C |
19 |
0 |
Cd.Sol.Orig |
@! |
|
|
|
|
|
S |
BD5_NUMFIN |
C |
11 |
0 |
Nm.Fat.Int. |
@! |
|
|
|
|
|
S |
BD5_BLOPAG |
C |
1 |
0 |
Bloq.Pagto? |
@! |
PLSA720B2() |
|
|
1=Sim;0=Nao |
|
S |
BD5_MOTBPG |
C |
4 |
0 |
Mot.Bloq. Pg |
@! |
PlvldMoG() |
BCTPLS |
R |
|
M->BD5_BLOPAG == "1" |
S |
BD5_DESBPG |
C |
120 |
0 |
Desc.Bloq.PG |
@C |
PLSA720B2() |
|
|
|
M->BD5_BLOPAG == "1" |
S |
BD5_NUMSE1 |
C |
13 |
0 |
Nr.Fat.Cob. |
@! |
|
|
R |
|
|
S |
BD5_REGATE |
C |
1 |
0 |
Reg. Atend. |
@! |
|
|
R |
1=Internacao; 2=Ambulatorial |
|
S |
BD5_GUIINT |
C |
24 |
0 |
Guia Interna |
@R !!!!.!!!!.!!!!!!!!.!!!!!!!! |
Vazio() .OR. PLS498vls(M->BD5_GUIINT) |
BGCPLS |
R |
|
|
S |
BD5_REGFOR |
C |
1 |
0 |
Reg.Ate.For. |
@! |
|
|
R |
1=Internacao; 2=Ambulatorial |
|
S |
BD5_RDAEDI |
C |
8 |
0 |
RDA EDI |
@! |
|
BAUPLS |
R |
|
|
S |
BD5_NOMEDI |
C |
40 |
0 |
Nome EDI |
@! |
|
|
R |
|
|
S |
BD5_GUESTO |
C |
27 |
0 |
Guia Estor. |
@! |
|
|
R |
|
|
N |
BD5_ESTORI |
C |
1 |
0 |
Ori.Estor. |
@! |
|
|
R |
1=Sim;0=Nao |
|
N |
BD5_SEQEST |
C |
8 |
0 |
Seq. Estor. |
@! |
|
|
R |
|
|
N |
BD5_DPTETA |
D |
8 |
0 |
Data Termino |
@! |
|
|
R |
|
|
N |
BD5_SCDPER |
C |
1 |
0 |
Sinais Perio |
@! |
|
|
R |
0=Nao;1=Sim |
|
N |
BD5_ALTMOL |
C |
1 |
0 |
Alter Tecido |
@! |
|
|
R |
0=Nao,1=Sim |
|
N |
BD5_PREFIX |
C |
3 |
0 |
Prefixo |
@! |
|
|
R |
|
|
N |
BD5_NUMTIT |
C |
9 |
0 |
Numero |
@! |
|
|
R |
|
|
N |
BD5_PARCEL |
C |
2 |
0 |
Parcela |
@! |
|
|
R |
|
|
N |
BD5_TIPTIT |
C |
3 |
0 |
Tipo Titulo |
@! |
|
|
R |
|
|
N |
BD5_TIPATO |
C |
1 |
0 |
Tipo Atend |
@! |
|
|
R |
1=Tratamento Odontologico;2=Exame Radiologico;3=Ortodontia;4=Urgencia/ Emergencia;5=Auditoria |
|
N |
BD5_TIPFAT |
C |
1 |
0 |
Tp Faturamen |
@! |
Pertence("1234TP") |
B1HPLS |
R |
1=Parcial;2=Final;3=Complementar;4=Total;T=Total;P=Parcial |
|
N |
BD5_RDACON |
C |
6 |
0 |
Cd.Sol.Cont. |
@! |
PlValRDA('BD5') |
B1HPLS |
R |
|
|
N |
BD5_DRDACO |
C |
40 |
0 |
Ds.Sol.Cont. |
@! |
|
|
R |
|
|
N |
BD5_GUIPRI |
C |
18 |
0 |
Nr Guia Prin |
@! |
|
|
R |
|
|
N |
BD5_TIPDOE |
C |
1 |
0 |
Tipo Doenca |
@! |
|
|
R |
A=Aguda;C=Cronica |
|
N |
BD5_TPODOE |
N |
2 |
0 |
Tempo Doenca |
99 |
|
|
R |
|
|
N |
BD5_UTPDOE |
C |
1 |
0 |
Unid Tpo Doe |
@! |
|
|
R |
A=Anos;M=Meses;D=Dias |
|
N |
BD5_INDACI |
C |
1 |
0 |
Indic Aciden |
@! |
|
|
R |
0=Trabalho;1=Transito;2=Outros;9=Nao Acidente |
|
N |
BD5_TIPSAI |
C |
1 |
0 |
Tipo Saida |
@! |
|
|
R |
1=Retorno;2=Retorno com SADT;3=Referencia;4=Internacao;5=Alta;6=Obito |
|
N |
BD5_VALSEN |
D |
8 |
0 |
Valid Senha |
@D |
|
|
R |
|
|
N |
BD5_DATSOL |
D |
8 |
0 |
Data Solicit |
@D |
|
|
R |
|
|
N |
BD5_HORSOL |
C |
4 |
0 |
Hora Solicit |
@R !!:!! |
PLSVLDHOR(M->BD5_HORSOL) |
|
R |
|
|
N |
BD5_INDCLI |
C |
250 |
0 |
Indic Clinic |
@S70 |
|
|
R |
|
|
N |
BD5_INDCL2 |
C |
250 |
0 |
Cont. IndCli |
@S70 |
|
|
R |
|
|
N |
BD5_LOTGUI |
C |
12 |
0 |
Lot Guia |
@! |
|
|
R |
|
|
S |
BD5_TIPATE |
C |
2 |
0 |
Tipo Atendim |
@! |
M->BD5_TIPATE $ "01,02,03,04,05,06,07,08,09,10,11,12,13,14,15,16,17,18,19,20,21" |
|
R |
#PLTpAteBox() |
|
N |
BD5_STALIB |
C |
1 |
0 |
Status Lib. |
@C |
|
|
R |
1=Em Aberto;2=Fechada |
|
N |
BD5_NRLBOR |
C |
18 |
0 |
N.Solicita. |
@! |
iIf( empty(M->BD5_NRLBOR),.t.,PLSVLIB(M->BD5_NRLBOR,M->BD5_DATPRO)) |
BD5BEA |
R |
|
INCLUI .AND. BCI->BCI_TIPGUI$'01|02' |
N |
BD5_DTRECE |
D |
8 |
0 |
Dt.Recepcao |
@D |
|
|
R |
|
|
N |
BD5_DTDIG1 |
D |
8 |
0 |
nao usado |
|
|
|
V |
|
|
N |
BD5_DTANAL |
D |
8 |
0 |
Dt.Analise |
@D |
|
|
R |
|
|
N |
BD5_DTPAGT |
D |
8 |
0 |
Dt.Pagto |
@D |
|
|
R |
|
|
N |
BD5_GESTAN |
C |
1 |
0 |
Gestante? |
@! |
|
|
R |
0=Nao;1=Sim |
|
N |
BD5_SEQNFS |
C |
10 |
0 |
Numero NFSS |
@! |
|
BBZPLS |
|
|
|
S |
BD5_PARCOP |
C |
1 |
0 |
Parc.Co-Part |
@! |
|
|
R |
0=Nao;1=Sim |
|
N |
BD5_NPARCE |
N |
2 |
0 |
Num. Parcela |
99 |
PLSVLDPARC(M->BD5_NPARCE) |
|
R |
|
|
N |
BD5_LANCF |
C |
3 |
0 |
Lancam. Fat. |
@! |
|
|
R |
|
|
N |
BD5_OKMARK |
C |
4 |
0 |
Mark |
@! |
|
|
R |
|
|
S |
BD5_LOTPAR |
C |
8 |
0 |
Lote Parc. |
@! |
|
|
R |
|
|
S |
BD5_TIPMAJ |
C |
1 |
0 |
Tipo Maj. |
@! |
|
|
R |
1=Fisica;2=Juridica;3=Cooperativa |
|
N |
BD5_REGINT |
C |
1 |
0 |
Regime Inter |
@! |
Pertence('123') |
|
R |
1=Hospitalar;2=Hospital-Dia;3=Domiciliar |
|
S |
BD5_GRPINT |
C |
1 |
0 |
Grp.Intern. |
@! |
|
|
R |
1=Clinica;2=Cirurgica;3=Obstetrica;4=Pediatrica;5=Psiquiatrica |
|
S |
BD5_TIPINT |
C |
2 |
0 |
Tipo Intern. |
@! |
(!EMPTY(M->BD5_GRPINT) .And. ExistCpo('BQR', M->BD5_GRPINT+M->BD5_TIPINT) .OR. EMPTY(M->BD5_GRPINT)) |
BBSPLS |
R |
|
|
S |
BD5_DESTIP |
C |
50 |
0 |
Dsc.Tp.Inter |
@! |
If(Inclui,'',Posicione('BQR',1,xFilial('BQR')+BD5->(BD5_GRPINT+BD5_TIPINT),'BQR_DESTIP')) |
|
V |
|
|
S |
BD5_PADINT |
C |
2 |
0 |
Tipo Acomod. |
@! |
BI4->(ExistCpo('BI4',M->BD5_PADINT,1)) .OR. Empty(M->BD5_PADINT) |
BI4PLS |
R |
|
|
S |
BD5_DESPAD |
C |
40 |
0 |
Ds Acomod. |
@! |
If(Inclui,'',BI4->(Posicione('BI4',1,xFilial('BI4')+BD5->BD5_PADINT,'BI4_DESCRI'))) |
|
V |
|
|
S |
BD5_PADCON |
C |
6 |
0 |
Pd. conforto |
@! |
Vazio() .Or. ExistCpo('BN5',M->BD5_OPEUSR+M->BD5_PADCON,1) |
BBUPLS |
R |
|
|
S |
BD5_CBOS |
C |
8 |
0 |
CBOS |
@! |
ExistChav("BAQ",xFilial("BAQ")+M->BD5_CBOS,6) |
BD5CBO |
R |
|
|
S |
BD5_TIPADM |
C |
6 |
0 |
Tp. Admissao |
@! |
BDR->(ExistCpo("BDR",PLSINTPAD()+M->BD5_TIPADM,1)) |
BTAPLS |
R |
|
|
S |
BD5_DESADM |
C |
30 |
0 |
Descricao |
@C |
|
|
V |
|
|
S |
BD5_GUIJUR |
C |
1 |
0 |
Guia Jurid ? |
|
|
|
R |
0=Nao;1=Sim |
|
S |
BD5_NUMPRO |
C |
20 |
0 |
Num Processo |
|
|
|
R |
|
|
S |
BD5_ANOAUT |
C |
4 |
0 |
Ano Autoriz. |
@! |
|
|
R |
|
|
S |
BD5_MESAUT |
C |
2 |
0 |
Mes Autoriz. |
@! |
|
|
R |
|
|
S |
BD5_NUMAUT |
C |
8 |
0 |
Num Autoriz. |
@! |
|
|
R |
|
|
S |
BD5_LOTEDI |
C |
8 |
0 |
Lote EDI |
@! |
|
|
R |
|
|
S |
BD5_CNES |
C |
7 |
0 |
CNES |
@! |
|
|
|
|
|
S |
BD5_OPEMOV |
C |
4 |
0 |
Oper. Movto. |
@! |
|
|
R |
|
|
S |
BD5_CODGLO |
C |
3 |
0 |
Cod Glosa |
@! |
|
|
R |
|
|
S |
BD5_ESPEXE |
C |
3 |
0 |
Espec.Exe. |
@! |
Vazio() .or. ExistCpo("BQ1",M->BD5_CDPFRE+M->BD5_ESPEXE) |
BQ1PL1 |
R |
|
|
S |
BD5_SITRG |
C |
1 |
0 |
Sit. Rec. Gl |
@! |
|
|
R |
0=Sem rec de glosa;1=Rec Glosa Protocolado;2=Rec Glosa Em Analise;3=Rec Glosa Autorizado;4=Rec Glosa Negado;5=Aut. Parc |
|
S |
BD5_ESPSOL |
C |
3 |
0 |
Espec.Sol. |
@! |
Vazio() .or. ExistCpo("BQ1",M->BD5_CDPFSO+M->BD5_ESPSOL) |
BQ1PL1 |
R |
|
|
S |
BD5_NUMNDC |
C |
9 |
0 |
Titulo |
@! |
|
|
R |
|
|
S |
BD5_PARNDC |
C |
2 |
0 |
Parcela |
@! |
|
|
R |
|
|
S |
BD5_PRENDC |
C |
3 |
0 |
Prefixo |
@! |
|
|
R |
|
|
S |
BD5_TIPNDC |
C |
3 |
0 |
Tipo titulo |
@! |
|
|
R |
|
|
S |
BD5_MATXML |
C |
17 |
0 |
Matric. XML |
@! |
|
|
|
|
|
S |
BD5_DTRLZ |
D |
8 |
0 |
Data Rlz. |
|
|
|
R |
|
|
S |
BD5_LA |
C |
1 |
0 |
nao usado |
@! |
|
|
R |
|
|
S |
BD5_DTRLZ2 |
D |
8 |
0 |
Data Rlz. 2 |
|
|
|
R |
|
|
S |
BD5_DTRLZ3 |
D |
8 |
0 |
Data Rlz. 3 |
|
|
|
R |
|
|
S |
BD5_DTRLZ4 |
D |
8 |
0 |
Data Rlz. 4 |
|
|
|
R |
|
|
S |
BD5_DTRLZ5 |
D |
8 |
0 |
Data Rlz. 5 |
|
|
|
R |
|
|
S |
BD5_DTRLZ6 |
D |
8 |
0 |
Data Rlz. 6 |
|
|
|
|
|
|
S |
BD5_DTRLZ7 |
D |
8 |
0 |
Data Rlz. 7 |
|
|
|
R |
|
|
S |
BD5_DTRLZ8 |
D |
8 |
0 |
Data Rlz. 8 |
|
|
|
R |
|
|
S |
BD5_LOTMOP |
C |
18 |
0 |
Lote Monit. |
@! |
|
|
R |
|
|
S |
BD5_DTRLZ9 |
D |
8 |
0 |
Data Rlz. 9 |
|
|
|
|
|
|
S |
BD5_DTRLZ1 |
D |
8 |
0 |
Data Rlz. 10 |
|
|
|
R |
|
|
S |
BD5_OBSGUI |
C |
254 |
0 |
Observacao |
@! |
|
|
R |
|
|
S |
BD5_REEANE |
C |
1 |
0 |
Reemb Interc |
@! |
Pertence('01') .Or. Vazio() |
|
R |
1=Sim;0=Nao |
|
S |
BD5_ENV507 |
C |
1 |
0 |
Envio R507? |
@! |
Pertence('01') .Or. Vazio() |
|
R |
1=Sim;0=Nao |
|
S |
BD5_PRE507 |
C |
3 |
0 |
Prefixo R507 |
@! |
|
|
R |
|
|
S |
BD5_NUM507 |
C |
9 |
0 |
Num Tit R507 |
@! |
|
|
R |
|
|
S |
BD5_PAR507 |
C |
2 |
0 |
Parc R507 |
@! |
|
|
R |
|
|
S |
BD5_TIP507 |
C |
3 |
0 |
Tip R507 |
@! |
|
|
R |
|
|
S |
BD5_LOTMOF |
C |
18 |
0 |
Lote Monit. |
@! |
|
|
R |
|
|
S |
BD5_LOTMOE |
C |
18 |
0 |
Lote Exc Mon |
@! |
|
|
R |
|
|
S |
BD5_DTFTIN |
D |
8 |
0 |
Ini. Fat |
|
|
|
R |
|
|
S |
BD5_DTFTFN |
D |
8 |
0 |
Final Fat |
|
|
|
R |
|
|
S |
BD5_VALORI |
N |
16 |
2 |
Vlr Apr Tot |
@E 9,999,999,999,999.99 |
|
|
R |
|
|
N |
BD5_VLRAPR |
N |
16 |
2 |
Vlr Apr Uni |
@E 9,999,999,999,999.99 |
|
|
R |
|
|
N |
BD5_PESEDI |
C |
1 |
0 |
Tp Pessoa Ed |
|
|
|
R |
|
|
S |
BD5_CGCEDI |
C |
14 |
0 |
CGC EDI |
|
|
|
R |
|
|
S |
BD5_CNESED |
C |
7 |
0 |
CNES Edi |
|
|
|
R |
|
|
S |
BD5_MUNEDI |
C |
7 |
0 |
Municipio Ed |
|
|
|
R |
|
|
S |