Registro C175

[gguimp]

Estou tendo problemas nos registros C181 e C185. Se não informo nenhum valor nos campos ALIQ_PIS_QUANT, QUANT_BC_PIS, ALIQ_COFINS_QUANT E QUANT_BC_COFINS está estourando a exceção "Format '%a' invalid or incompatible with argument" na função VLFill da unit "ACBrTXTClass.pas".

Como eu não informei nada nesses campos os valores dos campos estão "unassigned". Notei que a validação se o valor é "unassigned" foi removida na revisão 7789 ficando somente a verificação se o valor é 'Null'. 

 

--- a/trunk/Fontes/ACBrComum/ACBrTXTClass.pas
+++ b/trunk/Fontes/ACBrComum/ACBrTXTClass.pas
@@ -369,8 +369,8 @@
   if Mascara <> '' then
      strCurMascara := Mascara;
 
-  // Se o parametro Nulo = true e Value = 0, será retornado '|'
-  if (Value = Null) or (Value=Unassigned) then
+  // Se o parametro Value = Null, será retornado '|'
+  if (Value = Null) then
   begin
      Result := FDelimitador;
      Exit;

Não seria correto manter a validação anterior, uma vez que Null <> unassigned <> 0 (zero)?

Editado 13 Novembro, 2014 por gguimp

[gguimp]

Atualizei os fontes e tentei novamente.

 

O arquivo foi validado sem erros, porém nos campos onde foi informado o valor 0,00, no arquivo ficou em branco.

 

Acredito que a ideia seria mostrar o campo com o valor 0.00 se informado, e em branco se Null.

 

Segue trecho do código. Quando a variant tem o valor 0.00 o teste Value = Unassigned retorna true.

 

Entendi porque não é possível fazer a verificação se valor é 'unassigned'. De acordo com os testes do BigWings 0 = Unassigned.

[Isaque Pinheiro]

Se que que saia vazio atribua NULL a propriedade
Se que que saia algum valor mesmo que seja 0 (ZERO) atribua essa valor a propriedade.

[gguimp]

Se que que saia vazio atribua NULL a propriedade

Se que que saia algum valor mesmo que seja 0 (ZERO) atribua essa valor a propriedade.

Obrigado pela sua ajuda.

[EMBarbosa]

Entendi porque não é possível fazer a verificação se valor é 'unassigned'. De acordo com os testes do BigWings 0 = Unassigned.

 

Uma pequena alteração sobre isso foi postada ao SVN. Veja o seguinte post:

[Andre Luiz Oliveira]

Senhores bom dia!!

Estou aproveitando esse tópico sobre o bloco C175 e informar sobre um erro na geração do sped pis cofins.

 

Está faltando a contabilização das linhas do registro  C175

 

if Bloco_C.RegistroC175Count > 0 then
       begin
         with New do
         begin
           REG_BLC := 'C175';
           QTD_REG_BLC := Bloco_C.RegistroC175Count;
         end;
       end;

Só adicionar o comando após a geração das linhas do bloco C170 e o pva para de acusar o erro da contagem de linhas para o registro 9900.

 

Unit para realizar a alteração ACBrSpedPisCofins.

 

Grato

[Isaque Pinheiro]

Seu fonte está bem desatualizado, pois essa linha já existe, olhei nos dois repositórios Trunk e Trunk2

Editado 25 Agosto, 2015 por Isaque Pinheiro

[Andre Luiz Oliveira]

Isaque você tem toda razão.

Como usamos o acbr no versionamento do fonte o mesmo se encontra desatualizado.

 

Peço imensamente desculpas pelo ocorrido.

 

Grato