agregando catClasificacionPorcentaje, falta integrar en ClsPaginas

This commit is contained in:
Antonio Gonzalez
2020-01-08 18:36:20 -07:00
parent 61c38ed6d1
commit d60bf17132
3 changed files with 243 additions and 133 deletions

View File

@@ -0,0 +1,24 @@
Imports System.Data
Imports Extensiones
Imports Microsoft.Reporting.WebForms
Partial Class Contabilidad_CatClasificacionPorcentaje
Inherits ClsPaginas
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaDatos()
End If
End Sub
Protected Sub CargaDatos()
Dim ObjGenerales As New ClsGenerales
If ObjGenerales.GetClasificacionPorcentaje(UsuarioActual.CveEmpresa, CveClasificacionPorcentaje:=-1, CveClasificacion:=-1, PorcentajeIVA:=-1, Opcion:=2) Then
GvDatos.DataSource = ObjGenerales.DtResultados
End If
ObjGenerales.Dispose()
GvDatos.DataBind()
End Sub
End Class