Tabela
BAU Redes de Atendimento
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
BAU_FILIAL C 2 0 Filial S
BAU_CODIGO C 6 0 Codigo @! ExistChav("BAU",M->BAU_CODIGO) .AND. (M->BAU_DIGITO:=PLSDIGI(M->BAU_CODIGO,11),.T.) S
BAU_CODSA2 C 6 0 Cod. Fornec. @! vazio() .or. SA2->(ExistCpo("SA2",M->BAU_CODSA2,1)) SA2 S
BAU_LOJSA2 C 2 0 Loja Fornec. @! vazio() .or. SA2->(ExistCpo("SA2",M->BAU_CODSA2+M->BAU_LOJSA2,1)) S
BAU_NOMSA2 C 40 0 Nome Fornec. @! V S
BAU_TIPPE C 1 0 Tipo Pessoa @! F=Fisica;J=Juridica S
BAU_CPFCGC C 14 0 CPF/CNPJ @! CGC(M->BAU_CPFCGC) .AND. ExistChav("BAU",M->BAU_CPFCGC,4) .AND. PLSA360CON(1) S
BAU_NOME C 60 0 Nome @! S
BAU_NREDUZ C 20 0 Nm. Reduzido @! M->BAU_TIPPE<>"J" S
BAU_NFANTA C 40 0 Nm. Fantasia @! M->BAU_TIPPE<>"F" S
BAU_RECPRO C 1 0 Rec. Proprio @! 0=Nao;1=Sim S
BAU_DTINCL D 8 0 Dt. Inclusao @D S
BAU_SIGLCR C 7 0 Sigla CR @! PLsSeek("BAH",,,"BAU_DESSIG","BAH_DESCRI") .AND. PLSA360CON(2) B53PLS S
BAU_DESSIG C 60 0 Descricao @! V S
BAU_ESTCR C 2 0 Estado CR @! ExistCpo("SX5","12"+M->BAU_ESTCR) .And. PLSA360CON(2) 12 S
BAU_CONREG C 15 0 Numero CR @! PLSA360CON(2) S
BAU_SIGCR2 C 7 0 Sigla CR 2 @! PLsSeek("BAH",,,"BAU_DESSI2","BAH_DESCRI") .AND. PLSA360CON(3) B53PLS S
BAU_DESSI2 C 60 0 Descr. CR 2 @! V S
BAU_ESTCR2 C 2 0 Estado CR 2 @! ExistCpo("SX5","12"+M->BAU_ESTCR2) .And. PLSA360CON(3) 12 S
BAU_CONRE2 C 15 0 Numero CR 2 @! PLSA360CON(3) S
BAU_TIPPRE C 3 0 Classe Rede @! PLsSeek("BAG",,,,"BAG_CODIGO",.T.) .And. If(BAG->BAG_TIPPE=="A",.T.,BAG->BAG_TIPPE==M->BAU_TIPPE) B42PLS S
BAU_CODOPE C 4 0 Cod.Operad. @! BA0->(ExistCpo("BA0",M->BAU_CODOPE,1)) .And. BAU->(ExistChav("BAU",M->BAU_CODOPE,7)) B89PLS PLSMPRE() S
BAU_COPCRE C 1 0 Tp.Prestador @! 1=Cooperado;2=Credenciado/Contratualizado;3=Funcionario;4=Nao Prestador S
BAU_CATHOS N 2 0 Cla.Hospital @E 99 M->BAU_TIPPE=="J" S
BAU_ALTCUS C 1 0 Alto Custo ? @! 0=Nao;1=Sim S
BAU_LEGEND C 5 0 Forma Tratam @! 1=Dr;2=Dra;3=Sr;4=Sra;5=Srta M->BAU_TIPPE=="F" S
BAU_FAX C 15 0 FAX @! S
BAU_TIPLOG C 3 0 Tp Logradour 999 ExistCpo("B18").OR. VAZIO() B2UPLS R N
BAU_DESCTL C 25 0 Desc.Tip Log @! V N
BAU_CEP C 8 0 CEP @R 99999-999 ExistCpo("BC9",M->BAU_CEP) B83PLS S
BAU_END C 40 0 Logradouro @! S
BAU_NUMERO C 5 0 Numero @! R N
BAU_COMPL C 15 0 Compl Ender @! R N
BAU_GRALAU C 1 0 Grv Alt Aut @! Vazio() .Or. Pertence("0,1") R 0=Nao;1=Sim S
BAU_BAIRRO C 20 0 Bairro @!S15 S
BAU_MUN C 7 0 Municipio @! ExistCpo("BID") B57PLS S
BAU_DESMUN C 30 0 Desc. Munic @! V S
BAU_EST C 2 0 Estado @! ExistCpo("SX5","12"+M->BAU_EST) 12 S
BAU_TEL C 50 0 Telefone @R (99)99999-9999 S
BAU_INSCR C 18 0 Inscr. Est. @! S
BAU_INSCRM C 18 0 Inscr. Mun. @! S
BAU_SEXO C 1 0 Sexo @! 0=Masculino;1=Feminino M->BAU_TIPPE=="F" S
BAU_NASFUN D 8 0 Nasc./Fund. @D If(M->BAU_TIPPE=="F".And.!Empty(M->BAU_ANOFOR),M->BAU_ANOFOR>=StrZero(Year(M->BAU_NASFUN),4),.T.) .And. M->BAU_NASFUN<=dDataBase S
BAU_ESTCIV C 1 0 Estado Civil @! ExistCpo("SX5","33"+M->BAU_ESTCIV,1) 33 M->BAU_TIPPE=="F" S
BAU_RG C 20 0 RG @! M->BAU_TIPPE=="F" S
BAU_CALIMP C 1 0 Calc.Imposto @! 1=Pedido de Compra;2=Financeiro;3=Folha Pagto/Fin;4=Folha de Pagto/GPE S
BAU_CALIRF C 1 0 Calc IR? @! R 1=Sim;0=Nao S
BAU_CBO C 8 0 CBO @! PLSABAUVLD("BAU_CBO") PLSB0X R M->BAU_TIPPE=="F" S
BAU_ANOFOR C 4 0 Ano Format. @! M->BAU_ANOFOR<=StrZero(Year(M->BAU_DTINCL),4) .And. If(M->BAU_TIPPE=="F",M->BAU_ANOFOR>=StrZero(Year(M->BAU_NASFUN),4),.T.) M->BAU_TIPPE=="F" S
BAU_ENFER C 1 0 Enfermaria ? @! 0=Nao;1=Sim S
BAU_APTO C 1 0 Apto ? @! 0=Nao;1=Sim S
BAU_URGEME C 1 0 Urgencia ? @! 0=Nao;1=Sim S
BAU_ENVRPS C 1 0 Envio RPS @! R 0=Nao Enviado; 1=Enviado; 2=Excluido;3=Enviar Alteracao;4=Enviar Exclusao N
BAU_BANCO C 3 0 Banco @! V S
BAU_GERRPS C 1 0 Gera RPS @! R 0=Nao; 1=Sim N
BAU_AGENCI C 7 0 Agencia @! V S
BAU_CONTA C 20 0 Conta @! V S
BAU_OK C 2 0 OK S
BAU_CODBB0 C 6 0 Cod. Prof. @! B35PLS R S
BAU_CODBK6 C 6 0 Cod. Rede NR VAZIO() .Or. ExistCpo("BK6",,3) BKDPLS R S
BAU_DTEXCL D 8 0 Dt. Exclusao @D M->BAU_DTEXCL > M->BAU_DTINCL S
BAU_CORRES C 1 0 Corresp. ? @! If(M->BAU_CORRES<>"0",VldCorresp(1,M->BAU_CODIGO,M->BAU_CORRES),.T.) 1=Sim;0=Nao S
BAU_CODBLO C 3 0 Cod.Bloqueio @! S
BAU_DATBLO D 8 0 Dt. Bloqueio @D S
BAU_CODCFG C 6 0 Usr. Config. @! BBDPLS S
BAU_EMAIL C 60 0 E-Mail @! S
BAU_CONJUG C 40 0 Conjuge @! M->BAU_TIPPE = 'F' S
BAU_NATURE C 10 0 Natureza @! FinVldNat( .T. ) SED V S
BAU_DIAPGT N 2 0 Dia Pagto 99 S
BAU_PAGPRO C 1 0 Pagar prod.? @! 1=Sim;0=Nao S
BAU_CC C 9 0 Centro Custo @! Vazio() .Or. Ctb105CC() CTT S
BAU_ITECTA C 9 0 Item Conta @! (Vazio().Or.Ctb105Item()) CTD S
BAU_CLVL C 9 0 Classe Valor @! (Vazio().Or.Ctb105Clvl()) CTH CtbInUse() S
BAU_MODPAG C 1 0 Mod Pagto @! 1=Pagamento normal;2=Div. % entre Corpo Clinico;3=Div.% entre Corpo Clin. x Prestador S
BAU_NACION C 15 0 Nacionalidad @! PA360Valida() S
BAU_WEB C 50 0 Pagina Web R S
BAU_CODRET C 4 0 Cd. Retencao 9999 EXISTCPO("SX5","37"+M->BAU_CODRET) 37 N
BAU_MATFUN C 6 0 Matr. Func. @! (ExistCpo("SRA") .or. vazio()) .And. P360ValFun() PLSFUN S
BAU_FILFUN C 2 0 Filial Func. S
BAU_NOMFUN C 30 0 Nome Func. @! V S
BAU_GAUSS C 1 0 Cons. Gauss @! R 1=Sim;0=Nao S
BAU_CONTRA C 1 0 Tp Contratua @! 1=Direta;2=Indireta S
BAU_CLAEST C 1 0 Tp Estabelec @! 1=Assist Hospitalar;2=Serv Alta Complexidade;3=Demais Estabelecimentos S
BAU_CNES C 7 0 CNES @R !!!!!!-! S
BAU_DTINSE D 8 0 Dt Ini Serv @D S
BAU_DTINCT D 8 0 Dt Ini Contr @D S
BAU_CODTIS C 8 0 Vinc Cd Tiss V S
BAU_DIRTEC C 70 0 Diretor Tec @! S
BAU_DESTIS C 100 0 Desc Vinc Cd V S
BAU_DIRREG C 10 0 CMR Dir Tec @! S
BAU_ISS C 9 0 ISS @! S
BAU_INSS C 11 0 INSS @! PLS360INSS() S
BAU_TIPDIS C 1 0 Dispon Servi @! 1=Parcial;2=Total S
BAU_NRLTOT N 6 0 Nr LeitosTot @E 999999 S
BAU_NRLCON N 6 0 Nr Leito Con @E 999999 S
BAU_NRLPIS N 6 0 Nr Leito Psi @E 999999 S
BAU_NRUTIA N 6 0 Nr Leito Adu @E 999999 S
BAU_NRUTIN N 6 0 Nr Leito Neo @E 999999 S
BAU_NRUTIP N 6 0 Nr Leito Ped @E 999999 S
BAU_BASINS C 1 0 Bas INSS Uni @! R 0=Nao;1=Sim M->BAU_TIPPE == "F" .And. M->BAU_CALIMP == "3" N
BAU_GRPPAG C 4 0 Grupo Pgto @! ExistCpo("B16") BRZPLS R N
BAU_PRDATN C 2 0 Priori Atend @! R N
BAU_PRDPAG C 2 0 Priori Pagto @! R N
BAU_POLFIN C 1 0 Politica Pag @! Pertence("123") R 1=Fixo;2=Corridos Rec NF;3=Corridos Emi NF N
BAU_DIAPOL N 3 0 Num. Dias @E 999 R N
BAU_RELAOP C 2 0 Relac. Ope. @! Vazio() .Or. ExistCpo("SX5","B1"+M->BAU_RELAOP) B1 R N
BAU_FORPGT C 1 0 Forma Pagto @! Pertence("123") R 1=Credito em Conta;2=Carteira;3=Boleto Bancario N
BAU_AUTGER C 1 0 Cons.Aut.Ge? @! R 0=Nao;1=Sim S
BAU_ACDTRB C 1 0 Acd. Trab? @! R 1=Sim;0=Nao S
BAU_TABPRO C 1 0 Tab. Prop? @! R 1=Sim;0=Nao S
BAU_PRTACD C 1 0 Prest.Acred. @! Pertence('SN') R N=Nao;S=Sim S
BAU_TPPROD C 1 0 Tipo Prod? @! R 1=Regulamentado;2=Nao Regulamentado;3=Ambos S
BAU_GUIMED C 1 0 Guia Prest. @! R 0=Nao;1=Sim N
BAU_SIGDIR C 2 0 Sigla Cons. @! R 01=CRAS;02=COREN;03=CRF;04=CRFA;05=CREFITO;06=CRM;07=CRV;08=CRN;09=CRO;10=CRP;11=OUT N
BAU_UFCDIR C 2 0 Uf Cons. Dir @! 12 R N
BAU_TIPRED C 1 0 Tp Rede Edi @! R 1=Basica;2=Especial;3=Master N
BAU_GUIPAP C 1 0 Nec. Papel? @! R 0=Nao;1=Sim N
BAU_NRLINT N 6 0 Nr Leito Int @E 999,999 R N
BAU_MATVID C 8 0 Matric. Vid @! BYFPLS R S
BAU_AOINT C 1 0 Integrado ? R N
BAU_B2B C 7 0 B2B @! R S
BAU_ACAO C 1 0 Acao integra R N
BAU_DTINT C 20 0 Dt Integra R N
BAU_INSACR C 5 0 Ins.Acredit. @! ExistCPO('SX5','ZJ'+M->BAU_INSACR) R M->BAU_PRTACD='S' S
BAU_NIVACR C 1 0 Nivel Acred. @! Vazio() .Or. Pertence('1234') R 1=Acreditado;2=Acreditado Pleno;3=Acreditado com Excelencia;4=Acreditado sem nivel de acreditacao M->BAU_PRTACD='S' S
BAU_ACEPAR C 1 0 Aceita Part. @! 0=Nao;1=Sim;2=Sob Consulta S
BAU_QTDUS N 12 4 Quant. de US @E 9,999,999.9999 R S
BAU_NTVISA C 1 0 Par.Notivisa @! Pertence('NS') R N=Nao;S=Sim S
BAU_PQUANS C 1 0 Participacao @! Pertence("N;S") BI7PLS R S=SIM;N=NAO S
BAU_NRLDIA C 6 0 Nr Leito Dia @! R S
BAU_NLTCLI N 6 0 Tt Leito Cli @E 999999 R S
BAU_NLTCIR N 6 0 Tt leito Cir @E 999999 R S
BAU_NLTOBS N 6 0 Tt leito Obs @E 999999 R S
BAU_NLTPED N 6 0 Tt leito Ped @E 999999 R S
BAU_NLTPSI N 6 0 Tt leito Psi @E 999999 R S
BAU_MATFU2 C 6 0 Mat.Fun 20% 999999 BZRPLS R S
BAU_FILFU2 C 2 0 Fil.Func 20% R S
BAU_NOMFU2 C 30 0 Nome Fun.20% @! V S
BAU_OBRPTO C 1 0 Obr.Prot.? @! Pertence("0;1") 0=Nao;1=Sim S
BAU_INTC C 1 0 Intercambio? @! 1=Sim;2=Nao S
BAU_TPCALC C 1 0 Tp Calc Pag @! Pertence("1;2;3") R 1=Menor Valor; 2=Valor Contratado; 3=Valor Apresentado S
BAU_TISVER C 7 0 Versao TISS @! ExistCpo("BVV",M->BAU_TISVER,1) VERTIS R S
BAU_DIVANS C 1 0 Divulga ANS @! Vazio() .Or. Pertence('01') R 0=Nao;1=Sim S
BAU_DIVQUA C 1 0 Div.Qualif. @! Vazio() .Or. Pertence('01') R 0=Nao;1=Sim S
BAU_ENVWSD C 1 0 Env.WSD-TISS @! Vazio() .Or. Pertence('01') R S
BAU_NRCRNA C 15 0 Nr Cart Nac. @R 999999999999999 R S
BAU_NRLUNI N 6 0 Nr Leito Int @E 999999 R S
BAU_INSCAC C 100 0 Ins.Acre.Gui @! R S
BAU_CALPGT C 3 0 Cal. Pgto. 999 PL746VALD() .AND. PLS746VLDP("BAU", M->BAU_CALPGT) B2JCAL R S
BAU_TIPDOC C 1 0 Tipo Documen @! VAZIO() .OR. Iif(M->BAU_TIPDOC == '1' .and. !Empty(M->BAU_RG),PLSCHKDIG(M->BAU_RG),.T.) R 1=CI;2=Passaporte;3=CI-Estrangeiro N
BAU_SEQDOC C 6 0 Seq Docto @! R S
BAU_DATATU D 8 0 DT.Atu.Dados R S
BAU_RDASUB C 6 0 RDA Substit @! R S
BAU_EXCEDI C 2 0 Mot.Exclusao @! CN R S
BAU_OBSGUI C 254 0 Obs. Guia @! R S
BAU_MATFU3 C 6 0 Mat.Fun. 3 999999 BZRPLS S
BAU_HOSINT C 2 0 Niv.Hosp.Int @! Vazio() .Or. ExistCpo("B7S",M->BAU_HOSINT) B7SPLS R S
BAU_FILFU3 C 2 0 Fil.Fun.3 S
BAU_MATFU4 C 6 0 Mat.Fun.4 999999 BZRPLS S
BAU_FILFU4 C 2 0 Fil.Fun.4 S
BAU_INATIV C 1 0 Inativo? R 0=Nao;1=Sim S
BAU_MULTTH C 1 0 MultThread R 0=Nao;1=Sim S
BAU_INDDOU C 2 0 Ind.Doutorad @! R 1=Sim;2=Nao N
BAU_DIGANE C 1 0 Env Anex Cli @! R 0=Nao;1=Sim S
BAU_DTINAT D 8 0 Dt.Fim Atend R M->BAU_INATIV == '1' S
BAU_ANSOPI C 6 0 Cod ANS Ope @! R S
BAU_IS9001 C 1 0 ISO 9001 @! R 1=Sim;2=Nao S