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

--Se agrega la url de CatRutas a ClsPáginas, se agrega a módulos y se da permiso. Se crea la página de CatRutas y hace un panel con 3 pestañas para rutas, destinos e importes, se crea el listado en cada uno y se prepara para los métodos del CRUD.

Browse Source
This commit is contained in:
AbrahamCastilloV
2024-01-31 17:15:11 -07:00
parent 482cf60bff
commit d9e92b9039
4 changed files with 300 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
App_Code/ClsPaginas.vb
View File

@@ -10718,6 +10718,7 @@ Public Class ClsPaginas
PaginaDict.Add("/Transportes/RepBoletos.aspx".ToUpper(), 600)
PaginaDict.Add("/Transportes/Boletos.aspx".ToUpper(), 601)
PaginaDict.Add("/Transportes/RepContratosCalendario.aspx".ToUpper(), 603)
PaginaDict.Add("/Transportes/CatRutas.aspx".ToUpper(), 604)
#End Region
'Antes de aquí.

9
Transportes/Boletos.aspx.vb
View File

@@ -1,4 +1,7 @@
Partial Class Boletos
Imports System.Data
Imports Extensiones
Partial Class Boletos
Inherits ClsPaginas
#Region "Propiedades"
Private Property AsientoSeleccionado As String
@@ -116,11 +119,11 @@
ViewState("Importe") = ImporteR
TxtCosto.Text = $"El precio de su boleto es ${ImporteR.FormatoNumero}"
BtnGuardar.Visible = True
upPanel.Visible = True
UpPanel.Visible = True
Else
TxtCosto.Text = ""
BtnGuardar.Visible = False
upPanel.Visible = False
UpPanel.Visible = False
ViewState("Importe") = 0
End If
End If

211
Transportes/CatRutas.aspx Normal file
View File

@@ -0,0 +1,211 @@
<%@ Page Language="VB" Title="Transportes V&A - Rutas" AutoEventWireup="false"
MasterPageFile="~/Site.master" CodeFile="CatRutas.aspx.vb"
Inherits="CatRutas" EnableEventValidation="true" %>
<asp:Content ID="Content1" ContentPlaceHolderID="E" runat="Server">
Rutas y Destinos
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.spaced {
display: flex;
justify-content: space-between;
margin-block: 1rem;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" runat="Server">
<asp:Panel ID="PnlGeneral" runat="server">
<%--Calendario Tab--%>
<ajax:TabContainer ID="Tab" runat="server" Width="100%" ActiveTabIndex="0">
<%--Rutas Tab--%>
<ajax:TabPanel ID="TabRutas" runat="server" HeaderText="Rutas">
<ContentTemplate>
<div class="spaced">
<div>
<asp:LinkButton ID="BtnAgregarRuta" runat="server" AlternateText="Agregar"
CssClass="btn bsuccesscle btn-sm green" OnClick="AddRuta" Text="<i class='fa fa-add'>Agregar</i>"
ToolTip="Agregar" />
</div>
<div>
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvRutas.ClientID) %>"
style="display: inline-block; margin-right: -10px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvRutas.ClientID) %>"
style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier">
</i></a>
</div>
</div>
<asp:GridView ID="GvRutas" runat="server" AutoGenerateColumns="false" EmptyDataText="No se Encontró Contrato Registrado"
CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" GridLines="None"
data-sort="true" DataKeyNames="">
<Columns>
<asp:TemplateField HeaderText="No. Ruta">
<ItemTemplate>
<asp:Literal ID="LtlCveRuta" runat="server" Text='<%# Eval("CveRuta") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Ruta">
<ItemTemplate>
<asp:Literal ID="LtlRuta" runat="server" Text='<%# Eval("Ruta") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estatus">
<ItemTemplate>
<asp:Literal ID="LtlEstatus" runat="server" Text='<%# Eval("Estatus") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Acciones">
<ItemTemplate>
<asp:LinkButton ID="BtnEditarRuta" runat="server" AlternateText="Editar"
CssClass="btn btn-circle btn-sm green" OnClick="UpdateRuta" Text="<i class='fa fa-pencil'></i>" />
<asp:LinkButton ID="BtnEliminarRuta" runat="server" AlternateText="Eliminar"
CssClass="btn btn-circle btn-sm red" OnClick="RemoveRuta" Text="<i class='fa fa-trash'></i>"
data-toggle="confirmation" data-popout="true" data-original-title="Confirmar"
data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate>
</ajax:TabPanel>
<%--Rutas Tab--%>
<ajax:TabPanel ID="TabDestinos" runat="server" HeaderText="Destinos">
<ContentTemplate>
<div class="spaced">
<div>
<asp:LinkButton ID="BtnAgregarDestino" runat="server" AlternateText="Agregar"
CssClass="btn btn-success btn-sm green" OnClick="AddDestino" Text="<i class='fa fa-add'>Agregar</i>"
ToolTip="Agregar" />
</div>
<div>
<div class="row my-1" style="margin-right: 10px; margin-top: 10px;" align="right">
<input type="text" id="TxtBusqueda1" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda1','{0}')", GvDestinos.ClientID) %>"
style="display: inline-block; margin-right: -10px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda1','{0}')", GvDestinos.ClientID) %>"
style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier">
</i></a>
</div>
</div>
</div>
<asp:GridView ID="GvDestinos" runat="server" AutoGenerateColumns="false" EmptyDataText="No se Encontró Contrato Registrado"
CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" GridLines="None"
data-sort="true" DataKeyNames="">
<Columns>
<asp:TemplateField HeaderText="No. Destino">
<ItemTemplate>
<asp:Literal ID="LtlCveDestino" runat="server" Text='<%# Eval("CveDestino") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Destino">
<ItemTemplate>
<asp:Literal ID="LtlDestino" runat="server" Text='<%# Eval("Destino") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estatus">
<ItemTemplate>
<asp:Literal ID="LtlEstatus" runat="server" Text='<%# Eval("Estatus") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Nacional">
<ItemTemplate>
<asp:Literal ID="LtlEsNacional" runat="server" Text='<%# Eval("EsNacional") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Acciones">
<ItemTemplate>
<asp:LinkButton ID="BtnEditarDestino" runat="server" AlternateText="Editar"
CssClass="btn btn-circle btn-sm green" OnClick="UpdateDestino" Text="<i class='fa fa-pencil'></i>" />
<asp:LinkButton ID="BtnEliminarDestino" runat="server" AlternateText="Eliminar"
CssClass="btn btn-circle btn-sm red" OnClick="RemoveDestino" Text="<i class='fa fa-trash'></i>"
data-toggle="confirmation" data-popout="true" data-original-title="Confirmar"
data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate>
</ajax:TabPanel>
<%--Importes Tab--%>
<ajax:TabPanel ID="TabImportes" runat="server" HeaderText="Importes">
<ContentTemplate>
<div class="spaced">
<div>
<asp:LinkButton ID="BtnAgregarImporte" runat="server" AlternateText="Agregar"
CssClass="btn btn-success btn-sm green" OnClick="AddImporte" Text="<i class='fa fa-add'>Agregar</i>"
ToolTip="Agregar" />
</div>
<div>
<div class="row my-1" style="margin-right: 10px; margin-top: 10px;" align="right">
<input type="text" id="TxtBusqueda2" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvImportes.ClientID) %>"
style="display: inline-block; margin-right: -10px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvImportes.ClientID) %>"
style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier">
</i></a>
</div>
</div>
</div>
<asp:GridView ID="GvImportes" runat="server" AutoGenerateColumns="false" EmptyDataText="No
se Encontró Contrato Registrado"
CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" GridLines="None"
data-sort="true" DataKeyNames="">
<Columns>
<asp:TemplateField HeaderText="No. Importe">
<ItemTemplate>
<asp:Literal ID="LtlCveDestinoTarifa" runat="server" Text='<%# Eval("CveDestinoTarifa")%>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Destino">
<ItemTemplate>
<asp:Literal ID="LtlDestino" runat="server" Text='<%# Eval("Destino")%>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Salida">
<ItemTemplate>
<asp:Literal ID="LtlSalida" runat="server" Text='<%# Eval("Salida")%>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Importe">
<ItemTemplate>
<asp:Literal ID="LtlImporte" runat="server" Text='<%# Eval("Importe")%>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Acciones">
<ItemTemplate>
<asp:LinkButton ID="BtnEditarImporte" runat="server" AlternateText="Editar"
CssClass="btn btn-circle btn-sm green" OnClick="UpdateImporte" Text="<i class='fa fa-pencil'></i>" />
<asp:LinkButton ID="BtnEliminarImporte" runat="server" AlternateText="Eliminar"
CssClass="btn btn-circle btn-sm red" OnClick="RemoveImporte" Text="<i class='fa fa-trash'></i>"
data-toggle="confirmation" data-popout="true" data-original-title="Confirmar"
data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
</asp:Panel>
</asp:Content>

