Solicitudes de traspaso de Almacen Ajustes

Inventarios/TrasladoSolicitud.aspx

@@ -77,18 +77,22 @@
             <asp:UpdatePanel ID="UPPMov" runat="server" RenderMode="Inline" UpdateMode="Conditional">
                 <ContentTemplate>
 
-                    <asp:GridView ID="GvT" Width="1000px" runat="server" GridLines="None" BorderWidth="0" data-heighterror="330" data-freezecols="0"   CssClass="table table-striped table-advance table-hover mysmallbtn ScrollAD Widthall" 
+                    <asp:GridView ID="GvT" Width="1000px" runat="server" GridLines="None" BorderWidth="0" data-heighterror="330" data-freezecols="0"   CssClass="table  table-advance table-hover mysmallbtn ScrollAD Widthall" 
                         ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true" AutoGenerateColumns="False" AllowPaging="False" ShowFooter="False" OnRowDataBound="GvT_RowDataBound"
                         DataKeyNames="CveTraspasoSolicitud,Folio,Fecha,CveUsuario,CveAlmacenOrigen,CveAlmacenDestino,CveTrasladoEstatus,PermisoOrigen,TraspasoEstatus,AlmacenOrigen,AlmacenDestino,Nombre" >
-                        <Columns>
-
-                            
+                        <Columns>                            
                             <asp:BoundField DataField="Folio" HeaderText="Folio" ItemStyle-Width="10%" />
                             <asp:BoundField DataField="AlmacenOrigen" HeaderText="Origen"  />
                             <asp:BoundField DataField="AlmacenDestino" HeaderText="Destino" />
                             <asp:BoundField DataField="Fecha" HeaderText="Fecha" ItemStyle-Width="10%" DataFormatString="{0:d}" />
                             <asp:BoundField DataField="Nombre" HeaderText="Solicitante" ItemStyle-Width="200px" />                            
-                            <asp:BoundField DataField="TraspasoEstatus" HeaderText="Estatus" ItemStyle-Width="10%" />
+                            <%--<asp:BoundField DataField="TraspasoEstatus" HeaderText="Estatus" ItemStyle-Width="10%" />--%>
+
+                            <asp:TemplateField ItemStyle-HorizontalAlign="Left"  HeaderText="Estatus" ItemStyle-Width="70px" >
+                                <ItemTemplate>
+                                    <asp:Label runat="server" ID="LblTraspasoEstatus" Width="70px" Height="15px" Text='<%# Eval("TraspasoEstatus") %>'></asp:Label>
+                                </ItemTemplate>
+                            </asp:TemplateField>
 
                             <asp:HyperLinkField DataNavigateUrlFields="CveMovimientoAlmacen" DataNavigateUrlFormatString="~/Inventarios/EntradasSalidas.aspx?CveMovimiento={0} " 
                                 Target="_blank" ItemStyle-Width="5%" HeaderText="Movimiento" ControlStyle-CssClass="Texto" ItemStyle-HorizontalAlign="Left" DataTextField="FolioMovimiento" />
@@ -128,12 +132,17 @@
 
                          <div class="row marginRowLeft">
                              <div class="col-md-6 form-group form-md-line-input input-iconright" id="Div1" runat="server">
-                                 <asp:DropDownList ID="DdlAlmacenOrigen" Width="100%" DataTextField="Almacen" DataValueField="CveAlmacen" CssClass="form-control select2me" runat="server"></asp:DropDownList>
+                                 <asp:DropDownList ID="DdlAlmacenOrigen" Width="100%" DataTextField="Almacen" DataValueField="CveAlmacen" CssClass="form-control select2me" runat="server" AutoPostBack="true" OnSelectedIndexChanged="DdlAlmacenOrigen_SelectedIndexChanged"></asp:DropDownList>
                                  <label for="<%= DdlAlmacenOrigen.ClientID.ToString()%>">Almacén Origen:</label>
