| Tabela | |||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|
| B44 | Cabecalho Reembolso | ||||||||||
| Campo | Tipo | Tamanho | Decimal | Titulo | Formato | Validacao | F3 | Contexto | Lista | Condicao | PYME |
| B44_FILIAL | C | 2 | 0 | Filial | R | S | |||||
| B44_PROTOC | C | 20 | 0 | Num Protoc | @! | R | S | ||||
| B44_TIPPAC | C | 2 | 0 | Tp. Paciente | @C | BGY->(ExistCpo("BGY",PLSINTPAD()+M->B44_TIPPAC,1)) | BGYPLS | R | PLSB44PR() | S | |
| B44_STATUS | C | 1 | 0 | Status | @! | R | #PLSSTATUS('B44') | S | |||
| B44_AUDITO | C | 1 | 0 | Auditoria? | @! | R | 1=Sim;0=Nao | S | |||
| B44_USUARI | C | 17 | 0 | Matricula | @!!!!.!!!!.!!!!!!.!!-! | If(Empty(M->B44_USUARI),.T.,PLSA090USR(M->B44_USUARI,dDataBase,'', 'B44',,,,,,,,,,,,,,,,,,,.T. )) .and. P001Cli() | BY2PLS | V | Empty(M->B44_NUMLIB) .AND. PLSB44PR() | S | |
| B44_CODCLI | C | 6 | 0 | Cod. Cliente | @! | ExistCpo("SA1",M->B44_CODCLI+M->B44_LOJA) .or. Empty(M->B44_CODCLI) | SA1 | R | PLSB44PR() | S | |
| B44_LOJA | C | 2 | 0 | Loja | @! | ExistCpo("SA1",M->B44_CODCLI+M->B44_LOJA) | R | PLSB44PR() | S | ||
| B44_NOMCLI | C | 40 | 0 | Nome Cliente | @! | R | PLSB44PR() | S | |||
| B44_MATANT | C | 17 | 0 | Mat. Antiga | @! | R | PLSB44PR() | S | |||
| B44_TIPUSR | C | 2 | 0 | Tp. Benef. | @! | R | 01=Eventual;02=Repasse;99=Usuario Local | PLSB44PR() | S | ||
| B44_VIACAR | N | 2 | 0 | Via Cart. | 99 | R | !Empty(M->B44_MATANT) .AND. PLSB44PR() | S | |||
| B44_NOMUSR | C | 70 | 0 | Nome Benef. | @! | R | PLSB44PR() | S | |||
| B44_OPEUSR | C | 4 | 0 | Operadora | @! | R | PLSB44PR() | S | |||
| B44_CODEMP | C | 4 | 0 | Cod.Empresa | @! | R | PLSB44PR() | S | |||
| B44_MATRIC | C | 6 | 0 | Matricula | @! | R | PLSB44PR() | S | |||
| B44_TIPREG | C | 2 | 0 | Tp. Registro | @! | R | PLSB44PR() | S | |||
| B44_DIGITO | C | 1 | 0 | Digito | @! | R | PLSB44PR() | S | |||
| B44_MATUSA | C | 1 | 0 | Mat. Usada | @! | R | 1=Matricula Principal;2=Matricula Antiga | PLSB44PR() | S | ||
| B44_ANOPAG | C | 4 | 0 | Ano Pagto | @! | R | S | ||||
| B44_MESPAG | C | 2 | 0 | Mes Pagto | @! | R | S | ||||
| B44_DATPRO | D | 8 | 0 | Data Proced. | S | ||||||
| B44_HORPRO | C | 6 | 0 | Hora Proced. | @R !!:!!:!! | S | |||||
| B44_SIGLA | C | 7 | 0 | Sigla C.R | @! | If(Empty(M->B44_SIGLA),.T.,ExistCpo("BAH",M->B44_SIGLA)) | B53PLS | R | PLSB44PR() | S | |
| B44_CONREG | C | 15 | 0 | Inscr C.R | @! | BTYPLS | R | PLSB44PR() | S | ||
| B44_OPERDA | C | 4 | 0 | Operad. RDA | @! | If(Empty(M->B44_OPERDA),.T.,PLSA090VR2("B44",Pl001REn())) | B89PLS | R | PLSB44PR() | S | |
| B44_CODRDA | C | 6 | 0 | Cod. RDA | @! | PlsZero() .And. (Vazio() .Or. PLS001VLD("B44_CODRDA")) | BAUPLS | R | PLSB44PR() | S | |
| B44_NOMRDA | C | 60 | 0 | Nome RDA | @! | R | PLSB44PR() | S | |||
| B44_CODLDP | C | 4 | 0 | Cd Lc Dig PG | @! | S | |||||
| B44_TIPPRE | C | 3 | 0 | Classe RDA | @! | If(Empty(M->B44_TIPPRE),.T.,BAG->(ExistCpo("BAG"))) | B42PLS | R | PLSA090WH1() .AND. PLSB44PR() | S | |
| B44_CODPEG | C | 8 | 0 | Codigo PEG | @! | S | |||||
| B44_NUMGUI | C | 8 | 0 | Numero Guia | @! | S | |||||
| B44_CONEMP | C | 12 | 0 | Cont Empresa | @! | R | PLSB44PR() | S | |||
| B44_VERCON | C | 3 | 0 | Versao | @! | R | PLSB44PR() | S | |||
| B44_SUBCON | C | 9 | 0 | SubContrato | @! | R | PLSB44PR() | S | |||
| B44_VERSUB | C | 3 | 0 | Versao | @! | R | PLSB44PR() | S | |||
| B44_LOCATE | C | 6 | 0 | Local | @R !!!.!!! | BBQPLS | R | PLSB44PR() | S | ||
| B44_CODLOC | C | 3 | 0 | Local | @! | BBQPLS | R | S | |||
| B44_DESLOC | C | 40 | 0 | Desc. Local | @! | R | S | ||||
| B44_REGINT | C | 1 | 0 | Regime Inter | @! | Pertence('123') | R | 1=Hospitalar;2=Hospital-Dia;3=Domiciliar | S | ||
| B44_SENHA | C | 20 | 0 | Senha | @! | R | S | ||||
| B44_LOCAL | C | 3 | 0 | Local | @! | BBQPLS | R | S | |||
| B44_ENDLOC | C | 100 | 0 | End. Local | @! | R | PLSB44PR() | S | |||
| B44_CODESP | C | 3 | 0 | Cod. Espec. | @! | PLSA001ESP() | BBRPLS | R | PLSB44PR() | S | |
| B44_DESESP | C | 40 | 0 | Desc. Espec. | @! | R | PLSB44PR() | S | |||
| B44_OPESOL | C | 4 | 0 | Operad. Sol. | @R !.!!! | If(Empty(M->B44_OPESOL),.T.,BA0->(ExistCpo("BA0",M->B44_OPESOL,1))) | B89PLS | R | PLSB44PR() | S | |
| B44_ESTSOL | C | 2 | 0 | UF Solic. | @! | If(Empty(M->B44_ESTSOL),.T.,SX5->(ExistCpo("SX5","12"+M->B44_ESTSOL,1))) | 12 | R | PLSB44PR() | S | |
| B44_REGSOL | C | 10 | 0 | Solicitante | @R !!!!!!!!!! | If(Empty(M->B44_REGSOL),.T.,PLSA090SOL()) | BTYPLS | R | PLSB44PR() | S | |
| B44_NOMSOL | C | 30 | 0 | Nome Solic. | @! | R | PLSB44PR() | S | |||
| B44_OPEEXE | C | 4 | 0 | Operad. Exe. | @R !.!!! | If(Empty(M->B44_OPESOL),.T.,BA0->(ExistCpo("BA0",M->B44_OPESOL,1))) | B89PLS | R | PLSB44PR() | S | |
| B44_ESTEXE | C | 2 | 0 | UF Execut. | @! | If(Empty(M->B44_ESTEXE),.T.,SX5->(ExistCpo("SX5","12"+M->B44_ESTEXE,1))) | 12 | R | PLSB44PR() | S | |
| B44_REGEXE | C | 10 | 0 | Executante | @R !!!!!!!!!! | PLSA090EXE() | BTYPLS | R | PLSB44PR() | S | |
| B44_NOMEXE | C | 30 | 0 | Nome Exec. | @! | R | PLSB44PR() | S | |||
| B44_CDPFRE | C | 6 | 0 | Cd.Prf.Exec. | @! | R | PLSB44PR() | S | |||
| B44_DTDIGI | D | 8 | 0 | Dt Digitacao | S | ||||||
| B44_CDPFSO | C | 6 | 0 | Cd.Prf.Solic | @! | R | PLSB44PR() | S | |||
| B44_CID | C | 8 | 0 | CID | @! | If(Empty(M->B44_CID),.T.,BA9->(ExistCpo("BA9",M->B44_CID,1))) | BA9PLS | R | S | ||
| B44_DESCID | C | 50 | 0 | Desc. CID | @! | R | S | ||||
| B44_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 | ||||
| B44_DATVEN | D | 8 | 0 | Dt Venciment | S | ||||||
| B44_TIPGUI | C | 2 | 0 | Tipo Guia | @! | S | |||||
| B44_OPEMOV | C | 4 | 0 | Operadora | @! | S | |||||
| B44_MESAUT | C | 2 | 0 | Mes Autori. | 99 | VAL(M->B44_ANOREM)>=1.AND.VAL(M->B44_MESREM)<=12 | R | S | |||
| B44_TPGRV | C | 1 | 0 | Tp Gravacao | @! | 1=Remote Protheus;2=Internet(RPC);3=POS;4=Importacao Manual | S | ||||
| B44_NPROCE | C | 20 | 0 | Num Processo | @! | R | S | ||||
| B44_ANOAUT | C | 4 | 0 | Ano Autori. | 9999 | VAL(M->B44_ANOREM)>1000 | R | S | |||
| B44_NUMAUT | C | 8 | 0 | Num. Reemb. | @! | S | |||||
| B44_GUIIMP | C | 1 | 0 | Impressa? | @! | 1=Sim;0=Nao | S | ||||
| B44_CHVSE1 | C | 13 | 0 | Num. Titulo | @! | S | |||||
| B44_VLRPAG | N | 16 | 2 | Vlr. Pagto | @E 9,999,999,999,999.99 | R | .F. | S | |||
| B44_MSG01 | C | 80 | 0 | Mensagem | @! | R | S | ||||
| B44_MSG02 | C | 80 | 0 | Mensagem | @! | R | S | ||||
| B44_MSG03 | C | 80 | 0 | Mensagem | @! | R | S | ||||
| B44_GRPINT | C | 1 | 0 | Grp.Intern. | @! | 1=Clinica;2=Cirurgica;3=Obstetrica;4=Pediatrica;5=Psiquiatrica | S | ||||
| B44_TIPINT | C | 2 | 0 | Tipo Intern. | @! | (!EMPTY(M->B44_GRPINT) .And. ExistCpo("BQR", M->B44_GRPINT+M->B44_TIPINT) .OR. EMPTY(M->B44_GRPINT)) | BBSPLS | S | |||
| B44_DESTIP | C | 50 | 0 | Dsc.Tp.Inter | @! | V | S | ||||
| B44_PADINT | C | 2 | 0 | Tipo Acomod. | @! | BI4->(ExistCpo("BI4",M->B44_PADINT,1)) .OR. Empty(M->B44_PADINT) | BI4PLS | R | S | ||
| B44_DESPAD | C | 40 | 0 | Ds Acomod. | @! | PlsZero() .And. (Vazio() .Or. PLS001VLD("B44_CODRDA")) | V | S | |||
| B44_PADCON | C | 6 | 0 | Pd. conforto | @! | Vazio() .Or. ExistCpo("BN5",M->B44_OPERDA+M->B44_PADCON,1) | BBUPLS | R | PLSB44PR() | S | |
| B44_VLRBPR | N | 16 | 2 | Vlr.Contr | @E 9,999,999,999,999.99 | S | |||||
| B44_VLRGLO | N | 16 | 2 | Vlr.Glosas | @E 9,999,999,999,999.99 | S | |||||
| B44_VLRMAN | N | 16 | 2 | Vlr.Base | @E 9,999,999,999,999.99 | S | |||||
| B44_FORPAG | C | 1 | 0 | Gerar Tit. | @! | R | 0=Fatura;1=No Ato | PLSB44PR() | N | ||
| B44_PREFIX | C | 3 | 0 | Prefixo | @! | S | |||||
| B44_NUM | C | 9 | 0 | No. Titulo | @! | S | |||||
| B44_PARCEL | C | 2 | 0 | Parcela | @! | S | |||||
| B44_TIPO | C | 3 | 0 | Tipo | @! | S | |||||
| B44_FLDMED | C | 1 | 0 | St. DMED | @! | Pertence('S') | R | S=Processado | N | ||
| B44_UFATE | C | 2 | 0 | UF Atend. | @! | Vazio() .Or. ExistCpo("B12",M->B44_OPERDA+UPPER(M->B44_UFATE),1) | B44991 | R | PLSB44PR() | N | |
| B44_MUNATE | C | 7 | 0 | Mun. Atend. | @! | Vazio() .Or. ExistCpo("B13",M->B44_OPERDA+UPPER(M->B44_UFATE+M->B44_MUNATE),1) | B57PLS | R | PLSB44PR() | N | |
| B44_DESMUN | C | 50 | 0 | Desc Munic | @! | R | S | ||||
| B44_NUMLIB | C | 18 | 0 | Num. Liber. | @R !.!!!-!!!!.!!-!!!!!!!! | PLSAB44LIB(M->B44_NUMLIB) | B98PLS | R | PLSB44PR() | S | |
| B44_NROBCO | C | 3 | 0 | Num Banco | @! | SA6->(ExistCpo('SA6',M->B44_NROBCO,1)) | B44 | R | PLSB44PR() | S | |
| B44_DESBCO | C | 40 | 0 | Desc Banco | @! | R | PLSB44PR() | S | |||
| B44_NROAGE | C | 5 | 0 | Num Agencia | @! | R | PLSB44PR() | N | |||
| B44_NROCTA | C | 10 | 0 | Num Conta | @! | R | PLSB44PR() | S | |||
| B44_CODDAT | C | 3 | 0 | Cod. Data | @! | PLSVDB44() | R | N | |||
| B44_DATPAG | D | 8 | 0 | Data Pagto | R | IIF(!EmpTy(M->B44_DATPAG).AND.FunName()=="PLSA001A",.F.,.T.) | N | ||||
| B44_DATREC | D | 8 | 0 | Data Receb. | PLSVDTRPEG(M->B44_DATREC,M->B44_OPERDA,,'04') | R | N | ||||
| B44_CODREF | C | 10 | 0 | Rede Nao Ref | @! | VAZIO() .OR. ExistCpo("BK6",,3).And. PLSVRNR() | BK6PLS | R | PLSB44PR() | N | |
| B44_NOMREF | C | 35 | 0 | Nome Refer. | @! | R | PLSB44PR() | N | |||
| B44_VLABPF | N | 16 | 2 | Vlr.Abat.PF. | @E 9,999,999,999,999.99 | R | S | ||||
| B44_SIGEXE | C | 7 | 0 | Sigla Exec | @! | ExistCpo("SX5","B7"+M->B44_SIGEXE,1) | B53PLS | R | S | ||
| B44_VLRAPR | N | 16 | 2 | Vlr. Apres. | @E 9,999,999,999,999.99 | R | S | ||||
| B44_IDMARK | C | 1 | 0 | Id. Selecao | R | S | |||||
| B44_GUIORI | C | 40 | 0 | Guia Origem | @! | R | S | ||||
| B44_DATRMB | D | 8 | 0 | Dat. reemb. | R | S | |||||
| B44_REEANE | C | 1 | 0 | Intercambio? | @! | Pertence('01') .Or. Vazio() | R | 1=Sim;0=Nao | .F. | S | |
| B44_PROATE | C | 20 | 0 | Protocolo | @! | R | S | ||||
| B44_STTISS | C | 1 | 0 | Status TISS | @! | R | #PLSGUTISS() | S | |||
| B44_DTLBFN | D | 8 | 0 | Dat Lib Fin | S | ||||||