Tabela
RGE HISTORICO DE CONTRATOS
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
RGE_FILIAL C 2 0 Filial R S
RGE_MAT C 6 0 Matricula 999999 R S
RGE_NOME C 70 0 Nome @! V S
RGE_NOMEMP C 150 0 Nome Empre. @! NaoVazio() R M->RGE_RESEXT <>'2' S
RGE_CIC C 11 0 C.P.F. @R 999.999.999-99 V S
RGE_CNPJ C 14 0 C.N.P.J. @R 99.999.999/9999-99 Vazio() .Or. CGC(M->RGE_CNPJ) R M->RGE_RESEXT <>'2' S
RGE_TIPOCO C 2 0 Tipo Contrat @! R S
RGE_DATAIN D 8 0 Data Inicio NaoVazio() R S
RGE_DATAFI D 8 0 Data Fim Vazio() .Or. M->RGE_DATAFI >= M->RGE_DATAIN R S
RGE_CODPAI C 3 0 Codigo Pais @! Existcch() CCHRGE R M->RGE_RESEXT <>'2' S
RGE_CODNIF C 30 0 Codigo NIF 999999999999999999999999999999 R M->RGE_RESEXT <>'2' S
RGE_LOGRAD C 60 0 Logradouro @! R M->RGE_RESEXT <>'2' S
RGE_NUMERO C 6 0 Numero @! R M->RGE_RESEXT <>'2' S
RGE_COMPL C 25 0 Complemento @! R M->RGE_RESEXT <>'2' S
RGE_BAIRRO C 20 0 Bairro/Dist. @! R M->RGE_RESEXT <>'2' S
RGE_CODPOS C 10 0 Cod. Postal @! R M->RGE_RESEXT <>'2' S
RGE_CIDADE C 40 0 Cidade @! R M->RGE_RESEXT <>'2' S
RGE_ESTPRO C 40 0 Est./Prov. @! R M->RGE_RESEXT <>'2' S
RGE_TELEFO C 15 0 Telefone @! R M->RGE_RESEXT <>'2' S
RGE_BENREN C 3 0 Benef. Rend. 999 ValidRCC('S023', M->RGE_BENREN,1,3) S21BRA R M->RGE_RESEXT <>'2' S
RGE_TIPREN C 3 0 Rendimento 999 ValidRCC('S021', M->RGE_TIPREN,1,3) S21BRA R M->RGE_RESEXT <>'2' S
RGE_FRMTRB C 2 0 Forma Trib. 99 ValidRCC('S022',M->RGE_FRMTRB,1,2) S21BRA R M->RGE_RESEXT <>'2' S
RGE_CODRET C 4 0 Cod.Retencao 9999 NaoVazio() .And. ExistCpo("SX5","37"+M->RGE_CODRET) 37 R M->RGE_RESEXT <>'2' S
RGE_NUMID C 26 0 Num.Identif. S
RGE_BEDINI C 1 0 Disp. NIF? @! Pertence("12") R 1=Sim;2=Nao M->RGE_RESEXT <>'2' S
RGE_PAEXNI C 1 0 Pais Ex.NIF? @! Pertence("12") R 1=Sim;2=Nao M->RGE_RESEXT <>'2' S
RGE_PERCIR N 6 2 Perc. IR @E 999.99 Positivo() R M->RGE_DESCIR <>'2' .AND. M->RGE_RESEXT <>'2' S
RGE_DESCIR C 1 0 Calcula IR @! Pertence("12") R 1=Sim; 2=Nao M->RGE_RESEXT <>'2' S
RGE_DEDINS C 1 0 Deduz INSS @! Pertence("12") R 1=Sim;2=Nao M->RGE_DESCIR <>'2' .AND. M->RGE_RESEXT <>'2' S
RGE_ISNIF C 1 0 Possui NIF @! Pertence("12") R 1=Sim;2=Nao S
RGE_RESEXT C 1 0 Res.Exterior @! Pertence("12") R 1=Sim;2=Nao S
RGE_PPE C 1 0 Aderiu PPE @! Pertence("12") R 1=Sim;2=Nao S
RGE_ENCARG C 1 0 Encargos Emp @! Pertence("12") R 1=Sim;2=Nao S
RGE_CALENC C 19 0 Encargos @! GP900Valid() RGEENC R M->RGE_RESEXT != '2' .And. M->RGE_ENCARG != '2' S