VyA viajes Correciones

This commit is contained in:
rakcsle
2024-11-28 20:18:14 -07:00
parent fd256bc37d
commit f048cdb4d5
3 changed files with 17 additions and 5 deletions

View File

@@ -138,11 +138,23 @@
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtFechaNacimiento" runat="server" type="date" Width="100%" CssClass="form-control x"></asp:TextBox>
<%--<asp:TextBox ID="TxtFechaNacimiento" runat="server" type="date" Width="100%" CssClass="form-control x"></asp:TextBox>--%>
<label for="<%= TxtFechaNacimiento.ClientID.ToString()%>" style="color: #888888;">Fecha de Nacimiento: </label>
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 120px !important; padding: 0px;">
<asp:TextBox Width="100px" ID="TxtFechaNacimiento" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton ID="LnkTxtFechaNacimiento" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</span>
</div>
<ajax:MaskedEditExtender ID="MEETxtFechaNacimiento" runat="server" TargetControlID="TxtFechaNacimiento" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CALTxtFechaNacimiento" TargetControlID="TxtFechaNacimiento" PopupButtonID="LnkTxtFechaNacimiento" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVFechaNacimiento" runat="server" ControlToValidate="TxtFechaNacimiento"
CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Nacimiento''</b> es necesario, por favor ingréselo."
ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<label>Fecha de Nacimiento:</label>
<%--<label labelfor="">Fecha de Nacimiento:</label>--%>
</div>
</div>
</div>

View File

@@ -176,7 +176,7 @@ Partial Class Boletos
'Lista Destinos''carga específicos
Dim ObjDestinos As New ClsTransportes()
If ObjDestinos.GetDestinosTarifas(CveSubProyecto, -1, -1) Then
If ObjDestinos.GetDestinosTarifas(CveSubProyecto, -1, -1, UsuarioActual.CveEmpresa) Then
If ObjDestinos.DtResultados.Rows.Count > 0 Then
DtDestinos = ObjDestinos.DtResultados
DdlPartida.DataSource = DtDestinos.FiltraParametros("", DistinctColumns:={"CveDestinoOrigen", "Partida"}) : DataBind()
@@ -194,7 +194,7 @@ Partial Class Boletos
Dim ObjDestinos As New ClsTransportes()
Dim CveSubProyecto As Integer = Contrato.Rows(0)("CveSubProyecto").ToString.ToEntero
If ObjDestinos.GetDestinosTarifas(CveSubProyecto, DdlPartida.SelectedValue.ToEntero, DdlDestino.SelectedValue.ToEntero) Then
If ObjDestinos.GetDestinosTarifas(CveSubProyecto, DdlPartida.SelectedValue.ToEntero, DdlDestino.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
Dim edad As Integer = CInt(DateDiff(DateInterval.Year, TxtFechaNacimiento.Text.ToDate, Date.Today))
Dim Mes As Integer = TxtFecha.Text.ToDate.Month

View File

@@ -57,7 +57,7 @@ Partial Class ListadoViajes
Dim ObjRutas As New ClsTransportes()
If ObjRutas.GetDestinos() Then
If ObjRutas.GetDestinos(-1, UsuarioActual.CveEmpresa) Then
If ObjRutas.DtResultados.Rows.Count > 0 Then
DdlPartida.DataSource = ObjRutas.DtResultados