Jump to content

Delphi chamada_delphi.png acbr.png

C6 chamada_c6.png botao.png

Alterar S2300 campo natAtividade não pode ser informado para determinadas categorias


EdmarFrazao
Go to solution Solved by Italo Giurizzato Junior,
  • Este tópico foi criado há 1496 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

o campo natAtividade não deve ser informado para as categorias.

de:

   Gerador.wCampo(tcStr, '', 'natAtividade',  1,  1, 0, ord(obj.natAtivididade) + 1);

para

  if      obj.codCateg=305 Then  //Servidor Publico Indicado a Conselho
  else if obj.codCateg=721 Then  //Diretor não empregado com FGTS
  else if obj.codCateg=722 Then  //Diretor não empregado sem FGTS
  else if obj.codCateg=771 Then  //Membro conselho tutelar
  else if obj.codCateg=901 Then  //Estagiario
  else
   Gerador.wCampo(tcStr, '', 'natAtividade',  1,  1, 0, ord(obj.natAtivididade) + 1);

 

pcesS2300.pas

Evento 2300 enviado com sucesso Categorias

721,722 e 701 , antigas categorias 11 e 13 da Sefip.

ps. So testei com este por enquanto

Link to comment
Share on other sites

  • 1 month later...

Olá Italo.

Está alteração ainda não está no repositório.

Gostaria de deixar uma sugestão para mudar os if-else vazios para :

  if (
    (obj.codCateg <> 305) and // Servidor Publico Indicado a Conselho
    (obj.codCateg <> 721) and // Diretor não empregado com FGTS
    (obj.codCateg <> 722) and // Diretor não empregado sem FGTS
    (obj.codCateg <> 771) and // Membro conselho tutelar
    (obj.codCateg <> 901)        // Estagiario
  then
    Gerador.wCampo(tcStr, '', 'natAtividade',  1,  1, 0, eSNatAtividadeToStr(obj.natAtivididade));

Segue em anexo uma unit corrigida se ajudar.

pcesS2300.pas

Edited by croscato
Link to comment
Share on other sites

  • 3 weeks later...

Olá Italo.

Hoje ao fazer as atualização do ACBr percebi que a unit do S-2306 que te enviei contém um erro.

Veja o else no código abaixo.

  if
    (Self.FideTrabSemVinc.codCateg <> 305) and // Servidor Publico Indicado a Conselho
    (Self.FideTrabSemVinc.codCateg <> 721) and // Diretor não empregado com FGTS
    (Self.FideTrabSemVinc.codCateg <> 722) and // Diretor não empregado sem FGTS
    (Self.FideTrabSemVinc.codCateg <> 771) and // Membro conselho tutelar
    (Self.FideTrabSemVinc.codCateg <> 901) and // Estagiario
    (obj.natAtividade <> navNaoInformar)
  then
  else
    Gerador.wCampo(tcStr, '', 'natAtividade',  1,  1, 0, eSNatAtividadeToStr(obj.natAtividade));

Estou anexando novamente a unit correta. Peço desculpas pelo inconveniente.

pcesS2306.pas

Link to comment
Share on other sites

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

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.