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

-- option strict on

Browse Source
This commit is contained in:
rrene
2023-08-25 07:35:45 -07:00
parent 7789b60482
commit 6ac06a9649
21 changed files with 76 additions and 76 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
RH/CatEstatusPersonal.aspx.vb
View File

@@ -165,7 +165,7 @@ Partial Class RH_CatEstatusPersonal
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) 'obtenemos el renglon que acabamos de seleccionar
PersonalEstatTxt.Text = GvRow.DataKey("EstatusPersonal")
ChkEstatus.Checked = If(GvRow.DataKey("Estatus") = "Activo", True, False)
CveEstatusPerAEditar = GvRow.DataKey("CveEstatusPersonal") 'Guardamos en una propiedad el id del registro del cual haremos cambios, se guarda y se utiliza en el metodo "GvDatos_RowUpdating"
CveEstatusPerAEditar = GvRow.DataKey("CveEstatusPersonal").ToEntero 'Guardamos en una propiedad el id del registro del cual haremos cambios, se guarda y se utiliza en el metodo "GvDatos_RowUpdating"
UpDatos.Update()
If ViewState("Orden").ToString() <> String.Empty Then

2
RH/CatMotivoBaja.aspx.vb
View File

@@ -166,7 +166,7 @@ Partial Class RH_CatMotivoBaja
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) 'obtenemos el renglon que acabamos de seleccionar
MotivoTxt.Text = GvRow.DataKey("MotivoBaja")
ChkEstatus.Checked = If(GvRow.DataKey("Estatus") = "Activo", True, False)
CveMotivoBajaAEditar = GvRow.DataKey("CveMotivoBaja") 'Guardamos en una propiedad el id del registro del cual haremos cambios, se guarda y se utiliza en el metodo "GvDatos_RowUpdating"
CveMotivoBajaAEditar = GvRow.DataKey("CveMotivoBaja").ToEntero 'Guardamos en una propiedad el id del registro del cual haremos cambios, se guarda y se utiliza en el metodo "GvDatos_RowUpdating"
UpDatos.Update()
If ViewState("Orden").ToString() <> String.Empty Then