EnviarLoteEventos(aTX2Content, aIdGrupoEventos)

Para enviar o lote de eventos à SEFAZ, utilizaremos o método EnviarLoteEventos.

Método

EnviarLoteEventos(aXmlLote: String):IspdReinfRetEnviarLoteEventos

Argumento	Tipo	Detalhes
aXmlLote	String	Conteúdo de um XML com assinatura digital

Este método retornará um objeto do tipo IspdRetEnviarLoteEventos com os seguintes atributos:

var

Retorno: IspdReinfRetEnviarLoteEventos;

begin

Retorno := Reinf.EnviarLoteEventos(mmRetorno.Text);

mmRetorno.Lines.Add(' Retorno:');

mmRetorno.Lines.Add(' ID Lote: ' + Retorno.IdLote);

mmRetorno.Lines.Add(' Mensagem: ' + Retorno.Mensagem);

ReinfClientX.IspdReinfRetEnviarLoteEventos Retorno;

Retorno = Reinf.EnviarLoteEventos(mmRetorno.Text);

mmRetorno.Text = "Retorno:" + Environment.NewLine;

mmRetorno.Text += " ID do lote: " + Retorno.IdLote + Environment.NewLine;

mmRetorno.Text += " Mensagem: " + Retorno.Mensagem + Environment.NewLine;

Dim Retorno As spdReinfRetEnviarLoteEventos

Set Retorno = Reinf.EnviarLoteEventos(mmRetorno.Text)

mmRetorno.Text = " Retorno:" & vbNewLine

mmRetorno.Text = mmRetorno.Text & " ID do lote: " & Retorno.IdLote & vbNewLine

mmRetorno.Text = mmRetorno.Text & " Mensagem: " & Retorno.Mensagem