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

Mega limpieza masiva GlobalDTs

Browse Source 
+ de 30 globalDTs se movió la carga a ClsPaginas
+ se segmentaron todos los GlobalDTs que siempre hacían un DataView, a segmentar las tablas por empresa individual

CAMBIOS EN BD (YA EN VENTAS)
+ @CveEmpresa INT
... a la mayoría de PAs que fueron comentados en Global.asax (aprox 17)

PA_Pros_ProspectosApoyosGet
PA_Pros_ProspectosClasificacionGet
PA_Pros_ProspectosApoyosTiposGet
PA_Pros_ProspectosTiposGet
PA_Pros_ProspectosSolicitudesGet
PA_Pros_ProspectosSolicitudesEstatusGet
PA_Pros_ProspectosSolicitudesTiposGet
PA_Pros_EncuestasRespuestasGet
PA_AC_FuentesRecaudacionGet
PA_AC_UnidadesAdministrativasGet
PA_AC_ClasificacionFuncionalGet
PA_AC_ClasificacionGeograficaGet
PA_AC_FuentesFinanciamientoGet
PA_AC_ClasificacionAdministrativaGet
PA_AC_ProgramaOperativoGet
PA_AC_PD_EjeRectorGet
PA_Flo_CombustiblesGet
This commit is contained in:
MLopez
2023-02-23 20:59:06 -07:00
parent 96d540b73f
commit b540722f2f
12 changed files with 563 additions and 479 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
AC/CatFuentesRecaudacion.aspx.vb
View File

@@ -48,15 +48,7 @@ Partial Class AC_CatFuentesRecaudacion
End Sub
Public Sub CargaDatos()
Dim ObjFuenteRecaudacion As New ClsAC
If ObjFuenteRecaudacion.GetFuentesRecaudacion() Then
ViewState("DTFuenteRecaudacion") = ObjFuenteRecaudacion.DtResultados.FiltraParametros(String.Format("CveEmpresa={0}", UsuarioActual.CveEmpresa))
GlobalDTAC_FuentesRecaudacion(-1) = ObjFuenteRecaudacion.DtResultados
Else
Me.GvDatos.DataSource = Nothing
End If
ObjFuenteRecaudacion.Dispose()
ViewState("DTFuenteRecaudacion") = GlobalDTAC_FuentesRecaudacion(UsuarioActual.CveEmpresa)
If ViewState("Orden").ToString() <> String.Empty Then
CargaGrid(ViewState("Orden").ToString())