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

-- se quito GlobalDTFolios

Browse Source
This commit is contained in:
rrene
2020-05-30 15:33:13 -07:00
parent e8031755ee
commit 28351c58e0
7 changed files with 129 additions and 114 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Planeacion/CatFolios.aspx.vb
View File

@@ -91,7 +91,7 @@ Partial Class CatFolios
Dim ObjFolios As New ClsGralFolios
If ObjFolios.GetFolios() Then
ViewState("DTFolios") = ObjFolios.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
GlobalDTFolios = ObjFolios.DtResultados
GvDatos.DataSource = ObjFolios.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
GvDatos.DataBind()
Else
@@ -153,7 +153,7 @@ Partial Class CatFolios
If ObjFolios.RemoveFolios(GvDatos.DataKeys(e.RowIndex).Value.ToString.ToEntero) Then
GvDatos.EditIndex = -1
ViewState("DTFolios") = ObjFolios.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
GlobalDTFolios = ObjFolios.DtResultados
Alert("La Aprobación de Folios se eliminó correctamente.", TipoMensaje.MsgInformacion)
End If
ObjFolios.Dispose()
@@ -194,7 +194,7 @@ Partial Class CatFolios
Session("FileUpload") = ""
Alert("La nueva Aprobación de Folios se guardó/editó correctamente.", TipoMensaje.MsgInformacion)
GlobalDTFolios = ObjFolios.DtResultados
ViewState("DTFolios") = ObjFolios.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)