Jump to content

dev botao

Obrigatoriedade do campo tipo de avaliação do agente nocivo e grupo epcEpi


guilhermeVaz06
Go to solution Solved by Curitiba Computer Ltda,
  • Este tópico foi criado há 962 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Bom dia, estou com uma duvida em relação a tag tpAval do grupo agNoc e o grupo epcEpi

Ao enviar o agente nocivo '09.01.001' - 'Ausência de agente nocivo ou de atividades previstas no Anexo IV do Decreto 3.048/1999'

O web service me retorna a seguinte mensagem:

image.png.555987619871da118c01f205f0e8d00a.png

 

De acordo com o leiautes do eSocial v. S-1.0 a tag tpAval é obrigatória e o grupo epcEpi também conforme as imagens abaixo:

image.thumb.png.8468eeef2114ae166c7282ea33559047.png

image.thumb.png.d374cfed8e872cd6d79f92c7fb60a11a.png

Como devo prosseguir?

 

Em anexo estou mandando um exemplo de XML.

S-2240-0.xml

Link to comment
Share on other sites

  • Solution

bom dia colega, veja como funciona o envio..

          with AgNoc.New do
          begin
            codAgNoc:= [aqui voce coloca a informação relacaionada ao codagnoc

            if (aqui voce verifica se é <> '09.01.001') then
            begin
              dscAgNoc:= xx;
              tpAval:= xx;
              intConc:= xx;
              limTol:= xx;
              unMed:= xx;
              tecMedicao:= xx;

              with EpcEpi do
              begin
                utilizEpc:= tpUtilizEPC (aqui vce informa o tipo da utilizacao do epc);

                if (utilizepc > 0) then // se for maior que zero, voce envia, senao ....
                begin
                  eficEpc:= tpSimNao (eficepc);
                end;

                utilizEpi:= tpUtilizEpi (utilizepi);
                if (utilizepi > 0) then // se > 0 voce envia
                begin
                  while (not q2.eof) do
                  begin
                    with Epi.New do
                    begin
                      caepi:= xx;
                      dscepi:= xx;
                      eficepi:= tpSimNaoFacultativo (eficepi);
                    end;

                    with EpiCompl do
                    begin
                      medprotecao:= tpSimNaoFacultativo (medprotecao);
                      condfuncto:= tpSimNaoFacultativo (condfuncto);
                      usoinint:= tpSimNaoFacultativo (usoinint);
                      przvalid:= tpSimNaoFacultativo (przvalid);
                      periodictroca:= tpSimNaoFacultativo (periodictroca);
                      higienizacao:= tpSimNaoFacultativo (higienizacao);
                    end;

                    .next;
                  end;
                end;
              end;
            end;

abraço...

 

  • Like 2
Link to comment
Share on other sites

  • Este tópico foi criado há 962 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.