SPED

[Bruno Cezar Arcanjo Braga]

Olá.

Estou tentando gerar o arquivo para SPED e estou encontrando a seguinte mensagem: Informe a data inicial das informações contidas no arquivo!

Porém, creio que estou passando os valores corretamente.

  with SPED.Bloco_0 do
    begin
      with Registro0000New do
        begin
          COD_VER := vlVersao202;

          if rbOriginal.Checked then
            TIPO_ESCRIT := tpEscrOriginal
          else
            TIPO_ESCRIT := tpEscrRetificadora;

          IND_SIT_ESP := indNenhum;
          DT_INI := StrToDate('01/' + EditDataBase.Text);
          DT_FIN := EndOfTheMonth(StrToDate('01/' + EditDataBase.Text));

 

Atualizei o ACBr hoje e depois disso não consegui mais gerar o arquivo.

Obrigado.

[Bruno Cezar Arcanjo Braga]

Comentei as linhas 420, 421, 423 e 424 na unit ACBrSpedPisCofins e o arquivo foi gerado corretamente e validado no programa da Receita.

//  if FDT_INI = 0 then
//    raise Exception.Create(ACBrStr('Informe a data inicial das informações contidas no arquivo!'));

//  if FDT_FIN = 0 then
//    raise Exception.Create(ACBrStr('Informe a data final das informações contidas no arquivo!'));

Seria um bug?

Detalhe é que aqui validou corretamente:

FACBrTXT.Check(DayOf(FDT_INI) = 1, 'CHECAGEM INICIAL: A data inicial deve '
    + 'corresponder ao primeiro dia do mês informado!');

Utilizo Delphi 2007.

Obrigado.

Editado 13 Julho, 2018 por Bruno Cezar Arcanjo Braga

[Juliomar Marchetti]

Estranho pois N pessoas usam a tempos o componente e não tiveram problemas. 

chegou a chegar como está usando? chegou a testar com o exemplo do svn?

[Bruno Cezar Arcanjo Braga]

Eu também gerava corretamente até atualizar o ACBr.

O exemplo do SVN gerou sem a mesnagem.

O que mais me causa estranheza, é que se eu comentar a validação  if FDT_INI = 0 then, a rotina segue corretamente e valida sem problemas FACBrTXT.Check(DayOf(FDT_INI) = 1, 'CHECAGEM INICIAL: A data inicial deve '
    + 'corresponder ao primeiro dia do mês informado!');. O que indica que  FDT_INI tem uma data correta.

Vou analisar mais um pouco e ver o que consigo.

Obrigado.

 

Apenas para registro, encontrei esse erro ao abrir o exemplo:

[Juliomar Marchetti]

Sim não deve estar atualizado quanto as propriedades que já não existem mais.