Tabela
B4E Itens Recurso de Glosa
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
B4E_FILIAL C 2 0 Filial 1=Guias de Consultas/Servicos;2=Guia de Internacao;3=Outros;4=Autorizacao Odontologica;5=Dig. Off-Line S
B4E_MESAUT C 2 0 Mes Autori @! R S
B4E_OPEMOV C 4 0 Operadora @! If(Empty(M->B4E_OPEMOV),.T.,BA0->(ExistCpo("BA0",M->B4E_OPEMOV,1))) B89PLS R S
B4E_ANOAUT C 4 0 Ano Auditori @! R S
B4E_NUMAUT C 8 0 Nro Autori @! R S
B4E_SEQUEN C 3 0 Seq. @! R S
B4E_SEQB4D C 6 0 Seq. Glosa @! R S
B4E_CODLDP C 4 0 Local Digit R S
B4E_ORIMOV C 1 0 Origem Movto @! R 1=Guias de Consultas/Servicos;2=Guia de Internacao;3=Outros;6=Novo Autorizador S
B4E_CODPEG C 8 0 Codigo PEG @! R S
B4E_TIPGUI C 2 0 Tipo de Guia @! R S
B4E_DATPRO D 8 0 Data de Real R S
B4E_DATFIN D 8 0 Dt. Final R S
B4E_CODPAD C 2 0 Tp.Pad. @! Vazio() .Or. (BR4->(ExistCpo("BR4",M->B4E_CODPAD,1))) B41PLS R S
B4E_CODPRO C 16 0 Cod.Proc. @! Vazio() .Or. (PLSA090PRO()) PLSB4E R S
B4E_DESPRO C 150 0 Descricao R S
B4E_STATUS C 1 0 Status Rec @! Pertence('012345') 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 Parcial S
B4E_GRAUPA C 2 0 Grau Part. @! 'Vazio() .Or. (ExistCpo("BWT",M->(B4E_OPEMOV+B4E_GRAUPA),1) .AND. PLSA090PRO())' BGDPLS R S
B4E_CODGLO C 4 0 Cod. Glosa @! R S
B4E_GLOTIS C 4 0 TISS Glo. R S
B4E_VLRGLO N 16 2 Vlr. Glosado @E 9,999,999,999,999.99 R S
B4E_VLRREC N 16 2 Vlr.Recurso @E 9,999,999,999,999.99 R S
B4E_JUSPRE C 150 0 Just. Prest. @! R S
B4E_VLRACA N 16 2 Vlr.Acatado @E 9,999,999,999,999.99 R S
B4E_SLDREC N 16 2 Saldo Recurs @E 9,999,999,999,999.99 R S
B4E_JUSOPE C 150 0 Just. Oper. @! R S
B4E_IMGSTA C 7 0 Image Status @BMP V S
B4E_SEQREC C 3 0 Seq. Recurso @! R S
B4E_OPELOT C 4 0 Ope. Lote @! S
B4E_DESGLO C 200 0 Descr. Glosa @! S
B4E_GLOPLS C 4 0 Cod.Glo.Pls S
B4E_QTDIRP N 3 0 Qtd.Rec.Port 999 S