31/01/2025

-- ACBrCTe.XmlWriter --
[*] Correção para alguns campos do ICMS que são opcionais e estavam como obrigatórios.
   Por: devFortes/Italo Giurizzato Junior


git-svn-id: https://svn.code.sf.net/p/acbr/code/trunk2@37158 6e92efe7-b92a-0410-a9ec-f9e4e41bb3a6

Fontes/ACBrDFe/ACBrCTe/ACBrCTe-change-log.txt

@@ -45,6 +45,9 @@ S
 [-]     : Corre��o de Bug (assim esperamos)
 
 31/01/2025
+-- ACBrCTe.XmlWriter --
+[*] Corre��o para alguns campos do ICMS que s�o opcionais e estavam como obrigat�rios.
+   Por: devFortes/Italo Giurizzato Junior
 -- ACBrCTeConhecimentos, pcteConversaoCTe --
 [*] #Tk-6521 - Altera o tipo dos enumerados TpcteTipoDataPeriodo e TpcteTipoHorarioIntervalo de n�o preenchido e N para -1
   Por: Diego Folieni

Fontes/ACBrDFe/ACBrCTe/Base/ACBrCTe.XmlWriter.pas

@@ -1491,7 +1491,7 @@ function TCTeXmlWriter.Gerar_CST60: TACBrXmlNode;
   Result.AppendChild(AddNode(tcDe2, '#233', 'pICMSSTRet', 1, 5, 1,
                                     CTe.Imp.ICMS.ICMS60.pICMSSTRet, DSC_PICMS));
 
-  Result.AppendChild(AddNode(tcDe2, '#234', 'vCred', 1, 15, 1,
+  Result.AppendChild(AddNode(tcDe2, '#234', 'vCred', 1, 15, 0,
                                          CTe.Imp.ICMS.ICMS60.vCred, DSC_VCRED));
 
   if CTe.Imp.ICMS.ICMS60.vICMSDeson > 0 then
@@ -1511,7 +1511,7 @@ function TCTeXmlWriter.Gerar_CST90: TACBrXmlNode;
   Result.AppendChild(AddNode(tcStr, '#236', 'CST', 2, 2, 1,
                                CSTICMSTOStr(CTe.Imp.ICMS.ICMS90.CST), DSC_CST));
 
-  Result.AppendChild(AddNode(tcDe2, '#237', 'pRedBC', 1, 5, 1,
+  Result.AppendChild(AddNode(tcDe2, '#237', 'pRedBC', 1, 5, 0,
                                        CTe.Imp.ICMS.ICMS90.pRedBC, DSC_PREDBC));
 
   Result.AppendChild(AddNode(tcDe2, '#238', 'vBC', 1, 15, 1,
@@ -1523,7 +1523,7 @@ function TCTeXmlWriter.Gerar_CST90: TACBrXmlNode;
   Result.AppendChild(AddNode(tcDe2, '#240', 'vICMS', 1, 15, 1,
                                          CTe.Imp.ICMS.ICMS90.vICMS, DSC_VICMS));
 
-  Result.AppendChild(AddNode(tcDe2, '#241', 'vCred', 1, 15, 1,
+  Result.AppendChild(AddNode(tcDe2, '#241', 'vCred', 1, 15, 0,
                                          CTe.Imp.ICMS.ICMS90.vCred, DSC_VCRED));
 
   if CTe.Imp.ICMS.ICMS90.vICMSDeson > 0 then