AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Compilación

Browse Source
This commit is contained in:
rakcsle
2023-08-24 17:53:05 -07:00
parent e0800e68d2
commit 435a92dea3
12 changed files with 86 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
RH/CatCursosCapacitadores.aspx.vb
View File

@@ -145,8 +145,8 @@ Partial Class RH_CatCursosCapacitadores
Dim objRH As New ClsRH
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim activo As Boolean = 0
Dim CveCapacitador As Integer = GvRow.DataKey("CveCapacitador")
Dim activo As Boolean = False
Dim CveCapacitador As Integer = GvRow.DataKey("CveCapacitador").ToEntero
If objRH.CapacitadorRemove(CveCapacitador) Then
CargadatosGvCapacitador()
@@ -162,18 +162,18 @@ Partial Class RH_CatCursosCapacitadores
Public Sub Edit_ClickCapacitador(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim activo As Boolean = 0
Dim activo As Boolean = False
LtlTituloModalCapacitadores.Text = "Editar Capacitador"
Actualizar = True
CveCapaciatador = GvRow.DataKey("CveCapacitador")
CveCapaciatador = GvRow.DataKey("CveCapacitador").ToEntero
TxtCapacitador.Text = GvRow.DataKey("Capacitador")
TxtEspecialidades.Text = GvRow.DataKey("Especialidades")
TxtCedula.Text = GvRow.DataKey("Cedula")
ChkEstatus.Checked = GvRow.DataKey("Estatus")
chkExterno.Checked = GvRow.DataKey("Externo")
ChkEstatus.Checked = Boolean.Parse(GvRow.DataKey("Estatus"))
chkExterno.Checked = Boolean.Parse(GvRow.DataKey("Externo"))
BtnAgregarCapacitadorModal.Text = "Actualizar"