Campos(SX3) |
X3_CAMPO |
X3_TITULO |
X3_DESCRIC |
HELP Campo |
X3_TIPO |
X3_TAMANHO |
X3_DECIMAL |
X3_PICTURE |
X3_VALID |
X3_RELACAO |
X3_F3 |
X3_TRIGGER |
X3_BROWSE |
X3_VISUAL |
X3_CONTEXT |
X3_CBOX |
X3_WHEN |
X3_INIBRW |
X3_GRPSXG |
X3_FOLDER |
X3_CONDSQL |
X3_CHKSQL |
X3_AGRUP |
X3_POSLGT |
X3_MODAL |
BE1_FILIAL |
Filial |
Filial |
|
C |
2 |
0 |
|
|
|
|
|
Sim |
Altera |
Virtual |
|
|
|
033 |
|
|
|
|
1 |
2 |
BE1_TIPADM |
Tp. Admissão |
Tipo de Admissão |
Indica de qual forma foi dada entrada do
paciente para o atendimento. Estes dados
são buscados a partir do cadastro "Tipo
de Admissão" (BDR).
|
C |
6 |
0 |
@C |
BDR->(ExistCpo("BDR",PLSINTPAD()+M->BE1_TIPADM,1)) |
if(Inclui,GetNewPar("MV_PLSTPAD","1"),BEA->BEA_TIPADM) |
BTAPLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
1 |
BE1_DESADM |
Descrição |
Descricao |
descricao
|
C |
30 |
0 |
@C |
|
Posicione("BDR",1,xFilial("BDR")+If(Inclui,PLSINTPAD()+GetNewPar("MV_PLSTPAD","1"),BEA->(BEA_OPEMOV+BEA_TIPADM)),"BDR_DESCRI") |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_TIPPAC |
Tp. Paciente |
Tipo Paciente |
Indica a forma como o sistema gerencia o
paciente. Estes dados são buscados a
partir do cadastro "Tipo de Paciente"
(BGY).
|
C |
2 |
0 |
@! |
If(Empty(M->BE1_TIPPAC),.T.,BGY->(ExistCpo("BGY",PLSINTPAD()+M->BE1_TIPPAC,1))) |
If(Inclui,GetNewPar("MV_PLSTPAA","05"),BEA->BEA_TIPPAC) |
BGYPLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
1 |
BE1_DESPAC |
Descrição |
Descricao |
Descricao
|
C |
30 |
0 |
@C |
|
Posicione("BGY",1,xFilial("BGY")+If(Inclui,PLSINTPAD()+GetNewPar("MV_PLSTPAA","05"),BEA->(BEA_OPEMOV+BEA_TIPPAC)),"BGY_DESCRI") |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_NUMLIB |
Nr.Liberação |
Nr Liberação |
Constantemente, a Liberação precede uma
Autorização, quando isso ocorrer,
deve-se aqui ser inserido tal número.
Após a inclusão, os dados da Liberação
serão exibidos na tela da Autorização.
|
C |
18 |
0 |
@R !.!!!-!!!!.!!-!!!!!!!! |
If(Empty(M->BE1_NUMLIB),.T.,PLA090LIB(M->BE1_NUMLIB,M->BE1_DATPRO)) |
If(Inclui,"",BEA->BEA_NRLBOR) |
B98PLS |
|
Sim |
Altera |
Virtual |
|
INCLUI |
|
|
1 |
|
|
|
1 |
2 |
BE1_NUMAUT |
Nr.Autoriza. |
Numero da Autorização |
|
C |
18 |
0 |
@R !.!!!-!!!!.!!-!!!!!!!! |
|
If(Inclui,"",BEA->(BEA_OPEMOV+BEA_ANOAUT+BEA_MESAUT+BEA_NUMAUT)) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_DATPRO |
Data Proced. |
Data Proced. |
Data da Autorização .
|
D |
8 |
0 |
|
If(Empty(M->BE1_DATPRO),.T.,PLSA090DAT()), PLSA090DPR() |
IF(Inclui,dDataBase,BEA->BEA_DATPRO) |
|
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
1 |
BE1_HORPRO |
Hora Proced. |
Hora Proced. |
Hora do procedimento
|
C |
6 |
0 |
@R !!:!!:!! |
|
IF(Inclui,StrTran(Time(),":",""),BEA->BEA_HORPRO) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
1 |
BE1_USUARI |
MatrÃcula |
MatrÃcula |
Número da Matricula do Usuário .
|
C |
17 |
0 |
@! |
PLSA090DAT("2") |
If(Inclui,"",BEA->(BEA_OPEUSR+BEA_CODEMP+BEA_MATRIC+BEA_TIPREG+BEA_DIGITO)) |
BY2PLS |
|
Sim |
Altera |
Virtual |
|
Empty(M->BE1_NUMLIB) .AND. Empty(M->BE1_NOMUSR) |
|
|
1 |
|
|
|
1 |
1 |
BE1_MATANT |
Mat. Antiga |
Matricula Antiga |
|
C |
17 |
0 |
@! |
|
If(Inclui,"",BA1->BA1_MATANT) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_NOMUSR |
Usuário |
Usuário |
|
C |
70 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_NOMUSR) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
034 |
1 |
|
|
|
1 |
2 |
BE1_TIPUSR |
Tp. Usuário |
Tipo Usuario |
Informar o tipo de usuario
|
C |
2 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_TIPUSR) |
|
|
Sim |
Vizualiza |
Virtual |
01=Eventual;02=Repasse;04=Usuario Local |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_ATERNA |
Recem-Nasc. |
Atendimento Recem Nascido |
Quando se tratar de um atendimento a um
Recém Nascido, deve ser informado no
campo "MatrÃcula" o código da mãe e deve
ser selecionado neste campo a opção
"Sim".
|
C |
1 |
0 |
@! |
|
If(Inclui,"0",BEA->BEA_ATERNA) |
|
|
Nao |
Altera |
Virtual |
1=Sim;0=Nao |
Iif(Inclui,Empty(M->BE1_NUMLIB),.F.) |
|
|
1 |
|
|
|
1 |
2 |
BE1_VIACAR |
Via Cart. |
Via Carteirinha |
|
N |
2 |
0 |
99 |
|
If(inclui,0,BEA->BEA_VIACAR) |
|
|
Nao |
Altera |
Virtual |
|
!Empty(M->BE1_MATANT) |
|
|
1 |
|
|
|
1 |
2 |
BE1_OPERDA |
Operad. RDA |
Operad. RDA |
Indica a operadora através da qual a
Rede de Atendimento está autorizada a
prestar serviços. Estes dados são
buscados a partir do ca dastro de
Operadoras (BA0).
|
C |
4 |
0 |
@R !.!!! |
If(Empty(M->BE1_OPERDA),.T.,PLSA090VR2()) |
If(Inclui,PLSINTPAD(RETCODUSR()),BEA->BEA_OPERDA) |
B89PLS |
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
1 |
BE1_CODRDA |
Cd Cred/Coop |
Cod. Credenc |
Indica o código da RDA para a qual serão
válidas as informações aqui cadastradas.
Observe que a Rede de Atendimento está
diretamente relacionada à operadora
informada.
|
C |
6 |
0 |
@! |
If(EMPTY(M->BE1_CODRDA),.T.,(PLSA090CPM("2") .And. If(Empty(M->BE1_CODRDA),.T.,PLSA090VMD()))) |
IF(Inclui,"",BEA->BEA_CODRDA) |
BY4PLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
1 |
BE1_NOMRDA |
Nm.Cred/Coop |
credenciado |
|
C |
40 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_NOMRDA) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_TIPPRE |
Tp. RDA |
Tipo da RDA |
|
C |
3 |
0 |
@! |
If(Empty(M->BE1_TIPPRE),.T.,BAG->(ExistCpo("BAG"))) |
If(Inclui,"",BEA->BEA_TIPPRE) |
B42PLS |
|
Sim |
Altera |
Virtual |
|
PLSA090WH1() |
|
|
1 |
|
|
|
1 |
2 |
BE1_CODLOC |
Localidade |
Localidade |
Local de Atendimento do Credenciado .
|
C |
6 |
0 |
@R !!!.!!! |
If(Empty(M->BE1_CODRDA),.T.,PLSA090LOC(M->BE1_OPERDA,M->BE1_CODRDA,M->BE1_CODLOC,M->BE1_DATPRO,"BE1",M->BE1_USUARI)) |
IF(Inclui,"",BEA->(BEA_CODLOC+BEA_LOCAL)) |
B93PLS |
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
1 |
BE1_DESLOC |
Desc. Local |
Descricao local |
|
C |
40 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_DESLOC) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_ENDLOC |
End. Local |
Endereco Local |
|
C |
100 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_ENDLOC) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_CODESP |
Cod. Espec. |
Codigo Especialidade |
Indica a especialidade do prestador
através da qual será(ão) consolidado(s)
o(s)atendimento(s) ao(s)
beneficiário(s).
|
C |
3 |
0 |
@! |
If(Empty(M->BE1_CODESP),.T.,PLSA090ESP(M->BE1_OPERDA,M->BE1_CODRDA,M->BE1_CODLOC,M->BE1_CODESP,M->BE1_DATPRO)) |
If(Inclui,"",BEA->BEA_CODESP) |
BBFPL2 |
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_DESESP |
Desc. Espec. |
Descricao Especialidade |
|
C |
40 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_DESESP) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_CID |
CID |
CID |
Código do cadastro internacional de
doenças a que se refere tal
cadastro/movimentação.
|
C |
8 |
0 |
@! |
If(Empty(M->BE1_CID),.T.,BA9->(ExistCpo("BA9",M->BE1_CID,1))) |
If(Inclui,"",BEA->BEA_CID) |
BA9PLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_DESCID |
Desc. CID |
Desc CID |
|
C |
50 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_DESCID) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_CIDSEC |
CID Secund. |
CID Secundario |
Código do cadastro internacional de
doenças a que se refere tal
cadastro/movimentação.
|
C |
8 |
0 |
@! |
If(Empty(M->BE1_CIDSEC),.T.,BA9->(ExistCpo("BA9",M->BE1_CIDSEC,1))) |
If(Inclui,"",BEA->BEA_CIDSEC) |
BA9PLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_DESSEC |
Desc.CID.Sec |
Desc.CID.Secundario |
|
C |
50 |
0 |
@! |
|
If(Inclui,"",Posicione("BA9",1,xFilial("BA9")+BEA->BEA_CIDSEC,"BA9_DOENCA")) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_SIGLA |
Sigla C.R. |
Conselho Sol |
Sigla do Conselho Regional do
Especialista.
|
C |
7 |
0 |
@! |
If(Empty(M->BE1_SIGLA),.T.,ExistCpo("BAH",M->BE1_SIGLA)) |
IF(Inclui,GETMV("MV_PLSIGLA"),BEA->BEA_SIGLA) |
B53PLS |
|
Nao |
Altera |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_ESTSOL |
UF Solic. |
Est. Solicitante |
Estado de registro do Solicitante.
|
C |
2 |
0 |
@! |
If(Empty(M->BE1_ESTSOL),.T.,SX5->(ExistCpo("SX5","12"+M->BE1_ESTSOL,1))) |
If(Inclui,GETMV("MV_PLSESPD"),BEA->BEA_ESTSOL) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_OPESOL |
Operad. Sol. |
Operadora Solicitante |
Indica a operadora do prestador
solicitante dos serviços. Estes dados
são buscados a partir do ca dastro de
Operadoras (BA0).
|
C |
4 |
0 |
@R !.!!! |
If(Empty(M->BE1_OPESOL),.T.,BA0->(ExistCpo("BA0",M->BE1_OPESOL,1))) |
If(Inclui,PLSINTPAD(),BEA->BEA_OPESOL) |
B89PLS |
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_REGSOL |
C.R. Solic. |
C.R Solicita |
Número de registro do Solicitante.
|
C |
15 |
0 |
@R !!!!!!!!!!!!!!! |
If(Empty(M->BE1_REGSOL),.T.,PLSA090SOL()) |
If(Inclui,"",BEA->BEA_REGSOL) |
BTYPLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_TIPCON |
Tp. Consulta |
Tp Consulta |
Tipo de consulta:
1=Primeira;2=Seguimento;3=Pre-Natal;4=Po
r Encaminhamento
|
C |
1 |
0 |
@! |
|
If(Inclui,"1",BEA->BEA_TIPCON) |
|
|
Sim |
Altera |
Virtual |
1=Primeira Consulta;2=Retorno;3=Pré-natal;4=Por encaminhamento |
|
|
|
1 |
|
|
|
1 |
1 |
BE1_NOMSOL |
Solicitante |
Solicitante |
|
C |
30 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_NOMSOL) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_OPEEXE |
Operad. Exe. |
Operadora Executante |
|
C |
4 |
0 |
@R !.!!! |
If(Empty(M->BE1_OPESOL),.T.,BA0->(ExistCpo("BA0",M->BE1_OPESOL,1))) |
If(Inclui,PLSINTPAD(),BEA->BEA_OPEEXE) |
B89PLS |
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_REGEXE |
C.R. Execut. |
C.R Executante |
Número de registro do Executante.
|
C |
15 |
0 |
@R !!!!!!!!!!!!!!! |
PLSA090EXE() |
If(Inclui,"",BEA->BEA_REGEXE) |
BTYPLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_NOMEXE |
Executante |
Executante |
|
C |
30 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_NOMEXE) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_CDPFSO |
Cd.Prf.Solic |
Cd.Prf.Soli |
|
C |
6 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_CDPFSO) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_CDPFRE |
Cd.Prf.Exec. |
Cd.Prf.Resp. |
|
C |
6 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_CDPFRE) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_ESTEXE |
UF Execut. |
Est. Executante |
Estado de registro do Executante.
|
C |
2 |
0 |
@! |
If(Empty(M->BE1_ESTEXE),.T.,SX5->(ExistCpo("SX5","12"+M->BE1_ESTEXE,1))) |
If(Inclui,GETMV("MV_PLSESPD"),BEA->BEA_ESTEXE) |
12 |
|
Sim |
Altera |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_MATUSA |
Mat. Usada |
Matricula Usada no Movto |
|
C |
1 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_MATUSA) |
|
|
Sim |
Vizualiza |
Virtual |
1=Matricula Principal;2=Matricula Antiga |
|
|
|
2 |
|
|
|
1 |
2 |
BE1_ANOPAG |
Ano Pagto |
Ano Pagto |
|
C |
4 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_ANOPAG) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_MESPAG |
Mes Pagto |
Mes Pagto |
|
C |
2 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_MESPAG) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_NUMIMP |
Nr.Impresso |
Numero do Impresso |
|
C |
20 |
0 |
@! |
( Vazio() ) .Or. ( plszero() .And. PLSVLDNIMP(M->BE1_NUMIMP) ) |
If(Inclui,"",BEA->BEA_NUMIMP) |
|
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_GUIORI |
Guia Orig. |
Guia Original |
Número da Guia Original.
|
C |
32 |
0 |
@R !!!!.!!!!.!!!!!!!!.!!!!!!!! |
|
If(Inclui,"",BEA->BEA_GUIORI) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_PACOTE |
Pacote? |
Pacote? |
|
C |
1 |
0 |
@! |
|
"0" |
|
|
Sim |
Vizualiza |
Virtual |
1=Sim;0=Nao |
|
|
|
2 |
|
|
|
1 |
2 |
BE1_VLRPAC |
Vlr.Pacote |
Valor do Pacote |
Valor do Pacote.
|
N |
16 |
2 |
@E 9,999,999,999,999.99 |
|
If(inclui,0,BEA->BEA_VLRPAC) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_ATEAMB |
Atend.Ambul. |
At. Ambulat. |
Atendimento ambulatorial ?
|
C |
1 |
0 |
@! |
|
If(Inclui,"1",BEA->BEA_ATEAMB) |
|
|
Sim |
Altera |
Virtual |
1=Sim;0=Nao |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_MSG01 |
Mensagem |
Mensagem |
|
C |
254 |
0 |
@C |
|
If(Inclui,"",BEA->BEA_MSG01) |
|
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_MSG02 |
Mensagem 2 |
Mensagem 2 |
|
C |
254 |
0 |
@C |
|
If(Inclui,"",BEA->BEA_MSG02) |
|
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_MSG03 |
Informação |
Informação |
|
C |
254 |
0 |
@C |
|
If(Inclui,"",BEA->BEA_MSG03) |
|
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_CID3 |
CID 3 |
CID 3 |
Código do cadastro internacional de
doenças a que se refere tal
cadastro/movimentação.
|
C |
8 |
0 |
@! |
If(Empty(M->BE1_CID3),.T.,BA9->(ExistCpo("BA9",M->BE1_CID3,1))) |
If(Inclui,"",BEA->BEA_CID3) |
BA9PLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_DESCI3 |
Desc. CID 3 |
Desc. CID 3 |
|
C |
50 |
0 |
@! |
|
If(Inclui,"",BA9->(Posicione("BA9",1,xFilial("BA9")+BEA->BEA_CID3,"BA9_DOENCA"))) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_CID4 |
CID 4 |
CID 4 |
Código do cadastro internacional de
doenças a que se refere tal
cadastro/movimentação.
|
C |
8 |
0 |
@! |
If(Empty(M->BE1_CID4),.T.,BA9->(ExistCpo("BA9",M->BE1_CID4,1))) |
If(Inclui,"",BEA->BEA_CID4) |
BA9PLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_DESCI4 |
Desc. CID 4 |
Desc. CID 4 |
|
C |
50 |
0 |
@! |
|
If(Inclui,"",BA9->(Posicione("BA9",1,xFilial("BA9")+BEA->BEA_CID4,"BA9_DOENCA"))) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_CID5 |
CID 5 |
CID 5 |
Código do cadastro internacional de
doenças a que se refere tal
cadastro/movimentação.
|
C |
8 |
0 |
@! |
If(Empty(M->BE1_CID5),.T.,BA9->(ExistCpo("BA9",M->BE1_CID5,1))) |
If(Inclui,"",BEA->BEA_CID5) |
BA9PLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_DESCI5 |
Desc. CID 5 |
Desc. CID 5 |
|
C |
50 |
0 |
@! |
|
If(Inclui,"",BA9->(Posicione("BA9",1,xFilial("BA9")+BEA->BEA_CID5,"BA9_DOENCA"))) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_SIGEXE |
Sigla Exec. |
Sigla Executante |
|
C |
7 |
0 |
@! |
If(Empty(M->BE1_SIGEXE),.T.,ExistCpo("BAH",M->BE1_SIGEXE)) |
If(Inclui,GetNewPar("MV_PLSIGLA","CRM"),BEA->BEA_SIGEXE) |
B53PLS |
|
Nao |
Vizualiza |
Real |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_GUIACO |
Guia Comp. |
Guia Comprada? |
|
C |
1 |
0 |
@! |
|
If(Inclui,"0",BEA->BEA_GUIACO) |
|
|
Sim |
Vizualiza |
Virtual |
1=Sim;0=Nao |
|
|
|
2 |
|
|
|
1 |
2 |
BE1_QUACOB |
Quando Cobr. |
Quando Cobrar? |
Forma de cobrança da co-participação.
|
C |
1 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_QUACOB) |
|
S |
Sim |
Altera |
Virtual |
1=No Ato;2=Na Fatura |
|
|
|
2 |
|
|
|
1 |
2 |
BE1_CODCLI |
Cod. Cliente |
Codigo do Cliente |
Indica o código do cliente para o qual
será feito o relacionamento financeiro
neste nÃvel.
|
C |
6 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_CODCLI) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
001 |
2 |
|
|
|
1 |
2 |
BE1_LOJA |
Loja |
Loja do Cliente |
Número da Loja do Credenciado .
|
C |
2 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_LOJA) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
002 |
2 |
|
|
|
1 |
2 |
BE1_VALOR |
Valor Compra |
Valor da Compra |
Valor da Compra.
|
N |
16 |
2 |
@E 9,999,999,999,999.99 |
|
If(Inclui,0,BEA->BEA_VALOR) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_SENHA |
Senha |
Senha |
|
C |
20 |
0 |
@! |
|
If(inclui,"",BEA->BEA_SENHA) |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_NRAOPE |
Nr.Aut.Oper. |
Numero Aut. Operadora |
|
C |
20 |
0 |
@! |
|
If(inclui,"",BEA->BEA_NRAOPE) |
|
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_NRAEMP |
Nr.Aut.Empr. |
Numero Aut. Empresa |
|
C |
20 |
0 |
@! |
|
If(inclui,"",BEA->BEA_NRAEMP) |
|
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_PAGATO |
Pagto Ato? |
Pagamento no Ato |
Indica se o pagamento da co-participação
deve ser realizado no ato da
autoriza-ção.
|
C |
1 |
0 |
@! |
|
If(Inclui,"0",BEA->BEA_PAGATO) |
|
|
Sim |
Vizualiza |
Virtual |
1=Sim;0=Nao |
|
|
|
2 |
|
|
|
1 |
2 |
BE1_AUDITO |
Auditoria? |
Enviado a Auditoria? |
|
C |
1 |
0 |
@! |
|
If(Inclui,"0",BEA->BEA_AUDITO) |
|
|
Sim |
Vizualiza |
Virtual |
1=Sim;0=Nao |
|
|
|
2 |
|
|
|
1 |
2 |
BE1_COMUNI |
On-Line? |
On-Line? |
|
C |
1 |
0 |
@! |
|
If(Inclui,"0",BEA->BEA_COMUNI) |
|
|
Nao |
Vizualiza |
Virtual |
1=Sim;0=Nao |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_NRTROL |
Nr.Tr.OnLine |
Numero Trans. On-Line |
|
C |
20 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_NRTROL) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_NUMATE |
Nr.Atendto. |
Numero Atendimento |
|
C |
12 |
0 |
@! |
|
If(inclui,"",BEA->BEA_NUMATE) |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_RDAEDI |
RDA EDI |
Cód. RDA EDI |
|
C |
6 |
0 |
@! |
P090RdaEdi() |
IF(Inclui,'',BEA->BEA_RDAEDI) |
BAUPLS |
S |
Sim |
Altera |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_NOMEDI |
Nome EDI |
Nome RDA EDI |
Nome da Rede de Atendimento no processo
de Intercâmbio.
|
C |
40 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_NOMEDI) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_TIPDOE |
Tipo Doença |
Tipo de Doença |
Informe o código do tipo de doença (
Aguda ou Crônica ).
|
C |
1 |
0 |
@! |
|
IIf(Inclui,"",BEA->BEA_TIPDOE) |
|
|
Nao |
Altera |
Virtual |
A=Aguda;C=Crônica |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_TPODOE |
Tempo Doença |
Tempo da Doença |
Informar o tempo da doença referida pelo
paciente.
Caso o tempo de doença seja em anos e
meses, converter para meses e;
Caso seja em dias, nos casos que
ultrapassar 99 dias converter para
meses.
|
N |
2 |
0 |
99 |
|
IIf(Inclui,0,BEA->BEA_TPODOE) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_UTPDOE |
Unid Tpo Doe |
Unidade Tempo da Doença |
Informar a unidade de Tempo da doença
referida pelo paciente ( Ano, Mês ou dia
).
|
C |
1 |
0 |
@! |
|
IIf(Inclui,"",BEA->BEA_UTPDOE) |
|
|
Nao |
Altera |
Virtual |
A=Anos;M=Meses;D=Dias |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_INDACI |
Indic Aciden |
Indicação de Acidente |
Indica se houve acidente ou doença
relacionado ao trabalho, trânsito ou
outros.
|
C |
1 |
0 |
@! |
|
IIf(Inclui,"",BEA->BEA_INDACI) |
|
|
Nao |
Altera |
Virtual |
0=Trabalho;1=Trânsito;2=Outros;9=Nao Acidente |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_TIPSAI |
Tipo SaÃda |
Código Tipo de SaÃda |
Informe o Tipo de SaÃda:
Informar 1 para Retorno ( quando o
paciente tiver que retornar ao
consultório sem ser pelos motivos 2,3,4
e 5);
Informar 2 para Retorno SADT ( quando a
consulta resultar na realização de
Serviço Auxiliar de Diagnóstico e
terapia - SADT );
Informar 3 para Referência ( quando o
médico que realizou a consulta
encaminhar o paciente para outro médico,
da mesma especialidade ou não;
Informar 4 para Internação ( quando a
consulta resultar em guia de internação
);
Informar 5 para Alta ( quando o paciente
não necessitar retornar ou terminar o
tratamento );
Infomar 6 para Óbito ( este não pode ser
utilizado quando for guia de consulta )
|
C |
1 |
0 |
@! |
Pertence("123456") |
IIf(Inclui,"",BEA->BEA_TIPSAI) |
|
|
Nao |
Altera |
Virtual |
1=Retorno;2=Retorno com SADT;3=Referencia;4=Internação;5=Alta;6=Óbito |
|
|
|
1 |
|
|
|
1 |
1 |
BE1_VALSEN |
Valid Senha |
Validade Senha |
Este campo é preenchido com a soma da
data base do Sistema e o conteúdo do
parâmetro ?MV_PLPRZLB?, sendo que, pode
ser alterado caso necessário.
|
D |
8 |
0 |
@D |
|
IIf(Inclui,dDatabase+GetNewPar("MV_PLPRZLB",30),BEA->BEA_VALSEN) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_DATSOL |
Data Solicit |
Data Solicitação |
Informa a Data da Solicitação da guia. O
Sistema traz como sugestão a data da
Guia de Liberação, se esta for informada
a partir do campo BE1_NUMLIB, sendo que,
pode ser ALTERADO caso necessário.
|
D |
8 |
0 |
@D |
|
IIf(Inclui,dDataBase,BEA->BEA_DATSOL) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_HORSOL |
Hora Solicit |
Hora Solicitação |
Informa a Hora da Solicitação do
procedimento
.O Sistema traz como sugestão a hora da
última consulta do usuário/solicitante,
a partir da última Guia de Consulta
existente no Sistema, sendo que, pode
ser ALTERADO caso necessário.
|
C |
4 |
0 |
@R !!:!! |
PLSVLDHOR(M->BE1_HORSOL) |
IIF(Inclui,StrTran(Time(),":",""),BEA->BEA_HORSOL) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_INDCLI |
Indic ClÃnic |
Indicação ClÃnica |
Deve ser preenchida a indicação clÃnica
pelo profissional solicitante, é
obrigatório se pequena cirurgia,
terapia, consulta de referência e alto
custo.
|
C |
250 |
0 |
@S70 |
|
IIf(Inclui,"",BEA->BEA_INDCLI) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_INDCL2 |
Cont. IndClà |
Indicação ClÃnica |
|
C |
250 |
0 |
@S70 |
|
IIf(Inclui,"",BEA->BEA_INDCL2) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_TIPATE |
Tipo Atendim |
Tipo Atendimento |
Selcione o código do Tipo de atendimento
da guia de SP/ SADT conforme opções.
|
C |
2 |
0 |
@! |
|
IIf(Inclui,"",BEA->BEA_TIPATE) |
|
|
Nao |
Altera |
Virtual |
#PLTpAteBox() |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_CANCEL |
Cancelado |
Cancelado |
|
C |
1 |
0 |
@! |
|
If(inclui,"0",BEA->BEA_CANCEL) |
|
|
Sim |
Vizualiza |
Virtual |
1=Sim;0=Nao |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_MSG04 |
Sol. Revisão |
Solicitação de Revisão |
Solicitação de revisão referente à troca
de informações do arquivo do protocolo
de transações UNIMED.
|
C |
254 |
0 |
@! |
|
If(inclui,"",BEA->BEA_MSG04) |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_MSG05 |
Resp. Revisa |
Resposta da Revisão |
Resposta de revisão referente à troca de
informações do arquivo do protocolo de
transações UNIMED.
|
C |
254 |
0 |
@! |
|
If(inclui,"",BEA->BEA_MSG05) |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_TRACON |
Tra. Conclui |
Transação concluÃda |
|
C |
1 |
0 |
@! |
|
If(inclui,"0",BEA->BEA_TRACON) |
|
|
Sim |
Vizualiza |
Virtual |
1=Sim;0=Não |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_RDACON |
Cd.Sol.Cont. |
Solicitante contratado |
Indica o código do solicitante
contratado a ser informado na guia.
|
C |
6 |
0 |
@! |
PlValRDA('BE1') |
IF(Inclui,'',BEA->BEA_RDACON) |
B1HPLS |
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_DRDACO |
Ds.Sol.Cont. |
Solicitante contratado |
|
C |
40 |
0 |
@! |
|
IF(Inclui,'',Posicione('BAU',1,xfilial('BAU')+BEA->BEA_RDACON,'BAU_NOME')) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_GUIPRI |
Nr Guia Prin |
Numero da Guia Principal |
|
C |
18 |
0 |
@! |
|
IIf(Inclui,"",BEA->BEA_GUIPRI) |
BE4INT |
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_STALIB |
Status Lib. |
Status da Liberação |
|
C |
1 |
0 |
@C |
|
If(Inclui,"",BEA->BEA_STALIB) |
|
|
Nao |
Vizualiza |
Virtual |
1=Em Aberto;2=Fechada |
|
|
|
2 |
|
|
|
1 |
2 |
BE1_NRLBOR |
Nr. Lib. Or |
Número Lib. Original |
|
C |
18 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_NRLBOR) |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
2 |
|
|
|
1 |
2 |
BE1_LOTGUI |
Lote Guia |
Numero Lote Guia |
Numero do Lote da Guia
|
C |
12 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_LOTGUI) |
|
|
Sim |
Altera |
Real |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_TIPMAJ |
Tipo Maj. |
Tipo majoracao intercambi |
Tipo majoracao intercambio
|
C |
1 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_TIPMAJ) |
|
|
Nao |
Altera |
Real |
1=Física;2=Jurídica;3=Cooperativa |
|
|
|
2 |
|
|
|
1 |
2 |
BE1_GRAUPA |
Grau Part. |
Grau de Participacao |
Grau de participação que será
autorizado.
|
C |
2 |
0 |
@! |
|
If(Inclui,'',BEA->BEA_GRAUPA) |
B5DPLS |
|
Sim |
Altera |
Virtual |
|
!Empty(M->BE1_NUMLIB) |
|
|
|
|
|
|
1 |
2 |
BE1_ESPEXE |
Espec.Exe. |
Especialidade do executan |
Informe o codigo da especialidade do
executante
|
C |
3 |
0 |
@! |
Vazio() .or. ExistCpo("BQ1",M->BE1_CDPFRE+M->BE1_ESPEXE) |
IF(INCLUI,"",BEA->BEA_ESPEXE) |
BQ1PL1 |
|
Nao |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_GUIJUR |
Guia Jurid ? |
É uma Guia Juridica ? |
Informe se é uma Guia Juridica?
|
C |
1 |
0 |
@! |
PLSGUIJUR("BE1_GUIJUR") |
If(Inclui,"",BEA->BEA_GUIJUR) |
|
|
Sim |
Altera |
Virtual |
0=Não;1=Sim |
|
|
|
1 |
|
|
|
1 |
2 |
BE1_ESPSOL |
Espec.Sol. |
Especialidade do solicita |
Informe o código da especialidade do
executante
|
C |
3 |
0 |
@! |
Vazio() .or. ExistCpo("BQ1",M->BE1_CDPFSO+M->BE1_ESPSOL) |
If(Inclui,"",BEA->BEA_ESPSOL) |
BQ1PL1 |
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_NUMPRO |
Num Processo |
Numero do Processo |
Informe o Numero do processo.
|
C |
20 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_NUMPRO) |
|
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_MSG06 |
Sol. Revi. 2 |
Solicitacao de Revisao 2 |
Solicitacao de Revisao referente à troca
de informações do arquivo do protocolo
de transações UNIMED.
|
C |
254 |
0 |
@! |
|
If(inclui,"",BEA->BEA_MSG06) |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_MSG07 |
Resp. Rev. 2 |
Resposta da Revisao 2 |
Resposta da Revisao 2 referente à troca
de informações do arquivo do protocolo
de transações UNIMED.
|
C |
254 |
0 |
@! |
|
If(inclui,"",BEA->BEA_MSG07) |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_GUIPRE |
N.Guia Pres. |
N.Guia Pres. |
Nr guia no prestador
|
C |
20 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_GUIPRE) |
|
|
Sim |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_NRTROS |
Nr.Tr.Or.Sev |
Nº Tr Ordem Serviço |
Número da transação da Ordem de Servço
PTU Online.
|
C |
20 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_NRTROS) |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
|
|
|
|
1 |
2 |
BE1_DTRLZ |
Data Rlz. |
Data de Realização |
Data de Realização da Autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
|
|
|
|
1 |
2 |
BE1_DTRLZ2 |
Data Rlz. 2 |
Data de Realização 2 |
Sata da Segunda Realização da
autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ2) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
3 |
|
|
|
1 |
2 |
BE1_DTRLZ3 |
Data Rlz. 3 |
Data de Realização 3 |
Data da Terceira realização da
Autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ3) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
3 |
|
|
|
1 |
2 |
BE1_DTRLZ4 |
Data Rlz. 4 |
Data de Realização 4 |
Data da qUARTA realização da Autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ4) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
3 |
|
|
|
1 |
2 |
BE1_DTRLZ5 |
Data Rlz. 5 |
Data de Realização 5 |
Data da Quinta Realização da Autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ5) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
3 |
|
|
|
1 |
2 |
BE1_DTRLZ6 |
Data Rlz. 6 |
Data de Realização 6 |
Data mda Sexta Realização da Autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ6) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
3 |
|
|
|
1 |
2 |
BE1_DTRLZ7 |
Data Rlz. 7 |
Data de Realização 7 |
Data da Setima realização da Autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ7) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
3 |
|
|
|
1 |
2 |
BE1_DTRLZ8 |
Data Rlz. 8 |
Data de Realização 8 |
Data da Oitava Realização da
Autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ8) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
3 |
|
|
|
1 |
2 |
BE1_DTRLZ9 |
Data Rlz. 9 |
Data de Realização 9 |
Data da Nona realização da Autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ9) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
3 |
|
|
|
1 |
2 |
BE1_DTRLZ1 |
Data Rlz. 10 |
Data de Realização 10 |
Décima Data de Realização da
Autorização
|
D |
8 |
0 |
|
|
if(Inclui,CtoD(""),BEA->BEA_DTRLZ1) |
|
|
Nao |
Altera |
Real |
|
|
|
|
3 |
|
|
|
1 |
2 |
BE1_PROATE |
Protocolo |
Protocolo de Atendimento |
Protocolo de atendimento do paciente.
|
C |
20 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_PROATE) |
|
|
Sim |
Vizualiza |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_CANTIS |
Canc.TISS |
Cod. Cancelamento TISS |
Informe o código do motivo de
cancelamento da TISS.
|
C |
15 |
0 |
@! |
|
BEA->BEA_CANTIS |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
|
|
|
|
1 |
2 |
BE1_CANEDI |
Desc.Can.Edi |
Descr.Cancelam.EDI |
Descricao do cancelamento do atendimento
PTU Online.
|
C |
250 |
0 |
@! |
|
If(inclui,"",BEA->BEA_CANEDI) |
|
|
Nao |
Vizualiza |
Virtual |
|
|
|
|
|
|
|
|
1 |
2 |
BE1_MSG08 |
Mensagem 3 |
Mensagem 3 |
Complemento da mensagem de observação
utilizada no intercâmbio online.
|
C |
254 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_MSG08) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_MSG09 |
Mensagem 4 |
Mensagem 4 |
Complemento da mensagem de observação
utilizada no intercâmbio online.
|
C |
254 |
0 |
@! |
|
If(Inclui,"",BEA->BEA_MSG09) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
1 |
|
|
|
1 |
2 |
BE1_TOKEDI |
Token |
Token Atendimento |
Criaçao do campo Token do Atendimento
para a comunicaçao do Ptu Online
|
C |
10 |
0 |
@! |
|
If(inclui,"",BEA->BEA_TOKEDI) |
|
|
Nao |
Altera |
Virtual |
|
|
|
|
|
|
|
|
1 |
2 |