-- correcci´pon de parametros

Nomina/CatSatConceptos.aspx.vb

@@ -17,14 +17,14 @@ Partial Class Nom_CatSatConceptos
 
     Public Sub CargaDatos()
         Dim GetConceptoSAT As New ClsNominas
-        If ObjConceptos.GetConceptos() Then
-            ViewState("DTConceptos") = ObjConceptos.DtResultados
-            GlobalDTNomSatConceptos = ObjConceptos.DtResultados
+        If GetConceptoSAT.GetConceptos(UsuarioActual.CveEmpresa) Then
+            ViewState("DTConceptos") = GetConceptoSAT.DtResultados
+            GlobalDTNomSatConceptos = GetConceptoSAT.DtResultados
         Else
             Me.GvDatos.DataSource = Nothing
         End If
 
-        ObjConceptos.Dispose()
+        GetConceptoSAT.Dispose()
 
         If ViewState("Orden").ToString() <> String.Empty Then
             CargaGrid(ViewState("Orden").ToString())