Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

Consulta ACBreSocial S5001


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

Recommended Posts

  • Solution

Aqui faz a consulta normalmente, como qualquer outro evento:

RetConsultaLote := ACBreSocial.WebServices.ConsultaLote.RetConsultaLote;

Percorre os eventos retornados:

for IndiceEvento := 0 to RetConsultaLote.RetEventos.Count - 1 do

Faz a consulta normal, ai você percorre o RetConsultaLote.RetEventos.Items[IndiceEvento].tot

for IndiceTotalizador := 0 to RetConsultaLote.RetEventos.Items[IndiceEvento].tot.Count - 1 do

Ai você checka se é o evento S-5001: 

case RetConsultaLote.RetEventos.Items[IndiceEvento].tot[IndiceTotalizador].Evento.TipoEvento of
           teS5001:
           begin             

                EvtS5001 := TS5001(RetConsultaLote.RetEventos.Items[IndiceEvento].tot[IndiceTotalizador].Evento.GetEvento);

 

                //Aí você pega as informações que desejar  

           end;

end;

  • Like 1
Link to comment
Share on other sites

  • 4 weeks later...
Em 20/02/2020 at 13:26, Paulo Aguiar Junior disse:

Aqui faz a consulta normalmente, como qualquer outro evento:

RetConsultaLote := ACBreSocial.WebServices.ConsultaLote.RetConsultaLote;

Percorre os eventos retornados:

for IndiceEvento := 0 to RetConsultaLote.RetEventos.Count - 1 do

Faz a consulta normal, ai você percorre o RetConsultaLote.RetEventos.Items[IndiceEvento].tot

for IndiceTotalizador := 0 to RetConsultaLote.RetEventos.Items[IndiceEvento].tot.Count - 1 do

Ai você checka se é o evento S-5001: 

case RetConsultaLote.RetEventos.Items[IndiceEvento].tot[IndiceTotalizador].Evento.TipoEvento of
           teS5001:
           begin             

                EvtS5001 := TS5001(RetConsultaLote.RetEventos.Items[IndiceEvento].tot[IndiceTotalizador].Evento.GetEvento);

 

                //Aí você pega as informações que desejar  

           end;

end;

Paulo, a resposta do S5001 é individual? Ou seja, funcionário por funcionário? Ou retorna informações gerais da empresa?

 

Link to comment
Share on other sites

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