Jump to content

dev botao

SPED ECF - Leiaute 7.0


SG Sistemas
  • Este tópico foi criado há 1305 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

Boa tarde,

Fiz algumas alterações para tratar do Leiaute 7.0. Manual disponível em: http://sped.rfb.gov.br/arquivo/download/5717

ACBRECFBlocos.pas
acrescentado ECFVersao700 em:
- Type TACBrECFCodVer = (ECFVersao100, ECFVersao200, ECFVersao300, ECFVersao400, ECFVersao500, ECFVersao600, ECFVersao700);
- function CodVerToStr(AValue: TACBrECFCodVer): string;
- function StrToCodVer(const AValue: string): TACBrECFCodVer;

ACBrECFBloco_0_Class.pas
acrescentado ECFVersao700 em:
- procedure TBloco_0.WriteRegistro0010;
- procedure TBloco_0.WriteRegistro0020;

ACBrECFBloco_Y_Class.pas
acrescentado ECFVersao700 na procedure TBloco_Y.WriteRegistroY800;

 

Seguem em anexo, arquivos alterados para verificação e commit nos fontes.

 

ACBrECFBloco_0_Class.pas ACBrECFBloco_Y_Class.pas ACBrECFBlocos.pas

  • Like 2
Link to comment
Share on other sites

  • Este tópico foi criado há 1305 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Guest
This topic is now closed to further replies.
×
×
  • 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.

The popup will be closed in 10 seconds...