tipopermisoSCT

2021-10-05 08:26:18 -07:00
parent c12e0d1b82
commit 814f51d8c5
3 changed files with 21 additions and 16 deletions
--- a/Inventarios/CatUnidades.aspx
+++ b/Inventarios/CatUnidades.aspx
@@ -34,21 +34,21 @@
 <asp:Content ID="Content7" ContentPlaceHolderID="C" Runat="Server">
    <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
        <ContentTemplate>
-            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCamion,Placa,Especificacion,ConfigCartaPorte,Anio,TipoPermisoSCT,NumPermisoSCT,NombreAseguradora,NumPolizaSeguro" 
+            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCamion,Placa,Especificacion,ConfigCartaPorte,Anio,CveTipoPermisoSCT,NumPermisoSCT,NombreAseguradora,NumPolizaSeguro" 
                EmptyDataText="No se Encontraron Unidades" ToolTip="Listado de Unidades" CssClass="table table-striped table-advance table-hover mysmallbtn" Style="margin-top: -10px; width: 100%" GridLines="None">
                <Columns>
                    
                    <asp:BoundField HeaderText="Placa" DataField="Placa" ItemStyle-HorizontalAlign="Left" />
                    <asp:BoundField HeaderText="Especificación" DataField="Especificacion" ItemStyle-HorizontalAlign="Left" />
-                     <asp:BoundField HeaderText="Configuración Carta Porte" DataField="ConfigCartaPorte" ItemStyle-HorizontalAlign="Left" />                    
-                    <asp:BoundField HeaderText="Tipo Permiso SCT" DataField="TipoPermisoSCT" ItemStyle-HorizontalAlign="Left" />
+                     <asp:BoundField HeaderText="Config Carta Porte" DataField="ConfigCartaPorte" ItemStyle-HorizontalAlign="Left" />                    
+                    <asp:BoundField HeaderText="Tipo Permiso SCT" DataField="ClaveTipoPermisoSCT" ItemStyle-HorizontalAlign="Left" />
                    <asp:BoundField HeaderText="Número Permiso SCT" DataField="NumPermisoSCT" ItemStyle-HorizontalAlign="Left" />
                    <asp:BoundField HeaderText="Nombre Aseguradora" DataField="NombreAseguradora" ItemStyle-HorizontalAlign="Left" />
                    <asp:BoundField HeaderText="Numero Póliza Seguro" DataField="NumPolizaSeguro" ItemStyle-HorizontalAlign="Left" />                                    

                    <asp:BoundField HeaderText="Fecha de Ingreso" ItemStyle-HorizontalAlign="Center" DataField="FechaIng" ItemStyle-Width="15%" DataFormatString="{0:G}" />
                    <asp:BoundField HeaderText="Usuario" DataField="Usuario" />
-                    <asp:TemplateField ItemStyle-Width="13%" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Left" HeaderText="Editar">
+                    <asp:TemplateField ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Left" HeaderText="Editar">
                        <ItemTemplate>
                            <asp:LinkButton ID="LnkEditar" OnClick="LnkEditar_Click" runat="server" Visible="true" AlternateText="Eitar" CausesValidation="False" CssClass="btn btn-circle btn-sm green" Text="<i title='Editar' class='fa fa-pencil' title='Editar' ></i>" />
                            <asp:LinkButton ID="LnkEliminar" OnClick="LnkEliminar_Click" runat="server" Visible="true" AlternateText="Eliminar" CausesValidation="False" CssClass="btn btn-circle btn-sm red" Text="<i title='Eliminar' class='icon-trash' title='Eliminar' ></i>" data-toggle="confirmation" data-popout="true" data-original-title="Eliminar" data-btn-ok-label="Si" />
@@ -113,14 +113,15 @@


                            <div class="form-group form-md-line-input input-iconright"  style="padding:0px">
-                                <label for="<%= TxtTipoPermisoSCT.ClientID.ToString()%>"  style="padding:0px">Tipo Permiso SCT:</label>
-                                <asp:TextBox ID="TxtTipoPermisoSCT" CssClass="form-control" runat="server" MaxLength="10"  style="padding:0px"></asp:TextBox>
-                                <asp:RequiredFieldValidator runat="server" ID="RfvTxtTipoPermisoSCT" ControlToValidate="TxtTipoPermisoSCT" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Permiso SCT''</b> es necesario, por favor ingréselo." ValidationGroup="GrpUnidad"></asp:RequiredFieldValidator>
+                                <label for="<%= DdlTipoPermisoSCT.ClientID.ToString()%>"  style="padding:0px">Tipo Permiso SCT:</label>
+                                <asp:DropDownList ID="DdlTipoPermisoSCT" CssClass="form-control input-sm select2me " Width="100%" runat="server" AppendDataBoundItems="true" AutoPostBack="false" CausesValidation="true" DataTextField="ClaveTipoPermisoDescripcion" DataValueField="CveTipoPermisoSCT"  style="padding:0px">                                     
+                                </asp:DropDownList>
+                                <asp:RequiredFieldValidator runat="server" ID="RfvTxtTipoPermisoSCT" ControlToValidate="DdlTipoPermisoSCT" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Permiso SCT''</b> es necesario, por favor ingréselo." ValidationGroup="GrpUnidad"></asp:RequiredFieldValidator>
                                <i></i>
                            </div>

                            <div class="form-group form-md-line-input input-iconright"   style="padding:0px">
