IniciarApuracao()
O primeiro passo para gerar o arquivo SPED é iniciar uma apuração. Para fazer isso, utilizaremos o método IniciarApuracao.
Método
IniciarApuracao(): IspdRetIniciarApuracao;
Retorno
Este método retornará um objeto do tipo IspdRetIniciarApuracao com os seguintes atributos:
- Protocolo
- Mensagem
Requisitos
Para iniciar uma apuração, é necessário ter configurado corretamente algumas propriedades do componente:
- NomeArquivo
- DataInicio
- DataFim
- CNPJEmissor
Exemplos
Delphi
var
Retorno: IspdRetIniciarApuracao;
begin
SPED.NomeArquivo := 'NomeDoArquivo.txt';
SPED.DataInicio := '01/01/2018';
SPED.DataFim := '30/11/2018';
SPED.CnpjEmissor := '11111111111111';
Retorno := SPED.IniciarApuracao();
mmRetorno.Lines.Add(' Retorno:');
mmRetorno.Lines.Add(' Protocolo: ' + Retorno.Protocolo);
mmRetorno.Lines.Add(' Mensagem: ' + Retorno.Mensagem);
C#
SpedClientX.IspdRetIniciarApuracao Retorno;
Sped.NomeArquivo = "NomeDoArquivo.txt";
Sped.DataInicio = "01/01/2018";
Sped.DataFim = "30/11/2018";
Sped.CnpjEmissor = "11111111111111";
Retorno = Sped.IniciarApuracao();
mmRetorno.Text = "Retorno:" + Environment.NewLine;
mmRetorno.Text += " Protocolo: " + Retorno.Protocolo + Environment.NewLine;
mmRetorno.Text += " Mensagem: " + Retorno.Mensagem + Environment.NewLine;
Visual Basic 6
Dim Retorno As IspdRetIniciarApuracao
SPED.NomeArquivo = "NomeDoArquivo.txt"
SPED.DataInicio = "01/01/2018"
SPED.DataFim = "30/11/2018"
SPED.CnpjEmissor = "11111111111111"
Set Retorno = SPED.IniciarApuracao
mmRetorno.Text = " Retorno:" & vbNewLine
mmRetorno.Text = mmRetorno.Text & " Protocolo: " & Retorno.Protocolo & vbNewLine
mmRetorno.Text = mmRetorno.Text & " Mensagem: " & Retorno.Mensagem
Comentários
0 comentário
Por favor, entre para comentar.