diff --git a/Contabilidad/ContabilidadElectronica.aspx.vb b/Contabilidad/ContabilidadElectronica.aspx.vb
index 532a8f03e..aa70c004f 100644
--- a/Contabilidad/ContabilidadElectronica.aspx.vb
+++ b/Contabilidad/ContabilidadElectronica.aspx.vb
@@ -121,16 +121,16 @@ Partial Class Contabilidad_ContabilidadElectronica
             For Each Dr As DataRow In DtCuentas.Rows
                 Str.Append("<catalogocuentas:Ctas ")
                 If UsuarioActual.Empresa.TipoContabilidad = 1 Then
-                    Str.AppendFormat("CodAgrup=""{0}"" ", Dr("AgrupadorSAT").ToString)
+                    Str.AppendFormat("CodAgrup=""{0}"" ", Dr("CodigoSAT").ToString)
                     Str.AppendFormat("NumCta=""{0}"" ", Dr("Codigo").ToString)
-                    Str.AppendFormat("Desc=""{0}"" ", Dr("Nombre").ToString)
+                    Str.AppendFormat("Desc=""{0}"" ", HttpUtility.HtmlEncode(Dr("Nombre").ToString))
                     Str.AppendFormat("SubCtaDe=""{0}"" ", Dr("CodigoPadre").ToString)
                     Str.AppendFormat("Nivel=""{0}"" ", Dr("Nivel").ToString)
                     Str.AppendFormat("Natur=""{0}"" ", Dr("Tipo").ToString)
                 Else
                     Str.AppendFormat("CodAgrup=""{0}"" ", Dr("CodAgrup").ToString)
                     Str.AppendFormat("NumCta=""{0}"" ", Dr("NumCta").ToString)
-                    Str.AppendFormat("Desc=""{0}"" ", Dr("Desc").ToString)
+                    Str.AppendFormat("Desc=""{0}"" ", HttpUtility.HtmlEncode(Dr("Desc").ToString))
                     Str.AppendFormat("SubCtaDe=""{0}"" ", Dr("SubCtaDe").ToString)
                     Str.AppendFormat("Nivel=""{0}"" ", Dr("Nivel").ToString)
                     Str.AppendFormat("Natur=""{0}"" ", Dr("Natur").ToString)