- cambios de agrupadores

Contabilidad/ContabilizacionCompras.aspx.cs

@@ -54,6 +54,10 @@ public partial class Contabilidad_ContabilizacionCompras : ClsPaginas
                 //DdlProveedores.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa);
                 //DdlProveedores.DataBind();
                  
+                //CargaDatos();       
+                 
+            }
+
             DdlPersonal.DataSource = get_GlobalDTRHPersonal(UsuarioActual.CveEmpresa);
             DdlPersonal.DataBind();
 
@@ -64,10 +68,6 @@ public partial class Contabilidad_ContabilizacionCompras : ClsPaginas
             txtFechaI.Text = DateTime.Now.FirstDayOfMonth().AddMonths(-1).ToShortDateString();
             txtFechaF.Text = DateTime.Now.ToShortDateString();
 
-                //CargaDatos();       
-                 
-            }
-
             if (UsuarioActual.CveRol == 1 || UsuarioActual.CveUsuario == 17 || UsuarioActual.CveUsuario == 171 || UsuarioActual.TienePermisoProceso(221))
             {
                 TienePermisoEditar = true;

Contabilidad2/CatCuentas.aspx.vb

@@ -111,19 +111,13 @@ Partial Class Contabilidad2_CatCuentas
     End Sub
 
     Private Sub CargaMonedas()
-        'Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
-        Dim ObJConta As New ClsContabilidad
 
-
+        DdlMoneda.DataSource = GlobalDTMonedas
-        If ObJConta.GetMonedas() Then
-            DdlMoneda.DataSource = ObJConta.DtResultados
-        End If
-        ObJConta.Dispose()
         DdlMoneda.DataBind()
     End Sub
 
     Private Sub CargaAgrupadorSAT()
-        'Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
+
         Dim ObjConta As New ClsContabilidad
 
         If ObjConta.GetAgrupadoresSAT(UsuarioActual.CveEmpresa) Then