Ir para conteúdo
  • Cadastre-se

dev botao

Ajuste no Campo tpDep Conforme Tabela 7


Ver Solução Respondido por Joceandro Perin,
  • Este tópico foi criado há 2487 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado (editado)

Boa tarde galera..

Conforme a Tabela 07 - Tipos de Dependente temos as seguintes opções no layout 2.4.01..


01 - Cônjuge
02 - Companheiro(a) com o(a) qual tenha filho ou viva há mais de 5 (cinco) anos ou possua Declaração de União Estável
03 - Filho(a) ou enteado(a)
04 - Filho(a) ou enteado(a), universitário(a) ou cursando escola técnica de 2º grau
06 - Irmão(ã), neto(a) ou bisneto(a) sem arrimo dos pais, do(a) qual detenha a guarda judicial
07 - Irmão(ã), neto(a) ou bisneto(a) sem arrimo dos pais, universitário(a) ou cursando escola técnica de 2° grau, do(a) qual detenha a guarda judicial
09 - Pais, avós e bisavós
10 - Menor pobre do qual detenha a guarda judicial
11 - A pessoa absolutamente incapaz, da qual seja tutor ou curador
12 - Ex-cônjuge
99 - Agregado/Outros

 

Verifiquei no fonte pcesConversaoeSocial.pas que o tpTpDep está divergente com está tabela..

tpTpDep = (tdConjuge, 
                     tdCompanheiroComFilhoOuVivaMais5Anos, 
                     tdFilhoOuEnteadoAte21Anos,
                     tdFilhoOuEnteadoUniverOuCursandoEscolaTecAte24Anos, 
                     tdFilhoOuEnteadoEmQualquerIdadeIncapFisicaOuMentalmente,
                     tdIrmaoNetoBisnetoGuardaJudicialAte21Anos, 
                     tdIrmaoNetoBisnetoAte24anosCursandoNivelSupOuEscolaTec,
                     tdIrmaoNetoBisnetoGuardaJudicialQualquerIdadeIncapFisOuMental, 
                     tdPaisAvosBisavos,
                     tdMenorPobreAte21AnosQueCrieEduqueComGuardaJudicial, 
                     tdPessoaAbsolutamenteIncapaz,
                     tdExConjugeQueRecebaPensaoAlimentos, 
                     tdAgregadoOutros);

Funções..

function eStpDepToStr(const t: tpTpDep): string;
begin
  result := EnumeradoToStr2(t,TGenericosString01_12  );
end;

function eSStrToTpDep(var ok: Boolean; const s: string): tpTpDep;
begin
  result := tpTpDep( StrToEnumerado2(ok , s, TGenericosString01_12 ));
end;


Ajustei para...

tpTpDep = (tdConjuge,  
                     tdCompanheiroComFilhoOuVivaMais5Anos, 
                     tdFilhoOuEnteado, 
                     tdFilhoOuEnteadoUniverOuEscolaTec, 
                     tdIrmaoNetoBisnetoGuardaJudicial, 
                     tdIrmaoNetoBisnetoUniverOuEscolaTecGuardaJudicial, 
                     tdPaisAvosBisavos, 
                     tdMenorPobreGuardaJudicial, 
                     tdPessoaIncapazTutorOuCurador, 
                     tdExConjuge, 
                     tdAgregadoOutros);

Funções..

function eStpDepToStr(const t: tpTpDep): string;
begin
  result := EnumeradoToStr2(t,['01', '02', '03', '04', '06', '07', '09', '10', '11', '12', '99']  );
end;

function eSStrToTpDep(var ok: Boolean; const s: string): tpTpDep;
begin
  result := tpTpDep( StrToEnumerado2(ok , s, ['01', '02', '03', '04', '06', '07', '09', '10', '11', '12', '99'] ));
end;

 

@Rafael Dias, @Juliomar Marchetti, @Italo Jurisato Junior Se puderem avaliar essa alteração.. Obrigado..

Editado por Joceandro Perin
Postado

Olá.
Eu atualizei o ACBr hoje (20/02/2018) e continua dando erro no tdFilhoOuEnteadoAte21Anos.

with EvtAdmissao.Trabalhador.Dependente.Add do
    begin
      tpDep := tdFilhoOuEnteadoAte21Anos;
      nmDep := 'Dependente 2';
      DtNascto := date;
      cpfDep := '12345678901';
      depIRRF := tpSim;
      depSF := tpNao;
      incTrab := tpNao;
    end;
 

Postado
4 minutos atrás, anderson.mendonca disse:

Olá.
Eu atualizei o ACBr hoje (20/02/2018) e continua dando erro no tdFilhoOuEnteadoAte21Anos.

with EvtAdmissao.Trabalhador.Dependente.Add do
    begin
      tpDep := tdFilhoOuEnteadoAte21Anos;
      nmDep := 'Dependente 2';
      DtNascto := date;
      cpfDep := '12345678901';
      depIRRF := tpSim;
      depSF := tpNao;
      incTrab := tpNao;
    end;
 

Alterei meu fonte e tá funcionando.
Valeu.

 

  • Este tópico foi criado há 2487 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...