Tabela
DV6 Averbacao Seguro por Cliente
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
DV6_FILIAL C 2 0 Filial N
DV6_NUMAVB C 6 0 No.Averbacao @! N
DV6_CLIDEV C 6 0 Devedor @! ExistCpo("SA1",M->DV6_CLIDEV+AllTrim(M->DV6_LOJDEV)) .And. ExistChav("DV6",M->DV6_CLIDEV+M->DV6_LOJDEV+M->DV6_COMSEG,2) SA1 N
DV6_LOJDEV C 2 0 Loja Devedor @! ExistCpo("SA1",M->DV6_CLIDEV+AllTrim(M->DV6_LOJDEV)) .And. ExistChav("DV6",M->DV6_CLIDEV+M->DV6_LOJDEV+M->DV6_COMSEG,2) N
DV6_NOMDEV C 40 0 Nome Devedor @! V N
DV6_COMSEG C 2 0 Ramo Seguro @! ExistCpo("DU3") .And. ExistChav("DV6",M->DV6_CLIDEV+M->DV6_LOJDEV+M->DV6_COMSEG,2) DU3 N
DV6_DESSEG C 30 0 Des.Ramo Seg @! V N
DV6_INIVIG D 8 0 Ini.Vigencia Empty(M->DV6_FIMVIG) .Or. ( M->DV6_INIVIG <= M->DV6_FIMVIG ) N
DV6_FIMVIG D 8 0 Fim Vigencia Vazio() .Or. ( M->DV6_FIMVIG >= M->DV6_INIVIG ) N
DV6_CODSEG C 6 0 Cod. Seg. @! ExistCpo('SA2',M->DV6_CODSEG+AllTrim(M->DV6_LOJSEG),1) FOR R S
DV6_LOJSEG C 2 0 Loja Seg. @! ExistCpo('SA2',M->DV6_CODSEG+AllTrim(M->DV6_LOJSEG),1) R S
DV6_NOMSEG C 30 0 Nome Seg. @! V S
DV6_APOL C 20 0 Num. Apolice @! R S
DV6_AVBE C 1 0 Averb. Elet. @! Pertence("12") R 1=Sim;2=Nao S