-- CP3.0 Activación peso bruto vehicular

App_Code/ClsInventarios.vb

@@ -5636,7 +5636,8 @@ Public Class ClsInventarios
                                 NumPolizaSeguro As String, CveUsuario As Integer, NombreAseguradoraMedioAmbiente As String, NumPolizaSeguroMedioAmbiente As String, NombreAseguradoraCarga As String, NumPolizaSeguroCarga As String,
                                 Optional CveTipoCamion As Integer = 1, Optional LongitudCaja As String = "", Optional LineaTransportacion As String = "", Optional SCAC As String = "", Optional CAAT As String = "",
                                 Optional CveTipoRemolque As Integer = -1, Optional NumeroTrailer As String = "", Optional Estatus As Boolean = False, Optional CveProveedor As Integer = -1,
-                                Optional Marca As String = "", Optional Color As String = "", Optional CveChoferAsignado As Integer = -1, Optional CveRemolque1Asignado As Integer = -1, Optional CveRemolque2Asignado As Integer = -1) As Boolean
+                                Optional Marca As String = "", Optional Color As String = "", Optional CveChoferAsignado As Integer = -1, Optional CveRemolque1Asignado As Integer = -1, Optional CveRemolque2Asignado As Integer = -1,
+                                Optional PesoBrutoVehicular As Decimal = 0) As Boolean
 
         Dim Retorno As Boolean = False
         DataAdapter("PA_Inv_CamionesAdd")
@@ -5669,6 +5670,7 @@ Public Class ClsInventarios
             .Add("@CveChoferAsignado", SqlDbType.Int).Value = CveChoferAsignado
             .Add("@CveRemolque1Asignado", SqlDbType.Int).Value = CveRemolque1Asignado
             .Add("@CveRemolque2Asignado", SqlDbType.Int).Value = CveRemolque2Asignado
+            .Add("@PesoBrutoVehicular", SqlDbType.Decimal).Value = PesoBrutoVehicular
         End With
         Try
             SqlAdapter.Fill(Data)
@@ -5703,7 +5705,8 @@ Public Class ClsInventarios
                                    NumPolizaSeguro As String, CveUsuario As Integer, CveEmpresa As Integer, NombreAseguradoraMedioAmbiente As String, NumPolizaSeguroMedioAmbiente As String, NombreAseguradoraCarga As String,
                                    NumPolizaSeguroCarga As String, Optional CveTipoCamion As Integer = -1, Optional LongitudCaja As String = "", Optional LineaTransportacion As String = "", Optional SCAC As String = "", Optional CAAT As String = "",
                                    Optional CveTipoRemolque As Integer = -1, Optional NumeroTrailer As String = "", Optional Estatus As Boolean = False, Optional CveProveedor As Integer = -1,
-                                   Optional Marca As String = "", Optional Color As String = "", Optional CveChoferAsignado As Integer = -1, Optional CveRemolque1Asignado As Integer = -1, Optional CveRemolque2Asignado As Integer = -1) As Boolean
+                                   Optional Marca As String = "", Optional Color As String = "", Optional CveChoferAsignado As Integer = -1, Optional CveRemolque1Asignado As Integer = -1, Optional CveRemolque2Asignado As Integer = -1,
+                                   Optional PesoBrutoVehicular As Decimal = 0) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Inv_CamionesUpdate")
         With SqlAdapter.SelectCommand.Parameters
@@ -5736,6 +5739,7 @@ Public Class ClsInventarios
             .Add("@CveChoferAsignado", SqlDbType.Int).Value = CveChoferAsignado
             .Add("@CveRemolque1Asignado", SqlDbType.Int).Value = CveRemolque1Asignado
             .Add("@CveRemolque2Asignado", SqlDbType.Int).Value = CveRemolque2Asignado
+            .Add("@PesoBrutoVehicular", SqlDbType.Decimal).Value = PesoBrutoVehicular
         End With
         Try
             SqlAdapter.Fill(Data)

Inventarios/CatUnidades.aspx

@@ -32,7 +32,7 @@
     <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
             <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" 
