Ir para conteúdo
  • Cadastre-se

dev botao

Consulta ACBreSocial S5001


Ver Solução Respondido por Paulo Aguiar Junior,
  • Este tópico foi criado há 1473 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;

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • 4 semanas depois ...
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 para o comentário
Compartilhar em outros sites

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