Tabela
B0D Cabecalho Guia Honor. Individ.
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
B0D_FILIAL C 2 0 Filial R S
B0D_STANUM C 14 0 Num. Guia @C V S
B0D_CODOPE C 4 0 Cod. Oper. @! R N
B0D_REGANS C 6 0 Registro ANS @! R N
B0D_NUMGUI C 20 0 Nš da Guia @! R N
B0D_NUMINT C 24 0 Chave Protoc @! PLSINTHON(M->B0D_NUMINT) BGCPLS R Inclui N
B0D_DATGUI D 8 0 Data Emissao R N
B0D_NUMCAR C 20 0 Nš Carteira @R !!!!.!!!!.!!!!!!-!! R N
B0D_PLANO C 20 0 Plano @! R N
B0D_ATENRN C 1 0 Atend.RN @! R 1=Sim;2=Nao N
B0D_DATCAR D 8 0 Valid. Cart. R N
B0D_NOME C 70 0 Nome @! R N
B0D_GUIORI C 25 0 Guia Origem @! R S
B0D_CNS C 15 0 Nš CNS @! R N
B0D_NRLBOR C 18 0 Nr. Lib. Or @! R S
B0D_CODRDA C 14 0 Cod.Executan @! PLSZero() .And. ExistCpo("BAU",M->B0D_CODRDA,1) .And. PLSINTHON(M->B0D_CODRDA) R !Empty(M->B0D_NUMINT) N
B0D_RDACON C 6 0 RDA Contrat. @! R S
B0D_NOMCON C 70 0 Nome Contrat @! R N
B0D_CNES C 7 0 CNES @! R N
B0D_RDAEXE C 14 0 Cod.Executan @! Vazio() .Or. PLSINTHON(M->B0D_RDAEXE) BASPLS R !Empty(M->B0D_NUMINT) N
B0D_DTFTIN D 8 0 Ini. Fat R S
B0D_DTFTFN D 8 0 Final Fat R N
B0D_NRDAEX C 70 0 Nome Execut. @! R N
B0D_CNESEX C 7 0 CNES Executa @! R N
B0D_TIPACO C 2 0 Tipo Acomod. @! R N
B0D_GRAPAR C 2 0 Grau Partic. @! Vazio() .Or. BWT->(ExistCpo("BWT",Plsintpad()+M->B0D_GRAPAR,1)) B5DPLS R N
B0D_CODEXE C 14 0 Cod.Exe.Serv @! Vazio() .Or. PLSINTHON(M->B0D_CODEXE) BTYPLS R PLSWHENRDA() N
B0D_NOMEXE C 70 0 Execut. Serv @! R N
B0D_SICONS C 7 0 Cons.Prof. @! R N
B0D_NUCONS C 15 0 Nš Conselho @! R N
B0D_UFCONS C 2 0 UF Conselho @! R N
B0D_CPFEXE C 11 0 Nš CPF @R 999.999.999-99 VAZIO() .OR. Cgc(M->B0D_CPFEXE) R N
B0D_OBSERV C 240 0 Observacao @! R N
B0D_OPEMOV C 4 0 Operadora @! R S
B0D_VALTOT N 8 2 Valor Total @E 99,999.99 R S
B0D_ANOAUT C 4 0 Ano @! R S
B0D_MESAUT C 2 0 Mes @! R S
B0D_NUMAUT C 8 0 Numero @! R S
B0D_OPERDA C 4 0 Ope. Rda @! R N
B0D_TIPPRE C 3 0 Tp Prestador @! N
B0D_OPEUSR C 4 0 Ope. Usuario @! R N
B0D_CODEMP C 4 0 Empresa @! N
B0D_MATRIC C 6 0 Matricula @! R N
B0D_TIPREG C 2 0 Tp Registro @! N
B0D_DIGITO C 1 0 Digito @! N
B0D_VIACAR N 2 0 Via Cart. 99 N
B0D_CODLDP C 4 0 Cod. Local @! N
B0D_CODPEG C 8 0 Cod. PEG @! N
B0D_TIPINT C 1 0 Tipo Intern. @! 1=Clinica;2=Cirurgica;3=Obstetrica;4=Pediatrica;5=Psiquiatrica N
B0D_CID C 8 0 CID Princip. @! Vazio() .Or. BA9->(ExistCpo("BA9",M->BE4_CID,1)) BA9PLS N
B0D_DATPRO D 8 0 Data Intern. N
B0D_HORPRO C 4 0 Hora Intern. @R !!:!! N
B0D_NUMSOL C 24 0 Nš Guia Sol. @R !!!!.!!!!.!!.!!!!!!!! PLSINTHON(M->B0D_NUMSOL) BGCPLS R inclui S
B0D_NUMIMP C 20 0 Nr. Impresso @! PLSZERO() R S