AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- correción y encode

Browse Source
This commit is contained in:
rrene
2023-11-04 09:01:03 -07:00
parent 6343f21db1
commit a9ec1413fc
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Contabilidad/ContabilidadElectronica.aspx.vb
View File

@@ -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)