Jump to content
Notícias do ACBr

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

logos

Texto.png

p200

Recommended Posts

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 post
Share on other sites
Guest
This topic is now closed to further replies.
×
×
  • Create New...