Tabela
SR8 Controle de Ausencias
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
R8_FILIAL C 2 0 Filial S
R8_MAT C 6 0 Matricula 999999 NaoVazio() .And. EXISTCHAV("SRA") .And. Val(M->R8_MAT) > 0 S
R8_DATA D 8 0 Dt.Alteracao NaoVazio() S
R8_TIPO C 1 0 Tipo Afastam @! NaoVazio() .And. EXISTCPO("SX5","30"+M->R8_TIPO) .And. Pertence("FOPQRXYZW18VB67D") .And. A240NumDias() 30 S
R8_SEQ C 3 0 Sequencia R S
R8_TIPOAFA C 3 0 Cod. Ausenc. @! NaoVazio() .and. ExistCpo("RCM") .and. Gp240ValAfa() RCMBRA R gp240VerEdit() S
R8_DESCTP C 75 0 Descricao @! V S
R8_PD C 3 0 Cod. Verba @! Vazio() .or. ExistCpo("SRV") SRV R gp240VerEdit() S
R8_DATAINI D 8 0 Dt. Afastam. NaoVazio() .and. A240NumDias() gp240VerEdit() S
R8_DURACAO N 5 0 Num. Dias @E 99999 gp240DurValid() R gp240RevEdit() S
R8_AFARAIS C 2 0 Afast. RAIS 99 R #fBoxRAIS() S
R8_DATAFIM D 8 0 Dt.Fim Afas. A240NumDias() gp240RevEdit() S
R8_CONTAFA C 3 0 Nr.Sequencia 999 Vazio() .or. aContAfaVal() Gp240VerEdit() S
R8_DIASEMP N 5 0 Dias Empresa 99999 R S
R8_DPAGAR N 5 0 Dias a Pagar 99999 R S
R8_SDPAGAR N 5 0 Saldo Dias 99999 R S
R8_DPAGOS N 5 0 Dias Pagos 99999 R gp240VerEdit() S
R8_CONTINU C 1 0 Cont.Afa.Ant @! NaoVazio() .and. A240NumDias() .and. a240Mov() R 1=Sim;2=Nao S
R8_CID C 10 0 Cod.Int.Doen @! ExistCpo( "TMR", M->R8_CID ) TMR R S
R8_CODCAT C 13 0 Cod.Com. CAT @R 9999999999-9/99 R S
R8_DTCAT D 8 0 Dt. Reg. CAT R S
R8_MEMO M 80 0 Desc. Det. @! V gp240VerEdit() S
R8_CODMEMO C 6 0 Codigo Memo @! R gp240VerEdit() S
R8_SDODIAS N 7 2 Saldo Dias @E 9,999.99 V S
R8_STATUS C 1 0 Status @! R C=Calculado;R=Reversao;T=Retroativo gp240VerEdit() S
R8_NUMID C 26 0 Num.Identif. R S
R8_PROCES C 5 0 Cod.Processo @! R S
R8_PER C 6 0 Cod.Per.Inic @! RCH R S
R8_NUMPAGO C 2 0 Num. Pagto @! RCH R gp240VerEdit() S
R8_EMPPG C 1 0 Empresa Paga @! Pertence("12") R R8EMPPGWHEN() S
R8_CODRPAT C 4 0 Reg.Patronal @! ExistCpo("RCO") GF0 R gp240VerEdit() S
R8_DTBLEG D 8 0 Dt.Bas.Legal R S
R8_CODTPA C 6 0 Cod. Tpa. @! R S
R8_RHEXP C 6 0 Contr.Exp.RH R S
R8_OBSAFAS C 200 0 Inf. Compl. @! R S
R8_TPEFD C 2 0 Motivo Afast @! ValidRCC("S048",RCM->RCM_TPEFD,1,2) S48 R S
R8_TIPOAT C 1 0 Tp Ac Trans. @! (VAZIO() .OR. (Pertence("123 "))) R 1=Atropelamento;2=Colisao;3=Outros fGP240Edit() S
R8_OBSTPA M 60 0 Obs.Tp.Afast @! V fGP240Edit() S
R8_NMMED C 80 0 Nm Emitente @! R fGP240Edit() S
R8_CRMMED C 14 0 Insc Emitent @! R fGP240Edit() S
R8_UFCRM C 2 0 Cod. UF @! VAZIO() .OR. (EXISTCPO("SX5", "12" + M->R8_UFCRM)) 12 R fGP240Edit() S
R8_CNPJCES C 14 0 CNPJ Cession @R 99.999.999/9999-99 R fGP240Edit() S
R8_TPCES C 1 0 Tp Onus Cess @! (VAZIO() .OR. (Pertence("123 "))) R 1=Onus do Cedente;2=Onus do Cessionario;3=Onus do Cedente e Cessionario; fGP240Edit() S
R8_CNPJSIN C 14 0 CNPJ Sindica @R 99.999.999/9999-99 R fGP240Edit() S
R8_TPSIND C 1 0 Tp Onus Sind @! (VAZIO() .OR. (Pertence("123 "))) R 1=Onus Empregador;2=Onus Sindicato;3=Dif.Salarial paga pelo Sindicato; fGP240Edit() S
R8_PROADIC C 1 0 Calc Pr Adic Pertence(" 12") R 1=Sim;2=Nao S
R8_INTGTAF D 8 0 Integ TAF S
R8_TPEFDAN C 2 0 Mot Anterior @! R S
R8_EFDRETR C 1 0 Info Retroat @! Pertence("12") R 1=Sim;2=Nao S
R8_ORIGALT C 1 0 Orig Alterac @! Pertence("123") 1=Por iniciativa do empregador;2=Revisao Administrativa;3=Determinacao Judicial S
R8_NRPRCJU C 21 0 Processo Jud @! R S
R8_TPPROC C 1 0 Tp. Processo 9 Vazio() .Or. Pertence("123") R 1=Administrativo;2=Judicial;3=Numero do Beneficio (NB) do INSS S
R8_TAFKA C 60 0 TAFKey Alter R S
R8_TAFKI C 60 0 TAFKeyInicio @! R S
R8_TAFKF C 60 0 TAFKeyFinal @! R S
R8_IDEOC C 1 0 Org.Classe 9 Vazio() .Or. Pertence("123") R 1=CRM;2=CRO;3=RMS fGP240Edit() S
R8_FILSUB C 2 0 Fil. Substit vazio() .or. ExistCpo("SM0",cEmpAnt+M->R8_FILSUB) XM0 R S
R8_MATSUB C 6 0 Matr.Substit 999999 vazio() .or. ExistCpoRh("SRA",M->R8_MATSUB,1,GDFieldGet("R8_FILSUB")) .AND. VldSubst(GDFieldGet("R8_FILSUB"),M->R8_MATSUB) SRAFIL S
R8_GEDOC C 20 0 Nr GEDOC @ R S
R8_DTER D 8 0 Data Ef Retr R Iif(FindFunction('fWhenDtEr'),fWhenDtEr(),.T.) S
R8_DATALT D 8 0 Dt. Alt. Mot R S