| X3_ARQUIVO | X3_ORDEM | X3_CAMPO | X3_TIPO | X3_TAMANHO | X3_DECIMAL | X3_TITULO | X3_DESCRIC | X3_PICTURE | X3_VALID | X3_RELACAO | X3_F3 | X3_NIVEL | X3_TRIGGER | X3_BROWSE | X3_VISUAL | X3_CONTEXT | X3_OBRIGAT | X3_CBOX | X3_PICTVAR | X3_WHEN | X3_INIBRW | X3_GRPSXG | X3_FOLDER |
| BE1 | 07 | BE1_NUMAUT | C | 18 | 0 | Nr.Autoriza. | Numero da Autorização | @R !.!!!-!!!!.!!-!!!!!!!! | | If(Inclui,"",BEA->(BEA_OPEMOV+BEA_ANOAUT+BEA_MESAUT+BEA_NUMAUT)) | | 1 | | S | V | V | | | | | | | 2 |
| BE1 | 09 | BE1_HORPRO | C | 6 | 0 | Hora Proced. | Hora Proced. | @R !!:!!:!! | | IF(Inclui,StrTran(Time(),":",""),BEA->BEA_HORPRO) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 29 | BE1_SIGLA | C | 7 | 0 | Sigla C.R. | Conselho Sol | @! | If(Empty(M->BE1_SIGLA),.T.,ExistCpo("BAH",M->BE1_SIGLA)) | IF(Inclui,GETMV("MV_PLSIGLA"),BEA->BEA_SIGLA) | B53PLS | 1 | | N | A | V | | | | | | | 2 |
| BE1 | 30 | BE1_ESTSOL | C | 2 | 0 | UF Solic. | Est. Solicitante | @! | If(Empty(M->BE1_ESTSOL),.T.,SX5->(ExistCpo("SX5","12"+M->BE1_ESTSOL,1))) | If(Inclui,GETMV("MV_PLSESPD"),BEA->BEA_ESTSOL) | | 1 | | N | A | V | | | | | | | 2 |
| BE1 | 38 | BE1_CDPFSO | C | 6 | 0 | Cd.Prf.Solic | Cd.Prf.Soli | @! | | If(Inclui,"",BEA->BEA_CDPFSO) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 39 | BE1_CDPFRE | C | 6 | 0 | Cd.Prf.Exec. | Cd.Prf.Resp. | @! | | If(Inclui,"",BEA->BEA_CDPFRE) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 40 | BE1_ESTEXE | C | 2 | 0 | UF Execut. | Est. Executante | @! | If(Empty(M->BE1_ESTEXE),.T.,SX5->(ExistCpo("SX5","12"+M->BE1_ESTEXE,1))) | If(Inclui,GETMV("MV_PLSESPD"),BEA->BEA_ESTEXE) | 12 | 1 | | | | V | | | | | | | 2 |
| BE1 | 41 | BE1_MATUSA | C | 1 | 0 | Mat. Usada | Matricula Usada no Movto | @! | | If(Inclui,"",BEA->BEA_MATUSA) | | 1 | | | V | V | | 1=Matricula Principal;2=Matricula Antiga | | | | | 2 |
| BE1 | 42 | BE1_ANOPAG | C | 4 | 0 | Ano Pagto | Ano Pagto | @! | | If(Inclui,"",BEA->BEA_ANOPAG) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 43 | BE1_MESPAG | C | 2 | 0 | Mes Pagto | Mes Pagto | @! | | If(Inclui,"",BEA->BEA_MESPAG) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 45 | BE1_GUIORI | C | 32 | 0 | Guia Orig. | Guia Original | @! | | If(Inclui,"",BEA->BEA_GUIORI) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 46 | BE1_PACOTE | C | 1 | 0 | Pacote? | Pacote? | @! | | "0" | | 1 | | | V | V | | 1=Sim;0=Nao | | | | | 2 |
| BE1 | 47 | BE1_VLRPAC | N | 16 | 2 | Vlr.Pacote | Valor do Pacote | @E 9,999,999,999,999.99 | | If(inclui,0,BEA->BEA_VLRPAC) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 52 | BE1_CID3 | C | 8 | 0 | CID 3 | CID 3 | @! | If(Empty(M->BE1_CID3),.T.,BA9->(ExistCpo("BA9",M->BE1_CID3,1))) | If(Inclui,"",BEA->BEA_CID3) | BA9PLS | 1 | S | | | V | | | | | | | 2 |
| BE1 | 53 | BE1_DESCI3 | C | 50 | 0 | Desc. CID 3 | Desc. CID 3 | @! | | If(Inclui,"",BA9->(Posicione("BA9",1,xFilial("BA9")+BEA->BEA_CID3,"BA9_DOENCA"))) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 54 | BE1_CID4 | C | 8 | 0 | CID 4 | CID 4 | @! | If(Empty(M->BE1_CID4),.T.,BA9->(ExistCpo("BA9",M->BE1_CID4,1))) | If(Inclui,"",BEA->BEA_CID4) | BA9PLS | 1 | S | | | V | | | | | | | 2 |
| BE1 | 55 | BE1_DESCI4 | C | 50 | 0 | Desc. CID 4 | Desc. CID 4 | @! | | If(Inclui,"",BA9->(Posicione("BA9",1,xFilial("BA9")+BEA->BEA_CID4,"BA9_DOENCA"))) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 56 | BE1_CID5 | C | 8 | 0 | CID 5 | CID 5 | @! | If(Empty(M->BE1_CID5),.T.,BA9->(ExistCpo("BA9",M->BE1_CID5,1))) | If(Inclui,"",BEA->BEA_CID5) | BA9PLS | 1 | S | | | V | | | | | | | 2 |
| BE1 | 57 | BE1_DESCI5 | C | 50 | 0 | Desc. CID 5 | Desc. CID 5 | @! | | If(Inclui,"",BA9->(Posicione("BA9",1,xFilial("BA9")+BEA->BEA_CID5,"BA9_DOENCA"))) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 58 | BE1_SIGEXE | C | 7 | 0 | Sigla Exec. | Sigla Executante | @! | If(Empty(M->BE1_SIGEXE),.T.,ExistCpo("BAH",M->BE1_SIGEXE)) | If(Inclui,GetNewPar("MV_PLSIGLA","CRM"),BEA->BEA_SIGEXE) | B53PLS | 1 | | N | V | R | | | | | | | 2 |
| BE1 | 59 | BE1_GUIACO | C | 1 | 0 | Guia Comp. | Guia Comprada? | @! | | If(Inclui,"0",BEA->BEA_GUIACO) | | 1 | | | V | V | | 1=Sim;0=Nao | | | | | 2 |
| BE1 | 60 | BE1_QUACOB | C | 1 | 0 | Quando Cobr. | Quando Cobrar? | @! | | If(Inclui,"",BEA->BEA_QUACOB) | | 1 | S | | | V | | 1=No Ato;2=Na Fatura | | | | | 2 |
| BE1 | 61 | BE1_CODCLI | C | 6 | 0 | Cod. Cliente | Codigo do Cliente | @! | | If(Inclui,"",BEA->BEA_CODCLI) | | 1 | | | V | V | | | | | | 001 | 2 |
| BE1 | 62 | BE1_LOJA | C | 2 | 0 | Loja | Loja do Cliente | @! | | If(Inclui,"",BEA->BEA_LOJA) | | 1 | | | V | V | | | | | | 002 | 2 |
| BE1 | 63 | BE1_VALOR | N | 16 | 2 | Valor Compra | Valor da Compra | @E 9,999,999,999,999.99 | | If(Inclui,0,BEA->BEA_VALOR) | | 1 | | | V | V | | | | | | | 2 |
| BE1 | 64 | BE1_SENHA | C | 20 | 0 | Senha | Senha | @! | | If(inclui,"",BEA->BEA_SENHA) | | 1 | | N | V | V | | | | | | | 2 |
| BE1 | 67 | BE1_PAGATO | C | 1 | 0 | Pagto Ato? | Pagamento no Ato | @! | | If(Inclui,"0",BEA->BEA_PAGATO) | | 1 | | | V | V | | 1=Sim;0=Nao | | | | | 2 |
| BE1 | 68 | BE1_AUDITO | C | 1 | 0 | Auditoria? | Enviado a Auditoria? | @! | | If(Inclui,"0",BEA->BEA_AUDITO) | | 1 | | | V | V | | 1=Sim;0=Nao | | | | | 2 |
| BE1 | 71 | BE1_NUMATE | C | 12 | 0 | Nr.Atendto. | Numero Atendimento | @! | | If(inclui,"",BEA->BEA_NUMATE) | | 1 | | N | V | V | | | | | | | 2 |
| BE1 | 72 | BE1_RDAEDI | C | 6 | 0 | RDA EDI | Cód. RDA EDI | @! | P090RdaEdi() | IF(Inclui,'',BEA->BEA_RDAEDI) | BAUPLS | 1 | S | S | A | V | | | | | | | 2 |
| BE1 | 73 | BE1_NOMEDI | C | 40 | 0 | Nome EDI | Nome RDA EDI | @! | | If(Inclui,"",BEA->BEA_NOMEDI) | | 1 | | S | V | V | | | | | | | 2 |
| BE1 | 79 | BE1_VALSEN | D | 8 | 0 | Valid Senha | Validade Senha | @D | | IIf(Inclui,dDatabase+GetNewPar("MV_PLPRZLB",30),BEA->BEA_VALSEN) | | 1 | | N | A | V | | | | | | | 2 |
| BE1 | A0 | BE1_NUMPRO | C | 20 | 0 | Num Processo | Numero do Processo | @! | | If(Inclui,"",BEA->BEA_NUMPRO) | | 1 | | | A | V | | | | | | | 1 |
| BE1 | 99 | BE1_ESPSOL | C | 3 | 0 | Espec.Sol. | Especialidade do solicita | @! | Vazio() .or. ExistCpo("BQ1",M->BE1_CDPFSO+M->BE1_ESPSOL) | If(Inclui,"",BEA->BEA_ESPSOL) | BQ1PL1 | 1 | | S | A | V | | | | | | | 1 |
| BE1 | 98 | BE1_ESPEXE | C | 3 | 0 | Espec.Exe. | Especialidade do executan | @! | Vazio() .or. ExistCpo("BQ1",M->BE1_CDPFRE+M->BE1_ESPEXE) | IF(INCLUI,"",BEA->BEA_ESPEXE) | BQ1PL1 | 1 | | N | A | V | | | | | | | 1 |
| BE1 | 97 | BE1_GUIJUR | C | 1 | 0 | Guia Jurid ? | É uma Guia Juridica ? | @! | PLSGUIJUR("BE1_GUIJUR") | If(Inclui,"",BEA->BEA_GUIJUR) | | 1 | | | A | V | | 0=Não;1=Sim | | | | | 1 |
| BE1 | 94 | BE1_LOTGUI | C | 12 | 0 | Lote Guia | Numero Lote Guia | @! | | If(Inclui,"",BEA->BEA_LOTGUI) | | 1 | | S | A | R | | | | | | | 1 |
| BE1 | 91 | BE1_GUIPRI | C | 20 | 0 | Nr Guia Prin | Numero da Guia Principal | @! | PLSGUIPRI() | IIf(Inclui,"",BEA->BEA_GUIPRI) | BE4INT | 1 | | S | A | V | | | | | | | 1 |
| BE1 | 90 | BE1_DRDACO | C | 40 | 0 | Ds.Sol.Cont. | Solicitante contratado | @! | | IF(Inclui,'',Posicione('BAU',1,xfilial('BAU')+BEA->BEA_RDACON,'BAU_NOME')) | | 1 | | S | V | V | | | | | | | 1 |
| BE1 | 89 | BE1_RDACON | C | 6 | 0 | Cd.Sol.Cont. | Solicitante contratado | @! | PlValRDA('BE1') | IF(Inclui,'',BEA->BEA_RDACON) | B1HPLS | 1 | | S | A | V | | | | | | | 1 |
| BE1 | 88 | BE1_TRACON | C | 1 | 0 | Tra. Conclui | Transação concluída | @! | | If(inclui,"0",BEA->BEA_TRACON) | | 1 | | S | V | V | | 1=Sim;0=Não | | | | | 1 |
| BE1 | 87 | BE1_MSG05 | C | 254 | 0 | Resp. Revisa | Resposta da Revisão | @! | | If(inclui,"",BEA->BEA_MSG05) | | 1 | | N | V | V | | | | | | | 1 |
| BE1 | 86 | BE1_MSG04 | C | 254 | 0 | Sol. Revisão | Solicitação de Revisão | @! | | If(inclui,"",BEA->BEA_MSG04) | | 1 | | N | V | V | | | | | | | 1 |
| BE1 | 85 | BE1_CANCEL | C | 1 | 0 | Cancelado | Cancelado | @! | | If(inclui,"0",BEA->BEA_CANCEL) | | 1 | | S | V | V | | 1=Sim;0=Nao | | | | | 1 |
| BE1 | 84 | BE1_TIPATE | C | 2 | 0 | Tipo Atendim | Tipo Atendimento | @! | Pertence(PLTpAteBox(nil, .T.)) | IIf(Inclui,"",BEA->BEA_TIPATE) | | 1 | | N | A | V | | #PLTpAteBox() | | | | | 1 |
| BE1 | 83 | BE1_INDCL2 | C | 250 | 0 | Cont. IndClí | Indicação Clínica | @S70 | | IIf(Inclui,"",BEA->BEA_INDCL2) | | 1 | | N | A | V | | | | | | | 1 |
| BE1 | 82 | BE1_INDCLI | C | 250 | 0 | Indic Clínic | Indicação Clínica | @S70 | | IIf(Inclui,"",BEA->BEA_INDCLI) | | 1 | | N | A | V | | | | | | | 1 |
| BE1 | 81 | BE1_HORSOL | C | 4 | 0 | Hora Solicit | Hora Solicitação | @R !!:!! | PLSVLDHOR(M->BE1_HORSOL) | IIF(Inclui,StrTran(Time(),":",""),BEA->BEA_HORSOL) | | 1 | | N | A | V | | | | | | | 1 |
| BE1 | 80 | BE1_DATSOL | D | 8 | 0 | Data Solicit | Data Solicitação | @D | | IIf(Inclui,dDataBase,BEA->BEA_DATSOL) | | 1 | | N | A | V | | | | | | | 1 |
| BE1 | 78 | BE1_TIPSAI | C | 1 | 0 | Tipo Saída | Código Tipo de Saída | @! | Pertence("123456") | IIf(Inclui,"",BEA->BEA_TIPSAI) | | 1 | | N | A | V | | 1=Retorno;2=Retorno com SADT;3=Referencia;4=Internação;5=Alta;6=Óbito | | | | | 1 |
| BE1 | 77 | BE1_INDACI | C | 1 | 0 | Indic Aciden | Indicação de Acidente | @! | | IIf(Inclui,"",BEA->BEA_INDACI) | | 1 | | N | A | V | | 0=Trabalho;1=Trânsito;2=Outros;9=Nao Acidente | | | | | 1 |
| BE1 | 76 | BE1_UTPDOE | C | 1 | 0 | Unid Tpo Doe | Unidade Tempo da Doença | @! | | IIf(Inclui,"",BEA->BEA_UTPDOE) | | 1 | | N | A | V | | A=Anos;M=Meses;D=Dias | | | | | 1 |
| BE1 | 75 | BE1_TPODOE | N | 2 | 0 | Tempo Doença | Tempo da Doença | 99 | | IIf(Inclui,0,BEA->BEA_TPODOE) | | 1 | | N | A | V | | | | | | | 1 |
| BE1 | 74 | BE1_TIPDOE | C | 1 | 0 | Tipo Doença | Tipo de Doença | @! | | IIf(Inclui,"",BEA->BEA_TIPDOE) | | 1 | | N | A | V | | A=Aguda;C=Crônica | | | | | 1 |
| BE1 | 70 | BE1_NRTROL | C | 20 | 0 | Nr.Tr.OnLine | Numero Trans. On-Line | @! | | If(Inclui,"",BEA->BEA_NRTROL) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 69 | BE1_COMUNI | C | 1 | 0 | On-Line? | On-Line? | @! | | If(Inclui,"0",BEA->BEA_COMUNI) | | 1 | | N | V | V | | 1=Sim;0=Nao | | | | | 1 |
| BE1 | 66 | BE1_NRAEMP | C | 20 | 0 | Nr.Aut.Empr. | Numero Aut. Empresa | @! | | If(inclui,"",BEA->BEA_NRAEMP) | | 1 | | | | V | | | | | | | 1 |
| BE1 | 65 | BE1_NRAOPE | C | 20 | 0 | Nr.Aut.Oper. | Numero Aut. Operadora | @! | | If(inclui,"",BEA->BEA_NRAOPE) | | 1 | | | | V | | | | | | | 1 |
| BE1 | 51 | BE1_MSG03 | C | 254 | 0 | Informação | Informação | @C | | If(Inclui,"",BEA->BEA_MSG03) | | 1 | | | | V | | | | | | | 1 |
| BE1 | 50 | BE1_MSG02 | C | 254 | 0 | Mensagem 2 | Mensagem 2 | @C | | If(Inclui,"",BEA->BEA_MSG02) | | 1 | | | | V | | | | | | | 1 |
| BE1 | 49 | BE1_MSG01 | C | 254 | 0 | Mensagem | Mensagem | @C | | If(Inclui,"",BEA->BEA_MSG01) | | 1 | | | | V | | | | | | | 1 |
| BE1 | 48 | BE1_ATEAMB | C | 1 | 0 | Atend.Ambul. | At. Ambulat. | @! | | If(Inclui,"1",BEA->BEA_ATEAMB) | | 1 | | | | V | | 1=Sim;0=Nao | | | | | 1 |
| BE1 | 44 | BE1_NUMIMP | C | 20 | 0 | Nr.Impresso | Numero do Impresso | @! | Vazio() .Or. PLSVLDNIMP(M->BE1_NUMIMP) | If(Inclui,"",BEA->BEA_NUMIMP) | | 1 | | S | | V | | | | | | | 1 |
| BE1 | 37 | BE1_NOMEXE | C | 30 | 0 | Executante | Executante | @! | | If(Inclui,"",BEA->BEA_NOMEXE) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 36 | BE1_REGEXE | C | 15 | 0 | C.R. Execut. | C.R Executante | @R !!!!!!!!!!!!!!! | PLSA090EXE() | If(Inclui,"",BEA->BEA_REGEXE) | BTYPLS | 1 | S | | | V | | | | | | | 1 |
| BE1 | 35 | BE1_OPEEXE | C | 4 | 0 | Operad. Exe. | Operadora Executante | @R !.!!! | If(Empty(M->BE1_OPESOL),.T.,BA0->(ExistCpo("BA0",M->BE1_OPESOL,1))) | If(Inclui,PLSINTPAD(),BEA->BEA_OPEEXE) | B89PLS | 1 | | | | V | | | | | | | 1 |
| BE1 | 34 | BE1_NOMSOL | C | 30 | 0 | Solicitante | Solicitante | @! | | If(Inclui,"",BEA->BEA_NOMSOL) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 33 | BE1_TIPCON | C | 1 | 0 | Tp. Consulta | Tp Consulta | @! | | If(Inclui,"1",BEA->BEA_TIPCON) | | 1 | | | | V | | 1=Primeira Consulta;2=Retorno;3=Pré-natal;4=Por encaminhamento | | | | | 1 |
| BE1 | 32 | BE1_REGSOL | C | 15 | 0 | C.R. Solic. | C.R Solicita | @R !!!!!!!!!!!!!!! | If(Empty(M->BE1_REGSOL),.T.,PLSA090SOL()) | If(Inclui,"",BEA->BEA_REGSOL) | BTYPLS | 1 | S | | | V | | | | | | | 1 |
| BE1 | 31 | BE1_OPESOL | C | 4 | 0 | Operad. Sol. | Operadora Solicitante | @R !.!!! | If(Empty(M->BE1_OPESOL),.T.,BA0->(ExistCpo("BA0",M->BE1_OPESOL,1))) | If(Inclui,PLSINTPAD(),BEA->BEA_OPESOL) | B89PLS | 1 | | | | V | | | | | | | 1 |
| BE1 | 28 | BE1_DESSEC | C | 50 | 0 | Desc.CID.Sec | Desc.CID.Secundario | @! | | If(Inclui,"",Posicione("BA9",1,xFilial("BA9")+BEA->BEA_CIDSEC,"BA9_DOENCA")) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 27 | BE1_CIDSEC | C | 8 | 0 | CID Secund. | CID Secundario | @! | If(Empty(M->BE1_CIDSEC),.T.,BA9->(ExistCpo("BA9",M->BE1_CIDSEC,1))) | If(Inclui,"",BEA->BEA_CIDSEC) | BA9PLS | 1 | S | | | V | | | | | | | 1 |
| BE1 | 26 | BE1_DESCID | C | 50 | 0 | Desc. CID | Desc CID | @! | | If(Inclui,"",BEA->BEA_DESCID) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 25 | BE1_CID | C | 8 | 0 | CID | CID | @! | If(Empty(M->BE1_CID),.T.,BA9->(ExistCpo("BA9",M->BE1_CID,1))) | If(Inclui,"",BEA->BEA_CID) | BA9PLS | 1 | S | | | V | | | | | | | 1 |
| BE1 | 24 | BE1_DESESP | C | 40 | 0 | Desc. Espec. | Descricao Especialidade | @! | | If(Inclui,"",BEA->BEA_DESESP) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 23 | BE1_CODESP | C | 3 | 0 | Cod. Espec. | Codigo Especialidade | @! | 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 | 1 | | | | V | | | | | | | 1 |
| BE1 | 22 | BE1_ENDLOC | C | 100 | 0 | End. Local | Endereco Local | @! | | If(Inclui,"",BEA->BEA_ENDLOC) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 21 | BE1_DESLOC | C | 40 | 0 | Desc. Local | Descricao local | @! | | If(Inclui,"",BEA->BEA_DESLOC) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 20 | BE1_CODLOC | C | 6 | 0 | Localidade | Localidade | @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 | 1 | | | | V | | | | | | | 1 |
| BE1 | 19 | BE1_TIPPRE | C | 3 | 0 | Tp. RDA | Tipo da RDA | @! | If(Empty(M->BE1_TIPPRE),.T.,BAG->(ExistCpo("BAG"))) | If(Inclui,"",BEA->BEA_TIPPRE) | B42PLS | 1 | | | | V | | | | PLSA090WH1() | | | 1 |
| BE1 | 18 | BE1_NOMRDA | C | 40 | 0 | Nm.Cred/Coop | credenciado | @! | | If(Inclui,"",BEA->BEA_NOMRDA) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 17 | BE1_CODRDA | C | 6 | 0 | Cd Cred/Coop | Cod. Credenc | @! | If(EMPTY(M->BE1_CODRDA),.T.,(PLSA090CPM("2") .And. If(Empty(M->BE1_CODRDA),.T.,PLSA090VMD()))) | IF(Inclui,"",BEA->BEA_CODRDA) | BY4PLS | 1 | S | | | V | | | | | | | 1 |
| BE1 | 16 | BE1_OPERDA | C | 4 | 0 | Operad. RDA | Operad. RDA | @R !.!!! | If(Empty(M->BE1_OPERDA),.T.,PLSA090VR2()) | If(Inclui,PLSINTPAD(RETCODUSR()),BEA->BEA_OPERDA) | B89PLS | 1 | | | | V | | | | | | | 1 |
| BE1 | 15 | BE1_VIACAR | N | 2 | 0 | Via Cart. | Via Carteirinha | 99 | | If(inclui,0,BEA->BEA_VIACAR) | | 1 | | N | | V | | | | !Empty(M->BE1_MATANT) | | | 1 |
| BE1 | 14 | BE1_ATERNA | C | 1 | 0 | Recem-Nasc. | Atendimento Recem Nascido | @! | | If(Inclui,"0",BEA->BEA_ATERNA) | | 1 | | N | A | V | | 1=Sim;0=Nao | | Iif(Inclui,Empty(M->BE1_NUMLIB),.F.) | | | 1 |
| BE1 | 13 | BE1_TIPUSR | C | 2 | 0 | Tp. Usuário | Tipo Usuario | @! | | If(Inclui,"",BEA->BEA_TIPUSR) | | 1 | | | V | V | | 01=Eventual;02=Repasse;04=Usuario Local | | | | | 1 |
| BE1 | 12 | BE1_NOMUSR | C | 70 | 0 | Usuário | Usuário | @! | | If(Inclui,"",BEA->BEA_NOMUSR) | | 1 | | | V | V | | | | | BEA->BEA_NOMUSR | 034 | 1 |
| BE1 | 11 | BE1_MATANT | C | 17 | 0 | Mat. Antiga | Matricula Antiga | @! | | If(Inclui,"",BA1->BA1_MATANT) | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 10 | BE1_USUARI | C | 17 | 0 | Matrícula | Matrícula | @! | PLSA090DAT("2") | If(Inclui,"",BEA->(BEA_OPEUSR+BEA_CODEMP+BEA_MATRIC+BEA_TIPREG+BEA_DIGITO)) | BY2PLS | 1 | | | | V | | | | Empty(M->BE1_NUMLIB) .AND. Empty(M->BE1_NOMUSR) | | | 1 |
| BE1 | 08 | BE1_DATPRO | D | 8 | 0 | Data Proced. | Data Proced. | | If(Empty(M->BE1_DATPRO),.T.,PLSA090DAT()), PLSA090DPR() | IF(Inclui,dDataBase,BEA->BEA_DATPRO) | | 1 | | S | A | V | | | | | | | 1 |
| BE1 | 06 | BE1_NUMLIB | C | 18 | 0 | Nr.Liberação | Nr Liberação | @R !.!!!-!!!!.!!-!!!!!!!! | If(Empty(M->BE1_NUMLIB),.T.,PLA090LIB(M->BE1_NUMLIB,M->BE1_DATPRO)) | If(Inclui,"",BEA->BEA_NRLBOR) | B98PLS | 1 | | S | | V | | | | INCLUI | | | 1 |
| BE1 | 05 | BE1_DESPAC | C | 30 | 0 | Descrição | Descricao | @C | | Posicione("BGY",1,xFilial("BGY")+If(Inclui,PLSINTPAD()+GetNewPar("MV_PLSTPAA","05"),BEA->(BEA_OPEMOV+BEA_TIPPAC)),"BGY_DESCRI") | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 04 | BE1_TIPPAC | C | 2 | 0 | Tp. Paciente | Tipo Paciente | @! | If(Empty(M->BE1_TIPPAC),.T.,BGY->(ExistCpo("BGY",PLSINTPAD()+M->BE1_TIPPAC,1))) | If(Inclui,GetNewPar("MV_PLSTPAA","05"),BEA->BEA_TIPPAC) | BGYPLS | 1 | S | | | V | | | | | | | 1 |
| BE1 | 03 | BE1_DESADM | C | 30 | 0 | Descrição | Descricao | @C | | Posicione("BDR",1,xFilial("BDR")+If(Inclui,PLSINTPAD()+GetNewPar("MV_PLSTPAD","1"),BEA->(BEA_OPEMOV+BEA_TIPADM)),"BDR_DESCRI") | | 1 | | | V | V | | | | | | | 1 |
| BE1 | 02 | BE1_TIPADM | C | 6 | 0 | Tp. Admissão | Tipo de Admissão | @C | BDR->(ExistCpo("BDR",PLSINTPAD()+M->BE1_TIPADM,1)) | if(Inclui,GetNewPar("MV_PLSTPAD","1"),BEA->BEA_TIPADM) | BTAPLS | 1 | S | | | V | | | | | | | 1 |
| BE1 | C5 | BE1_AUSVLD | C | 2 | 0 | Cod.Aus.Vld. | Cod Ausencia Validacao | @! | PLSA09Aprt(.t.)[2] | If(inclui,"",BEA->BEA_AUSVLD) | PLSB4E | 1 | | N | A | V | | | | Empty(M->BE1_TOKEDI) | | | |
| BE1 | C4 | BE1_COBESP | C | 2 | 0 | Cobert. Esp. | Cobertura Especial | @! | | | | 1 | | S | A | V | | | | M->BE1_TMREGA='01' | | | |
| BE1 | C3 | BE1_SAUOCU | C | 2 | 0 | Saúde Ocupa. | Saúde ocupacional | @! | | | | 1 | | S | A | V | | 01=Admissional;02=Demissional;03=Periódico;04=Retorno ao trabalho;05=Mudança de função;06=Promoção à saúde | | | | | |
| BE1 | C2 | BE1_TMREGA | C | 2 | 0 | Reg. Atend. | Código da terminologia de | @! | | IIF(INCLUI,"",BEA->BEA_TMREGA) | | 1 | | S | A | V | | 01=Ambulatorial;02=Domiciliar;03=Internacao;04=Pronto-socorro;05=TELESAUDE | | | '01' | | |
| BE1 | C0 | BE1_TOKEDI | C | 10 | 0 | Token | Token Atendimento | @! | If(Inclui, If(Empty(M->BE1_USUARI),.T.,PLSA090DAT("2")),.T.) | If(inclui,"",BEA->BEA_TOKEDI) | | 1 | | N | A | V | | | | Empty(M->BE1_AUSVLD) | | | |
| BE1 | B7 | BE1_CANEDI | C | 250 | 0 | Desc.Can.Edi | Descr.Cancelam.EDI | @! | | If(inclui,"",BEA->BEA_CANEDI) | | 1 | | N | V | V | | | | | | | |
| BE1 | B6 | BE1_CANTIS | C | 15 | 0 | Canc.TISS | Cod. Cancelamento TISS | @! | | BEA->BEA_CANTIS | | 1 | | N | V | V | | | | | | | |
| BE1 | A5 | BE1_DTRLZ | D | 8 | 0 | Data Rlz. | Data de Realização | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ) | | 1 | | N | A | V | | | | | | | |
| BE1 | A4 | BE1_NRTROS | C | 20 | 0 | Nr.Tr.Or.Sev | Nº Tr Ordem Serviço | @! | | If(Inclui,"",BEA->BEA_NRTROS) | | 1 | | N | V | V | | | | | | | |
| BE1 | 96 | BE1_GRAUPA | C | 2 | 0 | Grau Part. | Grau de Participacao | @! | | If(Inclui,'',BEA->BEA_GRAUPA) | B5DPLS | 1 | | S | A | V | | | | !Empty(M->BE1_NUMLIB) | | | |
| BE1 | 01 | BE1_FILIAL | C | 2 | 0 | Filial | Filial | | | | | 1 | | | | | | | | | | 033 | |
| BE1 | 92 | BE1_STALIB | C | 1 | 0 | Status Lib. | Status da Liberação | @C | | If(Inclui,"",BEA->BEA_STALIB) | | 1 | | N | V | V | | 1=Em Aberto;2=Fechada | | | | | 2 |
| BE1 | 93 | BE1_NRLBOR | C | 18 | 0 | Nr. Lib. Or | Número Lib. Original | @! | | If(Inclui,"",BEA->BEA_NRLBOR) | | 1 | | N | V | V | | | | | | | 2 |
| BE1 | 95 | BE1_TIPMAJ | C | 1 | 0 | Tipo Maj. | Tipo majoracao intercambi | @! | | If(Inclui,"",BEA->BEA_TIPMAJ) | | 1 | | N | A | R | | 1=Física;2=Jurídica;3=Cooperativa | | | | | 2 |
| BE1 | A1 | BE1_MSG06 | C | 254 | 0 | Sol. Revi. 2 | Solicitacao de Revisao 2 | @! | | If(inclui,"",BEA->BEA_MSG06) | | 1 | | N | V | V | | | | | | | 1 |
| BE1 | A2 | BE1_MSG07 | C | 254 | 0 | Resp. Rev. 2 | Resposta da Revisao 2 | @! | | If(inclui,"",BEA->BEA_MSG07) | | 1 | | N | V | V | | | | | | | 1 |
| BE1 | A3 | BE1_GUIPRE | C | 20 | 0 | N.Guia Pres. | N.Guia Pres. | @! | | If(Inclui,"",BEA->BEA_GUIPRE) | | 1 | | S | A | V | | | | | | | 1 |
| BE1 | A6 | BE1_DTRLZ2 | D | 8 | 0 | Data Rlz. 2 | Data de Realização 2 | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ2) | | 1 | | N | A | V | | | | | | | 3 |
| BE1 | A7 | BE1_DTRLZ3 | D | 8 | 0 | Data Rlz. 3 | Data de Realização 3 | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ3) | | 1 | | N | A | V | | | | | | | 3 |
| BE1 | A8 | BE1_DTRLZ4 | D | 8 | 0 | Data Rlz. 4 | Data de Realização 4 | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ4) | | 1 | | N | A | V | | | | | | | 3 |
| BE1 | A9 | BE1_DTRLZ5 | D | 8 | 0 | Data Rlz. 5 | Data de Realização 5 | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ5) | | 1 | | N | A | V | | | | | | | 3 |
| BE1 | B0 | BE1_DTRLZ6 | D | 8 | 0 | Data Rlz. 6 | Data de Realização 6 | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ6) | | 1 | | N | A | V | | | | | | | 3 |
| BE1 | B1 | BE1_DTRLZ7 | D | 8 | 0 | Data Rlz. 7 | Data de Realização 7 | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ7) | | 1 | | N | A | V | | | | | | | 3 |
| BE1 | B2 | BE1_DTRLZ8 | D | 8 | 0 | Data Rlz. 8 | Data de Realização 8 | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ8) | | 1 | | N | A | V | | | | | | | 3 |
| BE1 | B3 | BE1_DTRLZ9 | D | 8 | 0 | Data Rlz. 9 | Data de Realização 9 | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ9) | | 1 | | N | A | V | | | | | | | 3 |
| BE1 | B4 | BE1_DTRLZ1 | D | 8 | 0 | Data Rlz. 10 | Data de Realização 10 | | | if(Inclui,CtoD(""),BEA->BEA_DTRLZ1) | | 1 | | N | A | R | | | | | | | 3 |
| BE1 | B5 | BE1_PROATE | C | 20 | 0 | Protocolo | Protocolo de Atendimento | @! | | If(Inclui,"",BEA->BEA_PROATE) | | 1 | | S | V | V | | | | | | | 1 |
| BE1 | B8 | BE1_MSG08 | C | 254 | 0 | Mensagem 3 | Mensagem 3 | @! | | If(Inclui,"",BEA->BEA_MSG08) | | 1 | | N | A | V | | | | | | | 1 |
| BE1 | B9 | BE1_MSG09 | C | 254 | 0 | Mensagem 4 | Mensagem 4 | @! | | If(Inclui,"",BEA->BEA_MSG09) | | 1 | | N | A | V | | | | | | | 1 |
| BE1 | C1 | BE1_NOMSOC | C | 70 | 0 | Nome Social | Nome Social | @! | | If(inclui,"",BEA->BEA_NOMSOC) | | 1 | | S | V | V | | | | | BEA->BEA_NOMSOC | | 1 |