| Tabela | |||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|
| B45 | Itens do reembolso | ||||||||||
| Campo | Tipo | Tamanho | Decimal | Titulo | Formato | Validacao | F3 | Contexto | Lista | Condicao | PYME |
| B45_FILIAL | C | 2 | 0 | Filial | R | S | |||||
| B45_IMGSTA | C | 7 | 0 | Img Status | @BMP | V | S | ||||
| B45_SEQUEN | C | 3 | 0 | Sequencia | @! | S | |||||
| B45_CONSVL | C | 1 | 0 | Cons.Vlr.Apr | @! | R | 0=Nao;1=Sim | S | |||
| B45_OBSISA | M | 200 | 0 | Obs. Atu. | @! | R | M->B45_CONSVL=="1" | S | |||
| B45_MOTIVO | C | 3 | 0 | Motivo | @! | PlsSeek("SX5",1,"BU" + M->B45_MOTIVO,"B45_DESMOT","X5_DESCRI") | BU | R | M->B45_CONSVL=="1" | S | |
| B45_DESMOT | C | 120 | 0 | Des. Motivo | @! | V | !PLS790INS() | S | |||
| B45_STATUS | C | 1 | 0 | Status | @! | 1=Autorizada;0=Nao Autorizada | S | ||||
| B45_CODPRO | C | 16 | 0 | Cod. Proc. | @! | Vazio() .Or. PLSA090PRO() .AND. AtuCmp() | BPBPRO | S | |||
| B45_DESPRO | C | 50 | 0 | Desc. Proc. | @! | V | S | ||||
| B45_QTDPRO | N | 7 | 2 | Qtd | @E 9999.99 | PLSA090PRO() | S | ||||
| B45_CODPAD | C | 2 | 0 | Cod. Tab. Pd | @! | Vazio() .Or. BR4->(ExistCpo("BR4",M->B45_CODPAD,1)) | B41PLS | S | |||
| B45_NIVAUT | C | 3 | 0 | Nivel Autor. | @! | S | |||||
| B45_DNIVAU | M | 100 | 0 | Dsc.Niv.Aut. | @! | V | S | ||||
| B45_NIVCRI | C | 3 | 0 | Nivel Criti. | @! | S | |||||
| B45_DNIVCR | M | 100 | 0 | Dsc.Niv.Cri. | @! | V | S | ||||
| B45_DATPRO | D | 8 | 0 | Data Proced. | M->B45_DATPRO <= dDataBase .AND. PLEXECCPO("B45") | PLSB44PR() | S | ||||
| B45_HORPRO | C | 6 | 0 | Hora | @R !!:!!:!! | PLSB44PR() | S | ||||
| B45_TPGRV | C | 1 | 0 | Tp. Gravacao | @! | 1=Remote Protheus;2=Internet(RPC);3=POS;4=Importacao Manual | S | ||||
| B45_AUDITO | C | 1 | 0 | Auditoria? | @! | 1=Sim;0=Nao | M->B45_STATUS == "0" | S | |||
| B45_FORCAD | C | 1 | 0 | Forcado? | @! | 1=Sim;0=Nao | S | ||||
| B45_CODLDP | C | 4 | 0 | Cd Lc Dig PG | @! | S | |||||
| B45_CODPEG | C | 8 | 0 | Codigo PEG | S | ||||||
| B45_NUMERO | C | 8 | 0 | Numero Guia | @! | S | |||||
| B45_VIA | C | 1 | 0 | Via Acesso | @! | BGR->(ExistCpo("BGR", PLSIntPad()+M->B45_VIA,1)) | BHRPLS | R | PLSB44PR() | S | |
| B45_ORIMOV | C | 1 | 0 | Origem Movto | @! | 1=Guias de Consultas/Servicos;2=Guia de Internacao;3=Outros;4=Autorizacao Odontologica;5=Dig. Off-Line;6=Novo Autorizador | S | ||||
| B45_PERVIA | N | 4 | 0 | % Via | @E 9999 | V | S | ||||
| B45_OPEMOV | C | 4 | 0 | Operadora | @! | S | |||||
| B45_MESAUT | C | 2 | 0 | Mes Autori. | 99 | R | S | ||||
| B45_ANOAUT | C | 4 | 0 | Ano Autori. | 9999 | R | S | ||||
| B45_NUMAUT | C | 8 | 0 | Cd Reembolso | @! | S | |||||
| B45_CHVNIV | C | 60 | 0 | Chave Nivel | @! | S | |||||
| B45_PROREL | C | 16 | 0 | Proced.Relac | @! | PLSA090F3R() | BPBPLS | S | |||
| B45_PRPRRL | N | 7 | 2 | Percentual | @E 9,999.99 | S | |||||
| B45_NIVEL | C | 1 | 0 | Nivel | @! | S | |||||
| B45_VLRBPR | N | 16 | 2 | Vlr.Contr. | @E 9,999,999,999,999.99 | S | |||||
| B45_VLRAPR | N | 16 | 2 | Vlr Apr Uni | @E 9,999,999,999,999.99 | R | PLSB44PR() | S | |||
| B45_VLRPAG | N | 16 | 2 | Vlr.Pagto | @E 9,999,999,999,999.99 | S | |||||
| B45_VALAPT | N | 16 | 2 | Vlr Apr Tot | @E 9,999,999,999,999.99 | V | S | ||||
| B45_VLRGLO | N | 16 | 2 | Vlr Glosa | @E 9,999,999,999,999.99 | S | |||||
| B45_VLRMAN | N | 16 | 2 | Vlr.Base | @E 9,999,999,999,999.99 | S | |||||
| B45_PERHES | N | 7 | 2 | % Hor.Esp. | @E 9,999.99 | S | |||||
| B45_CODTAB | C | 3 | 0 | Tab.Pagto. | @! | S | |||||
| B45_ALIATB | C | 3 | 0 | Alias Tab. | @! | S | |||||
| B45_VALORI | C | 1 | 0 | Valorizado? | @! | 1=Sim;0=Nao | S | ||||
| B45_PROCCI | C | 1 | 0 | Proced. Cir. | @! | 1=Sim;0=Nao | S | ||||
| B45_ABATPF | C | 1 | 0 | Abate Partic | @! | R | 0=Nao;1=Sim | N | |||
| B45_VLRBPF | N | 16 | 2 | Vl Base PF | @E 9,999,999,999,999.99 | R | N | ||||
| B45_PERCPF | N | 16 | 2 | % PF | @E 9,999,999,999,999.99 | R | N | ||||
| B45_VLRTPF | N | 16 | 2 | Vl Total PF | @E 9,999,999,999,999.99 | R | N | ||||
| B45_VLABPF | N | 16 | 2 | Vlr.Abat.PF. | @E 9,999,999,999,999.99 | R | S | ||||
| B45_NF | C | 20 | 0 | Nota Fiscal | @! | PLSB45NF() | R | S | |||
| B45_CPFCGC | C | 14 | 0 | CNPJ NF | @R 99.999.999/9999-99 | Vazio() .Or. CGC(M->B45_CPFCGC) | R | S | |||
| B45_CRM | C | 6 | 0 | CRM Solic. | @! | Vazio() .OR. VLDPRFSD() | BTYPLS | R | S | ||
| B45_ALIAPF | C | 3 | 0 | Alias PF | @! | R | S | ||||
| B45_GUIORI | C | 40 | 0 | Guia Origem | @! | R | S | ||||
| B45_SEQRCR | C | 3 | 0 | Seq. Rec Ree | @! | R | S | ||||
| B45_SITRGR | 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 | S | |||
| B45_PARTIC | C | 1 | 0 | Partic. | @! | R | 0=Nao;1=Sim | S | |||
| B45_MATRIC | C | 17 | 0 | Matric. Ben. | @!!!!.!!!!.!!!!!!.!!-! | VAZIO() .OR. BA1->(ExistCpo("BA1",M->B45_MATRIC,2)) | PLSNOB | S | |||
| B45_NOMEBE | C | 50 | 0 | Nome Benefi. | V | S | |||||
| B45_RESTIR | C | 1 | 0 | Restitui IR? | @! | Vazio() .OR. Pertence('01') | R | 0=Nao;1=Sim | S | ||
| B45_EST | C | 2 | 0 | Estado | @! | Vazio() .Or. ExistCpo("SX5","12"+UPPER(M->B45_EST)) | 12 | R | PLSB44PR() | S | |
| B45_GRAUPA | C | 2 | 0 | Grau Part. | @! | VAZIO() .OR. ValGRAUPA(M->B45_GRAUPA) | GRAUPA | R | S | ||
| B45_NUMLIB | C | 18 | 0 | Nr.Liberacao | @R !.!!!-!!!!.!!-!!!!!!!! | VAZIO() .OR. PLSVLDLIB("B45") | B98PLS | R | PLSB44PR() | S | |
| B45_REGSOL | C | 15 | 0 | Solicitante | If(Empty(M->B45_REGSOL),.T.,PLSA090SOL()) | B45BTY | R | PLSB44PR() | S | ||
| B45_CODREF | C | 14 | 0 | Rede Nao Ref | @! | BK6RMB | R | PLSB44PR() | S | ||
| B45_NOMREF | C | 35 | 0 | Nome RDA | @! | V | S | ||||
| B45_CODMUN | C | 7 | 0 | Cd Municipio | @! | Vazio() .Or. ExistCpo("BID",UPPER(M->B45_EST+M->B45_CODMUN),4) | B45MUN | R | PLSB44PR() | S | |
| B45_DENREG | C | 4 | 0 | Dente/Reg. | @! | VAZIO() .OR. PLSVLDODO() | B05PLS | R | AlterWhen() | S | |
| B45_DESREG | C | 50 | 0 | Desc. Den/Re | @! | V | S | ||||
| B45_FADENT | C | 5 | 0 | Face | @! | VAZIO() .OR. PLSVLDODO() | B06PLS | R | AlterWhen() | S | |
| B45_FACDES | C | 50 | 0 | Desc. Face | @! | V | S | ||||
| B45_SIGLA | C | 7 | 0 | Sigla C.R | @! | If(Empty(M->B45_SIGLA),.T.,ExistCpo("BAH",M->B45_SIGLA)) .AND. LmpCmpB45() | B53PLS | R | PLSB44PR() | S | |
| B45_ESTSOL | C | 2 | 0 | UF Solic. | @! | If(Empty(M->B45_ESTSOL),.T.,SX5->(ExistCpo("SX5","12"+M->B45_ESTSOL,1))) .AND. LmpCmpB45() | 12 | R | PLSB44PR() | S | |
| B45_NOMSOL | C | 40 | 0 | Nome Solic. | @! | V | S | ||||
| B45_SEQB1N | C | 6 | 0 | Seq. Protoc | R | S | |||||
| B45_FATOR | N | 5 | 2 | Fator Reemb | @E 99.99 | Positivo() | R | S | |||
| B45_INTDE | D | 8 | 0 | Dt Intern De | R | S | |||||
| B45_INTATE | D | 8 | 0 | Dt Inter Ate | R | S | |||||
| B45_GUIPRI | C | 18 | 0 | Nr Guia Prin | @! | R | PLSB44PR() | S | |||
| B45_SEQBE2 | C | 3 | 0 | Seq. Libera. | R | S | |||||
| B45_PADINT | C | 2 | 0 | Tipo Acomod. | @! | VAZIO() .OR. BI4->(ExistCpo("BI4",M->B45_PADINT,1)) | R | S | |||
| B45_PADCON | C | 6 | 0 | Pd. conforto | @! | R | S | ||||
| B45_REGINT | C | 1 | 0 | Regime Inter | @! | R | 1=Hospitalar;2=Hospital-dia;3=Domiciliar | S | |||
| B45_GRPINT | C | 1 | 0 | Grp. Intern. | @! | R | 1=Clinica;2=Cirurgica;3=Obstetrica;4=Pediatrica;5=Psiquiatrica | S | |||
| B45_TIPINT | C | 3 | 0 | Tipo Intern | @! | R | S | ||||