-                DataKeyNames="CveCamion,Placa,Especificacion,CveConfigAutoTransporte,Anio,CveTipoCamion,CveProveedor,CveTipoPermisoSCT,NumPermisoSCT,NombreAseguradora,NumPolizaSeguro,NombreAseguradoraMedioAmbiente,NumPolizaSeguroMedioAmbiente,NombreAseguradoraCarga,NumPolizaSeguroCarga,LongitudCaja,LineaTransportacion,SCAC,CAAT,CveTipoRemolque,NumeroTrailer,Marca,Color,Estatus,CveChoferAsignado,CveRemolque1Asignado,CveRemolque2Asignado"
+                DataKeyNames="CveCamion,Placa,Especificacion,CveConfigAutoTransporte,Anio,CveTipoCamion,CveProveedor,CveTipoPermisoSCT,NumPermisoSCT,NombreAseguradora,NumPolizaSeguro,NombreAseguradoraMedioAmbiente,NumPolizaSeguroMedioAmbiente,NombreAseguradoraCarga,NumPolizaSeguroCarga,LongitudCaja,LineaTransportacion,SCAC,CAAT,CveTipoRemolque,NumeroTrailer,Marca,Color,Estatus,CveChoferAsignado,CveRemolque1Asignado,CveRemolque2Asignado,PesoBrutoVehicular,FechaIng"
                 EmptyDataText="No se Encontraron Unidades" ToolTip="Listado de Unidades" CssClass="table table-striped table-advance table-hover mysmallbtn " data-sort="true" Style="width: 100%" GridLines="None">
                 <Columns>
                     <asp:BoundField HeaderText="Unidad" DataField="Especificacion" ItemStyle-HorizontalAlign="Left" />
@@ -45,7 +45,7 @@
                     <asp:BoundField HeaderText="Marca" DataField="Marca" ItemStyle-HorizontalAlign="Left" />
                     <asp:BoundField HeaderText="Color" DataField="Color" ItemStyle-HorizontalAlign="Left" />
                     <asp:BoundField HeaderText="Estatus" DataField="EstatuStr" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Fecha de Ingreso" ItemStyle-HorizontalAlign="Center" DataField="FechaIng" ItemStyle-Width="5%" DataFormatString="{0:d}" />                    
+                    <asp:BoundField HeaderText="Peso bruto" ItemStyle-HorizontalAlign="Right" DataField="PesoBrutoVehicular" ItemStyle-Width="2.5%"  />                    
                     <asp:TemplateField ItemStyle-Width="100px" 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>" />
@@ -144,8 +144,7 @@
                         </div>
 
                         <div class="row" runat="server" id="DVNumermisoSCT">
-                            <div class="col-md-12">
+                            <div class="col-md-6">
-
                                 <div class="form-group form-md-line-input input-iconright">
                                     <asp:TextBox ID="TxtNumermisoSCT" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox>
                                     <label for="<%= TxtNumermisoSCT.ClientID.ToString()%>">Número Permiso SCT:</label>
@@ -153,6 +152,14 @@
                                     <i></i>
                                 </div>
                             </div>
+                            <div class="col-md-6">
+                                    <div class="form-group form-md-line-input input-iconright">
+                                        <asp:TextBox ID="TxtPesoBrutoVehicular" CssClass="form-control" runat="server" MaxLength="20"></asp:TextBox>
+                                        <label for="<%= TxtPesoBrutoVehicular.ClientID.ToString()%>">Peso bruto vehicular:</label>
+                                        <%--<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>
+                                    </div>
+                                </div>
                         </div>
 
                         <div class="row" runat="server" id="DVNombreAseguradora">
@@ -265,7 +272,6 @@
                                     <i></i>
                                 </div>
                             </div>
-
                         </div>
                         <div class="row">
                             
@@ -310,13 +316,26 @@
                                  <div class="form-group form-md-line-input input-iconright" runat="server" id="Div4">
                                     <asp:DropDownList ID="DdlRemolque2Asignado" CssClass="form-control input-sm select2me " Width="100%" runat="server" AppendDataBoundItems="true" AutoPostBack="false" CausesValidation="true" DataValueField="CveCamion" DataTextField="Especificacion" Style="padding: 0px">
                                     </asp:DropDownList>
