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

-- sincroniza las cuentas faltantes de contapaq a SIG

Browse Source
This commit is contained in:
rrene
2023-11-21 21:08:31 -07:00
parent 3f88aa7ef9
commit 3bb2b47a2c
1 changed files with 10 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Contabilidad2/CatCuentasAsignaciones.aspx.vb
View File

@@ -72,7 +72,14 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
Private Sub CargaDatosModal() Private Sub CargaDatosModal()
DdlConceptoNomina.DataSource = GlobalDTNomConceptos(UsuarioActual.CveEmpresa) DdlConceptoNomina.DataSource = GlobalDTNomConceptos(UsuarioActual.CveEmpresa)
DdlConceptoNomina.DataBind() DdlConceptoNomina.DataBind()
If UsuarioActual.Empresa.TipoContabilidad = 2 Then
Dim Con As New ClsContPAQi(UsuarioActual.Empresa)
Con.SincronizaCuentas(UsuarioActual.CveEmpresa)
Con.Dispose()
End If
Dim ObjConta As New ClsContabilidad Dim ObjConta As New ClsContabilidad
If ObjConta.GetConta_ConceptosContables() Then If ObjConta.GetConta_ConceptosContables() Then
@@ -84,7 +91,8 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
DdlCuenta.DataSource = ObjConta.DtResultados DdlCuenta.DataSource = ObjConta.DtResultados
DdlCuentaGlobal.DataSource = ObjConta.DtResultados DdlCuentaGlobal.DataSource = ObjConta.DtResultados
End If End If
ObjConta.Dispose() ObjConta.Dispose()
DdlProveedor.setEsWebService(True) 'GlobalDTCompProveedores(UsuarioActual.CveEmpresa) DdlProveedor.setEsWebService(True) 'GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
DdlClientes.setEsWebService(True) DdlClientes.setEsWebService(True)