inicial registro revision

AF/RegistroRevision.aspx.vb

@@ -0,0 +1,74 @@
+Option Explicit On
+Option Strict On
+
+Imports System.Data
+Imports Extensiones
+Imports Microsoft.Reporting.WebForms
+
+Partial Class AF_RegistroRevision
+    Inherits ClsPaginas
+
+#Region " PROPIEDADES"
+
+#End Region
+
+    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
+        If Not Page.IsPostBack Then
+
+            CargaCombos()
+
+            CargaDatos()
+
+        End If
+    End Sub
+
+
+#Region " CARGA PARAMETROS "
+
+#End Region
+
+#Region "  CARGA COMBOS  "
+    Protected Sub CargaCombos()
+        CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyecto)
+    End Sub
+
+
+#End Region
+
+#Region "  CARGA DATOS  "
+    Protected Sub BtnFiltrar_Click(sender As Object, e As EventArgs)
+        CargaDatos()
+
+    End Sub
+
+
+#End Region
+
+#Region "  GV DATOS  "
+
+    Private Sub CargaDatos()
+
+        Dim ObjAF As New ClsAF
+
+
+        ObjAF.Dispose()
+
+    End Sub
+
+
+    Protected Sub GvDatos_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvDatos.RowDataBound
+
+        If e.Row.RowType = DataControlRowType.DataRow Then
+
+
+
+        End If
+
+    End Sub
+
+#End Region
+
+
+
+
+End Class