-- se quito GlobalDTFolios
This commit is contained in:
@@ -20,8 +20,7 @@
|
||||
<asp:ListItem Text="Proyectos" Value="GlobalDTProyectos"></asp:ListItem>
|
||||
<asp:ListItem Text="ProyectosUsuarios" Value="GlobalDTProyectosUsuarios"></asp:ListItem>
|
||||
<asp:ListItem Text="Sub Proyectos" Value="GlobalDTSubProyectos"></asp:ListItem>
|
||||
<asp:ListItem Text="Sub ProyectosUsuarios" Value="GlobalDTSubProyectosUsuarios"></asp:ListItem>
|
||||
<asp:ListItem Text="Folios" Value="GlobalDTFolios"></asp:ListItem>
|
||||
<asp:ListItem Text="Sub ProyectosUsuarios" Value="GlobalDTSubProyectosUsuarios"></asp:ListItem>
|
||||
<%-- <asp:ListItem Text="Sucursales" Value="GlobalDTSucursales"></asp:ListItem>--%>
|
||||
<asp:ListItem Text="Proveedores" Value="GlobalDTCompProveedores"></asp:ListItem>
|
||||
<asp:ListItem Text="Métodos de Pago" Value="GlobalDTMetodosPago"></asp:ListItem>
|
||||
|
||||
@@ -24,8 +24,6 @@ Partial Class Sistemas_CatSesiones
|
||||
CargaSubProyectos()
|
||||
ElseIf DdlVariable.SelectedItem.Value = "GlobalDTSubProyectosUsuarios" Then
|
||||
CargaSubProyectos()
|
||||
ElseIf DdlVariable.SelectedItem.Value = "GlobalDTFolios" Then
|
||||
CargaFolios()
|
||||
'ElseIf DdlVariable.SelectedItem.Value = "GlobalDTSucursales" Then
|
||||
' CargaSucursales()
|
||||
ElseIf DdlVariable.SelectedItem.Value = "GlobalDTCompProveedores" Then
|
||||
@@ -341,18 +339,6 @@ Partial Class Sistemas_CatSesiones
|
||||
'Fin Carga Proyectos
|
||||
End Sub
|
||||
|
||||
Private Sub CargaFolios()
|
||||
'Carga Folios
|
||||
Dim ObjFolios As New ClsGralFolios()
|
||||
If ObjFolios.GetFolios() Then
|
||||
Application("GlobalDTFolios") = ObjFolios.DtResultados
|
||||
Else
|
||||
Application("GlobalDTFolios") = Nothing
|
||||
End If
|
||||
ObjFolios.Dispose()
|
||||
'Fin Carga Folios
|
||||
End Sub
|
||||
|
||||
'Private Sub CargaSucursales()
|
||||
' 'Carga Sucursales
|
||||
' Dim ObjSucursales As New ClsSucursales()
|
||||
|
||||
Reference in New Issue
Block a user