Olá a todos.
Estou tentando importar arquivos SPED EFD-Contribuições e Sped-Fiscal mas estou tendo problemas para ler o Bloco 0 Registro 150.
A função SpedFiscal.Bloco_0.Registro0150Count retorna zero sempre e dentro do arquivo (que já foi validado pela Sefaz) existem estes registros como abaixo descrevo.
|0150|FOR000000008|DOANDO DISTRIBUIDORA LTDA|1058|32254261000228||1770119075|4303103||R. DO SANTO NASCIMENTO|90||DISTRITO INDUSTRIAL|
|0150|FOR000000009|PARAMIM S.A|1058|82949812000171||250864877|4216909||RUA DO DENTISTA|475||PADRE FRANCISCO|
|0150|FOR000000011|COOPERATIVA SANTO AMARO LTDA|1058|88388357003001||0250317821|4305108||R IRMAO JOSE|20||SANTA FAMILIA|
Estou fazendo o seguinte codigo:
For Linha := 0 To DM.SpedContribuicao.Bloco_0.Registro0150Count - 1 Do
Begin
LocaldeDestino := DM.SpedContribuicao.Bloco_0.Registro0150New.COD_PART;
End;
O que pode estar acontecendo? Desde já agradeço a atenção de todos.