82
Transportes/CatRutas.aspx.vb Normal file
View File

@@ -0,0 +1,82 @@
Option Explicit On
Option Strict On
Partial Class CatRutas
Inherits ClsPaginas
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not IsPostBack Then
InicializaCalendar()
CargaDatos()
End If
End Sub
Private Sub CargaDatos()
'Lista Rutas'
Dim ObjRutas As New ClsTransportes()
If ObjRutas.GetRutas(-1, -1, -1, "", True, DateTime.Now) Then
If ObjRutas.DtResultados.Rows.Count > 0 Then
GvRutas.DataSource = ObjRutas.DtResultados
GvRutas.DataBind()
End If
End If
'Lista Destinos'
If ObjRutas.GetDestinos() Then
If ObjRutas.DtResultados.Rows.Count > 0 Then
GvDestinos.DataSource = ObjRutas.DtResultados
GvDestinos.DataBind()
End If
End If
'Lista Importes'
If ObjRutas.GetDestinosTarifas(-1, -1) Then
If ObjRutas.DtResultados.Rows.Count > 0 Then
GvImportes.DataSource = ObjRutas.DtResultados
GvImportes.DataBind()
End If
End If
End Sub
Private Sub InicializaCalendar()
End Sub
#Region "Rutas"
Protected Sub AddRuta(sender As Object, e As EventArgs)
End Sub
Protected Sub UpdateRuta(sender As Object, e As EventArgs)
End Sub
Protected Sub RemoveRuta(sender As Object, e As EventArgs)
End Sub
#End Region
#Region "Destinos"
Protected Sub AddDestino(sender As Object, e As EventArgs)
End Sub
Protected Sub UpdateDestino(sender As Object, e As EventArgs)
End Sub
Protected Sub RemoveDestino(sender As Object, e As EventArgs)
End Sub
#End Region
#Region "Importes"
Protected Sub AddImporte(sender As Object, e As EventArgs)
End Sub
Protected Sub UpdateImporte(sender As Object, e As EventArgs)
End Sub
Protected Sub RemoveImporte(sender As Object, e As EventArgs)
End Sub
#End Region
End Class