-                                    <label for="<%= DdlRemolque2Asignado.ClientID.ToString()%>">Remolque 1:</label>
+                                    <label for="<%= DdlRemolque2Asignado.ClientID.ToString()%>">Remolque 2:</label>
                                     <asp:RequiredFieldValidator runat="server" ID="RequiredFieldValidator6" ControlToValidate="DdlRemolque2Asignado" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Remolque 2 Asignado''</b> es necesario, por favor ingréselo." ValidationGroup="GrpUnidad"></asp:RequiredFieldValidator>
                                     <i></i>
                                 </div>
                               </div>
 
                         </div>
+                          <div class="row" >
+                               <div class="col-md-6">
+                                 <div class="form-group form-md-line-input input-iconright">
+                                    
+                                     <label for="<%= LblFechaIng.ClientID.ToString()%>">Fecha Ing:</label>
+                                     <i></i>
+                                      <asp:Label ID="LblFechaIng" runat="server" ></asp:Label>
+                                 </div>
+                             </div>
+                             <div class="col-md-6">
+                                  
+                             </div>
+                           </div>
 
                         <%--<asp:CheckBox ID="ChkesRemolque" Checked="true" TextAlign="Left" Text="¿Es remolque?:" runat="server" AutoPostBack="true" OnCheckedChanged="ChkesRemolque_CheckedChanged" />--%>
                     </div>

Inventarios/CatUnidades.aspx.vb

@@ -179,11 +179,12 @@ Partial Class Inventarios_CatUnidades
         TxtCAAT.Text = GvRow.DataKey("CAAT")
         TxtMarca.Text = GvRow.DataKey("Marca")
         TxtColor.Text = GvRow.DataKey("Color")
+        TxtPesoBrutoVehicular.Text = GvRow.DataKey("PesoBrutoVehicular")
         ChkEstatus.Checked = If(Boolean.Parse(GvRow.DataKey("Estatus")), True, False)
         DdlChoferAsignado.SelectedValueExist(GvRow.DataKey("CveChoferAsignado").ToEntero)
         DdlRemolque1Asignado.SelectedValueExist(GvRow.DataKey("CveRemolque1Asignado").ToEntero)
         DdlRemolque2Asignado.SelectedValueExist(GvRow.DataKey("CveRemolque2Asignado").ToEntero)
-
+        LblFechaIng.Text = GvRow.DataKey("FechaIng")
         'ChkesRemolque.Checked = (GvRow.DataKey("CveTipoCamion") = "2")
 
         RdTipoUnidad.SelectedValue = GvRow.DataKey("CveTipoCamion")
