Tabela: BEJ - Itens Autorização Internação


Arquivos atualizado em 08/12/2020, com pacotes até 04/12/2020


Tabela(SX2)
X2_NOMEX2_UNICOX2_SYSOBJ
Itens Autorização InternaçãoBEJ_FILIAL+BEJ_CODOPE+BEJ_ANOINT+BEJ_MESINT+BEJ_NUMINT+BEJ_SEQUEN




Indices(SIX)
OrdemChaveDescriçãoNickName
1BEJ_FILIAL+BEJ_CODOPE+BEJ_ANOINT+BEJ_MESINT+BEJ_NUMINT+BEJ_SEQUENOperadora + Ano Autoriz. + Mes Autoriz. + Num Internac + Sequencia
2BEJ_FILIAL+BEJ_CODOPE+BEJ_ANOINT+BEJ_MESINT+BEJ_NUMINT+BEJ_CODPAD+BEJ_CODPROOperadora + Ano Autoriz. + Mes Autoriz. + Num Internac + Cod. Tab. Pd







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
BEJ_FILIAL Filial Filial C 2 0 S Sim Altera Virtual 033 1 2
BEJ_CODOPE Operadora Operadora Indica o código da Instituição de Saúde,para a qual, serão válidas as informações abaixo cadastradas. C 4 0 @! Sim Altera Virtual 1 2
BEJ_IMGSTA Imagem Stat. Image Status Imagem Status C 7 0 @BMP If(Inclui,"DISABLE",If(BEJ->BEJ_STATUS=="0","DISABLE","ENABLE")) Sim Vizualiza Virtual 1 2
BEJ_SEQUEN Sequencia Sequencia C 3 0 @! PLSA092SEQ() Sim Vizualiza Virtual 1 1
BEJ_CODPAD Cod. Tab. Pd Cd Tb Tipo de tabela do procedimento. C 2 0 @! Iif(!EMPTY(M->BEJ_CODPRO),PLSA092Aut(M->BEJ_SEQUEN,M->BEJ_CODPAD,M->BEJ_CODPRO,M->BEJ_QTDPRO,"1","BEJ","BE4","BEL"),.T.) GETMV("MV_PLSTBPD") B41PLS Sim Altera Virtual 1 1
BEJ_CODPRO Cod. Proc. Cod Proc. Código do procedimento. C 16 0 @! PLSMUDCOD("BEJ").AND.PLSA092Aut(M->BEJ_SEQUEN,M->BEJ_CODPAD,M->BEJ_CODPRO,M->BEJ_QTDPRO,"1","BEJ","BE4","BEL") BPUPLS S Sim Altera Virtual 1 1
BEJ_DESPRO Descr. Proc. Desc Proc. Descrição do procedimento. C 80 0 @! IF(INCLUI,"",POSICIONE("BR8",1,XFILIAL("BR8")+BEJ->BEJ_CODPAD+BEJ->BEJ_CODPRO,"BR8_DESCRI")) Sim Vizualiza Real 1 1
BEJ_QTDSOL Qtd Sol/Aut Quantidade Solic/Autor Quantidade solicitada do procedimento. N 12 4 @E 9,999,999.9999 1 Sim Vizualiza Real 1 1
BEJ_QTDPRO Qtd Proced. Quantidade Procedimento Quantidade do procedimento. N 12 4 @E 9,999,999.9999 PLSA092Aut(M->BEJ_SEQUEN,M->BEJ_CODPAD,M->BEJ_CODPRO,M->BEJ_QTDPRO,"1","BEJ","BE4","BEL") 1 S Sim Altera Virtual 1 1
BEJ_NIVAUT Nivel Autor. Nivel Autorizado C 3 0 @! Sim Vizualiza Virtual 1 2
BEJ_DNIVAU Desc. Nivel Desc Niv Aut M 100 0 @! IIf(Inclui,"",PLSRETNCRI(BEJ->BEJ_NIVCRI,BEJ->BEJ_CHVNIV,BEJ->BEJ_NIVAUT)) Sim Vizualiza Virtual 1 2
BEJ_NIVCRI Nivel Critic Nv Critica C 3 0 @! Sim Vizualiza Virtual 1 2
BEJ_DNIVCR Dsc Niv Crit Desc Niv Critica M 100 0 @! IIf(Inclui,"",PLSRETNCRI(BEJ->BEJ_NIVCRI)) Sim Vizualiza Virtual 1 2
BEJ_AUDITO Auditoria? Auditoria? Indica se o procedimento deve ser enviado para a auditoria. C 1 0 @! PERTENCE('01') "0" Sim Altera Virtual 0=Nao;1=Sim M->BEJ_STATUS=="0" 1 2
BEJ_NIVEL Nivel Nivel C 1 0 @! Sim Vizualiza Virtual 1 2
BEJ_PROCCI Proced. Cir. Procedimento Cirurgico C 1 0 @! "0" Sim Vizualiza Virtual 1=Sim;0=Nao 1 2
BEJ_VIA Via Acesso Via de Acesso C 1 0 @! BGR->(ExistCpo("BGR",M->BE4_OPERDA+M->BEJ_VIA,1)) BHRPLS S Sim Altera Virtual M->BEJ_PROCCI=="1" 1 2
BEJ_PERVIA % Via % da Via N 16 2 @E 9,999,999,999,999.99 Sim Altera Virtual M->BEJ_PROCCI=="1" 1 2
BEJ_ANOINT Ano Autoriz. Ano Autorizacao C 4 0 @! Sim Vizualiza Virtual 1 2
BEJ_MESINT Mes Autoriz. Mes Autorizacao C 2 0 @! Sim Vizualiza Virtual 1 2
BEJ_NUMINT Num Internac No. da Internacao C 8 0 @! Sim Vizualiza Virtual 1 2
BEJ_STATUS Status Int. Status da Internacao C 1 0 @! "0" Sim Vizualiza Virtual 1=Autorizada;0=Nao Autorizada 1 2
BEJ_PROPRI Proc.Princ.? Procedimento Principal? Procedimento principal da internação? C 1 0 @! If(M->BEJ_PROPRI$" ,0",.T.,PLSVLDGD()) "0" Sim Altera Virtual 1=Sim;0=Nao 1 2
BEJ_CHVNIV Chave Nivel Chave Nivel C 20 0 @! Sim Vizualiza Virtual 1 2
BEJ_REGPAG Regra Pagto. Regra para pagamento Regra que o sistema deverá seguir no momento da valorização do pagamento deste procedimento. C 1 0 @! Sim Altera Real 1=Atend. Local;2=Atend. Intercambio !Empty(M->BEJ_CODPRO) 1 2
BEJ_REGCOB Regra Cobr. Regra para cobrança Regra que o sistema deverá seguir no momento da valorização da cobrança deste procedimento. C 1 0 @! Sim Altera Real 1=Atend. Local;2=Atend. Intercambio !Empty(M->BEJ_CODPRO) 1 2
BEJ_CODAUD Cód. Auditor Codigo do Auditor C 6 0 @D Sim Altera Virtual 1 2
BEJ_NOMAUD Auditor Auditor C 40 0 @D Sim Vizualiza Real 1 2
BEJ_NRAOPE Nr Aut Oper. Numero Aut. Operadora C 20 0 @! Sim Altera Virtual 1 2
BEJ_PENDEN Pend. Audit. Alguma pend. na auditoria C 1 0 @! "0" Sim Vizualiza Virtual 1=Sim;0=Não 1 2
BEJ_SOLREV Revisão Revisão C 1 0 @! "0" Sim Vizualiza Virtual 1=Sim;0=Não 1 2
BEJ_TPPROC Tipo Proced Tipo de Procedimento Neste campo vc escolhe o código das despesas realizadas. Seleciona a natureza das despesas, a fim de informardados de outras despesas realizadas peloprestador. C 1 0 @! Pertence("0123456789") Sim Vizualiza Virtual 0=Procedimento;1=Material;2=Medicamento;3=Taxas;4=Diarias;5=Ortese/Protese;6=Pacote;7=Gases Medicinais;8=Alugueis;9=Outros 1 2
BEJ_NUMIMP Nr. Impresso Numero do Impresso Número do impresso C 20 0 @! Sim Vizualiza Virtual 1 2
BEJ_DATPRO Dt. Proc. Data Proc. Data de realização do procedimento D 8 0 If(Inclui .Or. Empty(BEJ->BEJ_DATPRO),dDataBase,BEJ->BEJ_DATPRO) Sim Vizualiza Virtual 1 2
BEJ_VLRAPR Vlr Apr Uni Vlr Apr Uni Valor apresentado para pagamento N 16 2 @E 9,999,999,999,999.99 PLSA092Aut(M->BEJ_SEQUEN,M->BEJ_CODPAD,M->BEJ_CODPRO,M->BEJ_QTDPRO,"1","BEJ","BE4","BEL") S Sim Altera Real 1 2
BEJ_VALORI Vlr Apr Tot Vlr Apr Tot Valor original do procedimento N 16 2 @E 9,999,999,999,999.99 Iif(Inclui,0,BEJ->BEJ_QTDPRO*BEJ->BEJ_VLRAPR) Sim Vizualiza Virtual 1 2
BEJ_NRTROL Nr.Tr.OnLine Núm. Trans. On-Line Código da transação online utilizado. C 20 0 @! Nao Vizualiza Real 1=Sim;0=Nao 1 2
BEJ_TECUTI Téc Utilizad Técnica Utilizada Informe o código da técnica utilizada. C 1 0 @! Vazio() .Or. Pertence('CVR') Nao Altera Real C=Convencional;V=Video;R=Robótica 1 2
BEJ_REFFED Cód.Ref.Fab Cod.Refer.Fabr.EDI Informe código de referência EDI do material no fabricante. C 30 0 @! Nao Altera Real P090PTUGEN('2') 1 2
BEJ_ESPEXE Espec.Exe. Especialidade do executan Informe o código da especialidade do exe cutante C 3 0 BQ1PL1 Sim Altera Real 1 2
BEJ_ESPSOL Espec.Sol. Especialidade do solicita Informe o código da especialidade do so licitante C 3 0 BQ1PL1 Sim Altera Real 1 2
BEJ_PARTIC Partic. Participativa Indica se o procedimento pode ser usado na auditoria participativa. C 1 0 @! Sim Vizualiza Real 0=Nao;1=Sim 1 2
BEJ_PACOTE Pacote? Pacote? pacote C 1 0 @! (Pertence("01") .Or. Vazio()) Nao Altera Real 1=Sim;0=Nao 1 2
BEJ_PROPCT Pacote ? Procedimento é pacote ? O procedimento é pacote ? L 1 0 Sim Altera Virtual 1 2
BEJ_CANEDI Desc.Can.Edi Descr.Cancelam.EDI Descricao do cancelamento do atendimento PTU Online. C 250 0 @! Nao Vizualiza Real 1 2
BEJ_SEQPTU Seq Ptu On Sequencial PTU Online Sequencial PTU Online C 2 0 @! Nao Vizualiza Real 1 2
BEJ_REGANV Reg.Anvisa Reg. ANVISA Mat. Número de registro do material na ANVISA. C 15 0 @! Nao Altera Real 1 2