catalogo clasificaciones comprobaciones filtro tipos

This commit is contained in:
Rakcsle Supertramp
2020-04-29 20:09:17 -07:00
parent 6dafc4732b
commit 2fdcfc2ff7
3 changed files with 43 additions and 2 deletions

View File

@@ -33,11 +33,12 @@ Partial Class Gral_CatClasificacionesComprobaciones
Protected Sub CargaGridClasificaciones()
Dim ObjClasificaciones As New ClsClasificaciones()
If ObjClasificaciones.GetClasificacionesComprobaciones(UsuarioActual.CveEmpresa, 2) Then
If ObjClasificaciones.GetClasificacionesComprobaciones(UsuarioActual.CveEmpresa, 2, DdlEstadosComprobaciones.SelectedValue.ToEntero) Then
GvClasificaciones.DataSource = ObjClasificaciones.DtResultados
GvClasificaciones.DataBind()
End If
ObjClasificaciones.Dispose()
UpDatos.Update()
End Sub
Private Sub LbAgregarClasificacion_Click(sender As Object, e As EventArgs) Handles LbAgregarClasificacion.Click
@@ -75,4 +76,7 @@ Partial Class Gral_CatClasificacionesComprobaciones
Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs)
CargaGridClasificaciones()
End Sub
End Class