Campo Ind_Sit_Esp No Bloco 0 Spedcontabil

[piubello]

Na function TBloco_0.WriteRegistro0000 que fica na unit ACBrECDBloco_0_Class está retornando desse forma: 

Result := LFill('0000') +

                 LFill('LECD') +

                 LFill(DT_INI) +

                 LFill(DT_FIN) +

                 LFill(NOME) +

                 LFill(CNPJ) +

                 LFill(UF) +

                 LFill(IE) +

                 LFill(COD_MUN, 7) +

                 LFill(IM) +

                 LFill(IND_SIT_ESP, 1) +

                 Delimitador +

                 #13#10;

E dessa forma o campo IND_SIT_ESP se estiver em branco, ele vai para o Sped como '0'. Este campo deve deve receber o valor de 0 até 4 apenas se houve uma situação especial, caso contrário, deverá ficar "vazio"n conforme exemplificado na página 33 do manual do sped (http://www1.receita.fazenda.gov.br/sistemas/sped-contabil/download/Manual_de_Orientacao_da_ECD.pdf).

 

Ajustei o código para atender a regra e o código ficou assim:

Result := LFill('0000') +

                 LFill('LECD') +

                 LFill(DT_INI) +

                 LFill(DT_FIN) +

                 LFill(NOME) +

                 LFill(CNPJ) +

                 LFill(UF) +

                 LFill(IE) +

                 LFill(COD_MUN, 7) +

                 LFill(IM) +

                 IND_SIT_ESP +

                 Delimitador +

                 #13#10;

 

Espero com isso, ajudar mais pessoas.

[Juliomar Marchetti]

Boa tarde

0 a 4 ou 0 a 5?

pois estive olhando o link do pdf e na página 31 vai até o número 5!

 

O que me diz de criar um enumerador? igualmente existe no Fiscal e Contribuições?

onde um deles é o tipo nenhum e  restante é ao que corresponde a tabela !