+                                 <asp:RequiredFieldValidator ID="RfvDdlAlmacenOrigen" runat="server" InitialValue="-1" ControlToValidate="DdlAlmacenOrigen" CssClass="help-block errorimput" 
+                                     ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Almacén Origen''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGeneraSolictud"></asp:RequiredFieldValidator>
+                                 
                              </div>
                              <div class="col-md-6 form-group form-md-line-input input-iconright" id="Div2" runat="server">
                                 <asp:DropDownList ID="DdlAlmacenDestino" DataTextField="Almacen" DataValueField="CveAlmacen" Width="100%" CssClass="form-control select2me" runat="server"  ></asp:DropDownList>
                                 <label for="<%= DdlAlmacenDestino.ClientID.ToString()%>">Almacén Destino:</label>
+                                 <asp:RequiredFieldValidator ID="RfvDdlAlmacenDestino" runat="server" InitialValue="-1" ControlToValidate="DdlAlmacenDestino" CssClass="help-block errorimput" 
+                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Almacén Destino''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGeneraSolictud"></asp:RequiredFieldValidator>
                             </div>
                          </div>
 
@@ -156,7 +165,9 @@
  
                        <div class="row">
                           <div class="col-md-12" style="text-align:right!important">
-                              <asp:Button ID="BtnAgregarPS" runat="server" class="btn btn-success" Text="Agregar Producto" Style="margin-left: -100px;" ValidationGroup="AgregarPS"/>
+                              <%--<asp:Button ID="BtnAgregarPS" runat="server" class="btn btn-success" Text="Agregar" Style="margin-left: -100px;" ValidationGroup="AgregarPS"/>--%>
+                              <asp:LinkButton ID="BtnAgregarPS" runat="server" CssClass="btn btn-success btn-sm" Text='<i class="fa fa-plus"></i> Agregar' Style="margin-left: -100px;" ValidationGroup="AgregarPS"/>
+
                           </div>
                       </div>
 
@@ -182,7 +193,7 @@
                     </div>
                 </div>
                 <div class="modal-footer">                   
-                    <asp:Button runat="server" ID="BtnGuardar" align="center" Text="Guardar Solicitud" CssClass="btn btn-success" />
+                    <asp:Button runat="server" ID="BtnGuardar" align="center" Text="Guardar Solicitud" CssClass="btn btn-success" ValidationGroup="GrpGeneraSolictud" />
                     <button id="LbCancelar" runat="server" type="button" class="btn default" data-dismiss="modal">Cerrar</button>
                 </div>                
             </ContentTemplate>

Inventarios/TrasladoSolicitud.aspx.vb

@@ -84,9 +84,10 @@ Partial Class Inventarios_TrasladoSolicitud
     Private Sub CargaAlmacenes()
         'Cargo los almacenes
         DdlAlmacenOrigen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen <> 9") 'Excluir almacenes de Apartado
-        DdlAlmacenDestino.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen <> 9") 'Excluir almacenes de Apartado
+        'DdlAlmacenDestino.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen <> 9") 'Excluir almacenes de Apartado
         DdlAlmacenOrigen.DataBind()
-        DdlAlmacenDestino.DataBind()
+        DdlAlmacenOrigen.Items.Insert(0, New ListItem("Seleccione Uno", "-1"))
+        'DdlAlmacenDestino.DataBind()
     End Sub
 
 
@@ -493,7 +494,7 @@ Partial Class Inventarios_TrasladoSolicitud
         Dim FolioEntrada As Integer = 0
 
         Dim TextoError As String = ""
-        Dim CveConceptoEntrada As Integer = 27
+        Dim CveConceptoEntrada As Integer = 9
 
 
         'AGREGAMOS LA SALIDA DEL ALMACEN ORIGEN
@@ -527,7 +528,7 @@ Partial Class Inventarios_TrasladoSolicitud
                 End If
             Next
 
-            'For Each Dr As DataRow In DtMovimientos.Rows
+            'For Each Dr As DataRow In DtMovimientos.RowsF
 
             'Next
         End If
@@ -550,7 +551,7 @@ Partial Class Inventarios_TrasladoSolicitud
                 For Each Dr As DataRow In ObjInventario.DtResultados.Rows
                     Dim CostoEntrada As Decimal = If(TipoAlmacenDestino = 26, 0, Dr("PU").ToString.ToDecimal())
                     If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntrada, Dr("Cantidad").ToString.ToDecimal, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, CostoEntrada, CveAF:=-1,
