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

mejoras en carga de excel

Browse Source
This commit is contained in:
rrene
2021-06-03 10:38:13 -07:00
parent 59713f2047
commit 2053bd2dbb
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
Contabilidad/RegPrePolizaS.aspx.vb
View File

@@ -1952,6 +1952,7 @@ Partial Class ContabilidadC_RegPrePolizaS
Dim ObjConta2 As New ClsContabilidad Dim ObjConta2 As New ClsContabilidad
If ObjConta2.GetCuentas(-1, Row("Cuenta").ToString, 1, UsuarioActual.CveEmpresa) Then If ObjConta2.GetCuentas(-1, Row("Cuenta").ToString, 1, UsuarioActual.CveEmpresa) Then
CveCuenta = ObjConta2.DtResultados.FiltroPrimeroValor("CveCuenta", "").ToEntero CveCuenta = ObjConta2.DtResultados.FiltroPrimeroValor("CveCuenta", "").ToEntero
NombreCuenta = ObjConta2.DtResultados.FiltroPrimeroValor("CtaCodigo", "")
End If End If
ObjConta2.Dispose() ObjConta2.Dispose()
'sino viene el cveconcepto, busca por le nombre del concepto 'sino viene el cveconcepto, busca por le nombre del concepto