Tabela
N37 Profissionais
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
N37_FILIAL C 2 0 Filial N
N37_TIPOCR C 3 0 Conselho @! EXISTCPO("SX5","NG"+M->N37_TIPOCR) .AND. EXISTCHAV("N37",M->N37_TIPOCR+M->N37_CODIGO) NG R N
N37_CODIGO C 6 0 Codigo 999999 EXISTCHAV("N37",M->N37_TIPOCR+M->N37_CODIGO) R N
N37_TIPO C 1 0 Tipo ! PERTENCE("CPEO") R C=Convenio;P=particular;E=Empregado;O=Cooperativa N
N37_NOME C 40 0 Nome @! R N
N37_AGENDA C 1 0 Usa Agenda PERTENCE("12") R 1=SIM;2=NAO N
N37_CPF C 11 0 CPF @R 999.999.999-99 vazio() .Or. CGC(M->N37_CPF) R N
N37_CGC C 14 0 CNPJ @R 999.999.999/9999-99 vazio() .Or. CGC(M->N37_cgc) R N
N37_ENDE1 C 40 0 Endereco Res @! R N
N37_CIDA1 C 40 0 Cidade @! VAZIO() .OR. EXISTCPO("N31",M->N37_CIDA1,2) N31 R N
N37_UF1 C 2 0 UF @! EXISTCPO("SX5","12"+M->N37_UF1) 12 R N
N37_CEP1 C 9 0 CEP 99999-999 R N
N37_FONE1 C 40 0 Telefones R N
N37_FAX C 20 0 N.o do FAX R N
N37_EMAIL C 65 0 E-mail R N
N37_ENDE2 C 40 0 Endereco Com @! R N
N37_CIDA2 C 40 0 Cidade @! VAZIO() .OR. EXISTCPO("N31",M->N37_CIDA2,2) N31 R N
N37_UF2 C 2 0 UF @! EXISTCPO("SX5","12"+M->N37_UF2) 12 R N
N37_CEP2 C 9 0 CEP 99999-999 R N
N37_FONE2 C 40 0 Telefones R N
N37_OBS1 C 60 0 Observacao 1 @! R N
N37_OBS2 C 60 0 Observacao 2 @! R N