-                                <label for="<%= TxtNumermisoSCT.ClientID.ToString()%>"  style="padding:0px">Numero Permiso SCT:</label>
+                                <label for="<%= TxtNumermisoSCT.ClientID.ToString()%>"  style="padding:0px">Número Permiso SCT:</label>
                                <asp:TextBox ID="TxtNumermisoSCT" CssClass="form-control" runat="server" MaxLength="50"  style="padding:0px"></asp:TextBox>
                                <%--<asp:RequiredFieldValidator runat="server" ID="RfvTxtNumermisoSCT" ControlToValidate="TxtNumermisoSCT" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Numero Permiso SCT''</b> es necesario, por favor ingréselo." ValidationGroup="GrpUnidad"></asp:RequiredFieldValidator>--%>
                                <i></i>
--- a/Inventarios/CatUnidades.aspx.vb
+++ b/Inventarios/CatUnidades.aspx.vb
@@ -48,9 +48,13 @@ Partial Class Inventarios_CatUnidades
            If ObjGral.GetCartaPorteConfigAutoTransportes() Then
                DdlConfigAuto.DataSource = ObjGral.DtResultados
            End If
+            If ObjGral.GetCartaPorteTipoPermisoSCT() Then
+                DdlTipoPermisoSCT.DataSource = ObjGral.DtResultados
+            End If
        End Using

        DdlConfigAuto.DataBind()
+        DdlTipoPermisoSCT.DataBind()

        UpModalUnidades.Update()

@@ -69,7 +73,7 @@ Partial Class Inventarios_CatUnidades
        DdlConfigAuto.SelectedValueExist(-1)

        TxtAnio.Text = ""
-        TxtTipoPermisoSCT.Text = ""
+        'TxtTipoPermisoSCT.Text = ""
        TxtNumermisoSCT.Text = ""
        TxtNombreAseguradora.Text = ""
        TxtNumPolizaSeguro.Text = ""
@@ -94,7 +98,7 @@ Partial Class Inventarios_CatUnidades
        DdlConfigAuto.SelectedValueExist(GvRow.DataKey("ConfigCartaPorte"))

        TxtAnio.Text = GvRow.DataKey("Anio")
-        TxtTipoPermisoSCT.Text = GvRow.DataKey("TipoPermisoSCT")
+        DdlTipoPermisoSCT.SelectedValueExist(GvRow.DataKey("CveTipoPermisoSCT"))
        TxtNumermisoSCT.Text = GvRow.DataKey("NumPermisoSCT")
        TxtNombreAseguradora.Text = GvRow.DataKey("NombreAseguradora")
        TxtNumPolizaSeguro.Text = GvRow.DataKey("NumPolizaSeguro")
@@ -140,13 +144,13 @@ Partial Class Inventarios_CatUnidades
        Dim ObjInventarios As New ClsInventarios

        If CveCamion <= 0 Then
-            If ObjInventarios.AddCamiones(TxtPlacaNuevo.Text, TxtEspecificacionNuevo.Text, UsuarioActual.CveEmpresa, DdlConfigAuto.SelectedValue, TxtAnio.Text.ToEntero(), TxtTipoPermisoSCT.Text, TxtNumermisoSCT.Text, TxtNombreAseguradora.Text, TxtNumPolizaSeguro.Text, UsuarioActual.CveUsuario) Then
+            If ObjInventarios.AddCamiones(TxtPlacaNuevo.Text, TxtEspecificacionNuevo.Text, UsuarioActual.CveEmpresa, DdlConfigAuto.SelectedValue, TxtAnio.Text.ToEntero(), DdlTipoPermisoSCT.SelectedValue.ToEntero, TxtNumermisoSCT.Text, TxtNombreAseguradora.Text, TxtNumPolizaSeguro.Text, UsuarioActual.CveUsuario) Then
                Alert("Unidad agregada correctamente")
            Else
                ErrorPrceso = True
            End If
        Else
-            If ObjInventarios.UpdateCamiones(CveCamion, TxtPlacaNuevo.Text, TxtEspecificacionNuevo.Text, DdlConfigAuto.SelectedValue, TxtAnio.Text.ToEntero(), TxtTipoPermisoSCT.Text, TxtNumermisoSCT.Text, TxtNombreAseguradora.Text, TxtNumPolizaSeguro.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+            If ObjInventarios.UpdateCamiones(CveCamion, TxtPlacaNuevo.Text, TxtEspecificacionNuevo.Text, DdlConfigAuto.SelectedValue, TxtAnio.Text.ToEntero(), DdlTipoPermisoSCT.SelectedValue.ToEntero, TxtNumermisoSCT.Text, TxtNombreAseguradora.Text, TxtNumPolizaSeguro.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
                Alert("Unidad actualizada correctamente")
            Else
                ErrorPrceso = True