@@ -235,14 +236,16 @@ Partial Class Inventarios_CatUnidades
 
             If CveCamion <= 0 Then
                 If ObjInventarios.AddCamiones(TxtPlacaNuevo.Text, TxtEspecificacionNuevo.Text, UsuarioActual.CveEmpresa, DdlConfigAuto.SelectedValue.ToEntero, TxtAnio.Text.ToEntero(), DdlTipoPermisoSCT.SelectedValue.ToEntero(), TxtNumermisoSCT.Text, TxtNombreAseguradora.Text, TxtNumPolizaSeguro.Text, UsuarioActual.CveUsuario,
-                                              TxtNombreAseguradoraMedioAmbiente.Text, TxtNumPolizaSeguroMedioAmbiente.Text, TxtNombreAseguradoraCarga.Text, TxtNumPolizaSeguroCarga.Text, CveTipoCamion, TxtLongitudCaja.Text, TxtLineaTransportacion.Text, TxtSCAC.Text, TxtCAAT.Text, DdlTiposRemolque.SelectedValue.ToEntero(), TxtNumeroTrailer.Text, ChkEstatus.Checked, CveProveedor:=DdlProveedor.SelectedValue.ToEntero, Color:=TxtColor.Text, Marca:=TxtMarca.Text, CveChoferAsignado:=DdlChoferAsignado.SelectedValue.ToEntero, CveRemolque1Asignado:=DdlRemolque1Asignado.SelectedValue.ToEntero, CveRemolque2Asignado:=DdlRemolque2Asignado.SelectedValue.ToEntero) Then
+                                              TxtNombreAseguradoraMedioAmbiente.Text, TxtNumPolizaSeguroMedioAmbiente.Text, TxtNombreAseguradoraCarga.Text, TxtNumPolizaSeguroCarga.Text, CveTipoCamion, TxtLongitudCaja.Text, TxtLineaTransportacion.Text, TxtSCAC.Text, TxtCAAT.Text, DdlTiposRemolque.SelectedValue.ToEntero(), TxtNumeroTrailer.Text,
+                                              ChkEstatus.Checked, CveProveedor:=DdlProveedor.SelectedValue.ToEntero, Color:=TxtColor.Text, Marca:=TxtMarca.Text, CveChoferAsignado:=DdlChoferAsignado.SelectedValue.ToEntero, CveRemolque1Asignado:=DdlRemolque1Asignado.SelectedValue.ToEntero, CveRemolque2Asignado:=DdlRemolque2Asignado.SelectedValue.ToEntero, PesoBrutoVehicular:=TxtPesoBrutoVehicular.Text.ToDecimal) Then
                     Alert("Unidad agregada correctamente")
                 Else
                     ErrorPrceso = True
                 End If
             Else
                 If ObjInventarios.UpdateCamiones(CveCamion, TxtPlacaNuevo.Text, TxtEspecificacionNuevo.Text, DdlConfigAuto.SelectedValue.ToEntero, TxtAnio.Text.ToEntero(), DdlTipoPermisoSCT.SelectedValue.ToEntero(), TxtNumermisoSCT.Text, TxtNombreAseguradora.Text, TxtNumPolizaSeguro.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa,
-                                                 TxtNombreAseguradoraMedioAmbiente.Text, TxtNumPolizaSeguroMedioAmbiente.Text, TxtNombreAseguradoraCarga.Text, TxtNumPolizaSeguroCarga.Text, CveTipoCamion, TxtLongitudCaja.Text, TxtLineaTransportacion.Text, TxtSCAC.Text, TxtCAAT.Text, DdlTiposRemolque.SelectedValue.ToEntero(), TxtNumeroTrailer.Text, ChkEstatus.Checked, CveProveedor:=DdlProveedor.SelectedValue.ToEntero, Color:=TxtColor.Text, Marca:=TxtMarca.Text, CveChoferAsignado:=DdlChoferAsignado.SelectedValue.ToEntero, CveRemolque1Asignado:=DdlRemolque1Asignado.SelectedValue.ToEntero, CveRemolque2Asignado:=DdlRemolque2Asignado.SelectedValue.ToEntero) Then
+                                                 TxtNombreAseguradoraMedioAmbiente.Text, TxtNumPolizaSeguroMedioAmbiente.Text, TxtNombreAseguradoraCarga.Text, TxtNumPolizaSeguroCarga.Text, CveTipoCamion, TxtLongitudCaja.Text, TxtLineaTransportacion.Text, TxtSCAC.Text, TxtCAAT.Text, DdlTiposRemolque.SelectedValue.ToEntero(), TxtNumeroTrailer.Text,
+                                                 ChkEstatus.Checked, CveProveedor:=DdlProveedor.SelectedValue.ToEntero, Color:=TxtColor.Text, Marca:=TxtMarca.Text, CveChoferAsignado:=DdlChoferAsignado.SelectedValue.ToEntero, CveRemolque1Asignado:=DdlRemolque1Asignado.SelectedValue.ToEntero, CveRemolque2Asignado:=DdlRemolque2Asignado.SelectedValue.ToEntero, PesoBrutoVehicular:=TxtPesoBrutoVehicular.Text.ToDecimal) Then
                     Alert("Unidad actualizada correctamente")
                 Else
                     ErrorPrceso = True