Tabela
B52 REGRAS SIT. ADVERSAS X RDA
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
B52_FILIAL C 2 0 Filial N
B52_CODINT C 4 0 Operadora @! R N
B52_CODSAD C 3 0 Cod. Sit. Ad @! R N
B52_TIPREG C 1 0 Tipo Regra @! R 1=Judicial;2=Administrativo;3=Tecnico N
B52_RDADE C 6 0 RDA De @! PLSA268VAL("03") PLSSTA R N
B52_RDAATE C 6 0 RDA Ate @! PLSA268VAL("03") .And. VAL(M->B52_RDADE) <=VAL(M->B52_RDAATE) PLSSTA R N
B52_FILRDA C 254 0 Filtro RDA @! PLSADV R N
B52_TIPFIL C 1 0 Tipo Filtro @! R 1=Familia;2=Usuario N
B52_FILFAM C 254 0 Filtro @! PLSADV R N
B52_EMPDE C 4 0 Empresa De @! Vazio().Or.ExistCpo("BG9",M->B52_CODINT+M->B52_EMPDE,1) B7APLS R N
B52_EMPATE C 4 0 Empresa Ate @! Vazio() .Or. (VAL(M->B52_EMPDE) <=VAL(M->B52_EMPATE).And.ExistCpo("BG9",M->B52_CODINT+M->B52_EMPATE,1)) B7APLS R N
B52_CONDE C 12 0 Contrato De @! B7BPLS R N
B52_CONATE C 12 0 Contrato Ate @! VAL(M->B52_CONDE) <=VAL(M->B52_CONATE) B7BPLS R N
B52_SUBDE C 9 0 Sub Cont. De @! B7CPLS R N
B52_SUBATE C 9 0 Sub Cont Ate @! VAL(M->B52_SUBDE) <=VAL(M->B52_SUBATE) B7CPLS R N
B52_CDPLA1 C 4 0 Produto De @! Vazio().Or. ExistCpo("BI3",M->B52_CODINT+M->B52_CDPLA1,1) B2DPLS R N
B52_CDPLA2 C 4 0 Produto Ate @! Vazio().Or.(VAL(M->B52_CDPLA1) <= VAL(M->B52_CDPLA2).And.ExistCpo("BI3",M->B52_CODINT+M->B52_CDPLA2,1)) B2DPLS R N
B52_CODTAB C 2 0 Cod. Tb. Pad @! Vazio() .Or. BR4->(ExistCpo("BR4",M->B52_CODTAB,1)) B41PLS R N
B52_CDEVE1 C 16 0 Proc. De @! Vazio().Or.ExistCpo("BR8",M->B52_CODTAB+Alltrim(M->B52_CDEVE1),1) PLSB52 R N
B52_CDEVE2 C 16 0 Proc. Ate @! Vazio().Or.(VAL(M->B52_CDEVE1) <= VAL(M->B52_CDEVE2).And.ExistCpo("BR8",M->B52_CODTAB+M->B52_CDEVE2,1)) PLSB52 R N
B52_CODSOL C 6 0 CR Solicit. @! Vazio() .Or. ExistCpo("BB0",M->B52_CODSOL,7) BTYPLS R N
B52_CODEXE C 6 0 CR. Execut. @! Vazio() .Or. ExistCpo("BB0",M->B52_CODEXE,7) BTYPLS R N
B52_NUMLIB C 18 0 Num. Liberac @R !.!!!-!!!!.!!-!!!!!!!! BL8PLS R N
B52_DATINC D 8 0 Dt. Inclusao @D R N
B52_CODOP C 6 0 Cod Operador @! R N
B52_DESCOP C 40 0 Desc. Operad @! R N