-                                                              CveSeccionAlmacen:=-1, Serie:="-1", Lote:="-1", FechaCaducidad:=MinFecha, CveMovimientoDetalleEntrada:=-1, Observaciones:="") Then
+                                                              CveSeccionAlmacen:=-1, Serie:="-1", Lote:="-1", FechaCaducidad:=MinFecha, CveMovimientoDetalleEntrada:=Dr("CveMovimientoDetalle").ToString.ToEntero, Observaciones:="") Then
                         ErrorMovInv = True
                         TextoError = "Ocurrió un error al guardar los movimientos de entrada"
                         Exit For
@@ -621,7 +622,12 @@ Partial Class Inventarios_TrasladoSolicitud
             ObjInventario.Commit()
             MensajeAlert.Append("Se realizó con éxito el traspaso.")
             MensajeAlert.AppendFormat("<br/> Folio de Salida: <b><a href=""/Inventarios/EntradasSalidas.aspx?CveMovimiento={1}"" target=""_blank"">{0}</a></b>", FolioSalida, CveMovimientoSalida)
-            MensajeAlert.AppendFormat("<br/><a target='_blank' class='Texto'  href='/Compras/PopUpVerFactura.aspx?P={0}'> Imprimir </a>", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimientoSalida)))
+            MensajeAlert.AppendFormat("<br/><a target='_blank' class='Texto'  href='/Compras/PopUpVerFactura.aspx?P={0}'> Imprimir Salida </a>", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimientoSalida)))
+
+            MensajeAlert.AppendFormat("<br/> Folio de Transitorio: <b><a href=""/Inventarios/EntradasSalidas.aspx?CveMovimiento={1}"" target=""_blank"">{0}</a></b>", FolioEntrada, CveMovimientoEntrada)
+            MensajeAlert.AppendFormat("<br/><a target='_blank' class='Texto'  href='/Compras/PopUpVerFactura.aspx?P={0}'> Imprimir Transitorio </a>", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimientoEntrada)))
+
+
             Alert(MensajeAlert.ToString, TipoMensaje.MsgInformacion, "")
             RegistraScript(String.Format("$('#{0}').modal('hide');", "DVModalSolicitud"))
         Else
@@ -672,10 +678,13 @@ Partial Class Inventarios_TrasladoSolicitud
 
             If e.Row.DataKey("CveTrasladoEstatus").ToEntero = 1 Then
                 e.Row.FCLinkButton("LnkMostrarTraspaso").CssClass = "btn btn-circle btn-sm blue"
+                e.Row.FCLabel("LblTraspasoEstatus").CssClass = "label label-sm label-info"
             Else
                 If e.Row.DataKey("CveTrasladoEstatus").ToEntero = 2 Then
+                    e.Row.FCLabel("LblTraspasoEstatus").CssClass = "label label-sm label-success"
                     e.Row.FCLinkButton("LnkMostrarTraspaso").CssClass = "btn btn-circle btn-sm green"
                 Else
+                    e.Row.FCLabel("LblTraspasoEstatus").CssClass = "label label-sm label-danger"
                     e.Row.FCLinkButton("LnkMostrarTraspaso").CssClass = "btn btn-circle btn-sm red"
                 End If
 
@@ -686,4 +695,16 @@ Partial Class Inventarios_TrasladoSolicitud
         End If
 
     End Sub
+
+    Protected Sub DdlAlmacenOrigen_SelectedIndexChanged(sender As Object, e As EventArgs)
+
+        DdlAlmacenDestino.ClearSelection()
+        DdlAlmacenDestino.SelectedValue = Nothing
+        DdlAlmacenDestino.Items.Clear()
+
+        DdlAlmacenDestino.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros($"CveTipoAlmacen <> 9 AND CveAlmacen <> {DdlAlmacenOrigen.SelectedValue}")
+        DdlAlmacenDestino.DataBind()
+        DdlAlmacenDestino.Items.Insert(0, New ListItem("Seleccione Uno", "-1"))
+        UpPS.Update()
+    End Sub
 End Class