CAt AF Ultima Iamgen, Entyardas salidas formato EMD

AF/CatAF.aspx

@@ -36,7 +36,54 @@
             padding-right: 4px !important;
             padding-left: 4px !important;
         }
+
+     img.cbp-img-ajustada {
+    max-width: 150px;
+    max-height: 150px;
+    height: auto;
+    width: auto;
+    object-fit: contain;
+    display: block;
+    cursor: pointer; 
+}
     </style>
+    <style>
+.img-modal {
+    display: none;
+    position: fixed;
+    z-index: 9999;
+    padding-top: 50px;
+    left: 0;
+    top: 0;
+    width: 100%;
+    height: 100%;
+    background-color: rgba(0,0,0,0.85);
+}
+
+.img-modal-content {
+    margin: auto;
+    display: block;
+    max-width: 90%;
+    max-height: 80%;
+    border-radius: 4px;
+    box-shadow: 0 0 20px #000;
+}
+
+.img-modal-close {
+    position: absolute;
+    top: 20px;
+    right: 35px;
+    color: #fff;
+    font-size: 35px;
+    font-weight: bold;
+    cursor: pointer;
+}
+
+.img-modal-close:hover {
+    color: #ccc;
+}
+</style>
+
 </asp:Content>
 <asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
     <asp:UpdatePanel runat="server" UpdateMode="Conditional" ChildrenAsTriggers="true">
@@ -370,6 +417,39 @@
                         </ItemTemplate>
                     </asp:TemplateField>
 
+
+                    
+                    <%-- 20 --%>
+                    <asp:TemplateField HeaderText="Última Imagen">
+                        <ItemStyle Width="150px" />
+                        <ItemTemplate>
+
+                            <div class="portfolio-content portfolio-1">
+                                <div id="js-filters-juicy-projects" class="cbp-l-filters-button">                                   
+                                </div>
+                                <div id="js-grid-juicy-projects" class="cbp">
+
+                                    <div class="cbp-item graphic">
+                                        <div class="cbp-caption">
+                                            <div class="cbp-caption-defaultWrap">
+                                                <img class="cbp-img-ajustada"  src='<%# String.Format("/ashx/SIGWeb.ashx?Metodo=GetImg&r={0}", Extensiones.Encripta(Eval("RutaUltimaImagen").ToString))  %>' 
+                                                    onerror="this.style.display='none';"
+                                                    onclick="abrirModal(this.src)">
+                                                <%--<img class="cbp-img-ajustada lazy-img" data-src='<%# String.Format("/ashx/SIGWeb.ashx?Metodo=GetImg&r={0}", Extensiones.Encripta(Eval("RutaUltimaImagen").ToString))  %>' onerror="this.style.display='none';" alt="">--%>
+                                            </div>
+                                            <div class="cbp-caption-activeWrap">
+                                                <div class="cbp-l-caption-alignCenter">
+                                                    <div class="cbp-l-caption-body">                                                        
+                                                    </div>
+                                                </div>
+                                            </div>
+                                        </div>                                        
+                                    </div>
+                                </div>
+                            </div>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+
                 </Columns>
             </asp:GridView>
 
@@ -436,30 +516,18 @@
                                        <td style="text-align: left;">
                                            <asp:CheckBox ID="ChkFechaBaja" runat="server" Text="&nbsp;Fecha Baja" /></td>
                                        <td style="text-align: left;">
-                                           <asp:CheckBox ID="CheckBox1" runat="server" Text="&nbsp;No Serie" /></td>
+    <asp:CheckBox ID="ChkProyecto" runat="server" Text="&nbsp;Proyecto" /></td>                                       
-                                       <td style="text-align: left;">
+<td style="text-align: left;">
-                                           <asp:CheckBox ID="CheckBox2" runat="server" Text="&nbsp;Estado Activo Fijo" /></td>
+    <asp:CheckBox ID="ChkNombreCliente" runat="server" Text="&nbsp;Nombre Cliente" /></td>
-                                       <td style="text-align: left;">
+<td style="text-align: left;">
-                                           <asp:CheckBox ID="CheckBox3" runat="server" Text="&nbsp;Responsable" /></td>
+    <asp:CheckBox ID="ChkObservaciones" runat="server" Text="&nbsp;Observaciones" /></td>
+                                      
                                    </tr>
-                                   <tr>
+                                   <tr>                                       
                                        <td style="text-align: left;">
-                                           <asp:CheckBox ID="ChkProyecto" runat="server" Text="&nbsp;Proyecto" /></td>
+                                        <asp:CheckBox ID="ChkUltimaImagen" runat="server" Text="&nbsp;Última Imagen" /></td>
-                                       <td style="text-align: left;">
-                                           <asp:CheckBox ID="CheckBox4" runat="server" Text="&nbsp;Sub Proyecto" /></td>
-                                       <td style="text-align: left;">
-                                           <asp:CheckBox ID="ChkNombreCliente" runat="server" Text="&nbsp;Nombre Cliente" /></td>
-                                       <td style="text-align: left;">
-                                           <asp:CheckBox ID="ChkObservaciones" runat="server" Text="&nbsp;Observaciones" /></td>
                                    </tr>
 
-
-
-
-
-
-
-
                                </tbody>
                            </table>
 
@@ -496,7 +564,10 @@
 
 
 
-
+    <div id="imgModal" class="img-modal">
+    <span class="img-modal-close" onclick="cerrarModal()">&times;</span>
+    <img class="img-modal-content" id="imgModalContent" alt="Vista ampliada">
+</div>
 
 
 </asp:Content>
@@ -516,4 +587,57 @@
         }
 
     </script>--%>
+
+    <%--<script>
+        document.addEventListener("DOMContentLoaded", function () {
+            const lazyImages = document.querySelectorAll("img.lazy-img");
+
+            const observer = new IntersectionObserver(function (entries, observer) {
+                entries.forEach(function (entry) {
+                    if (entry.isIntersecting) {
+                        const img = entry.target;
+                        const src = img.getAttribute("data-src");
+                        if (src) {
+                            img.src = src;
+                            img.removeAttribute("data-src");
+                        }
+                        observer.unobserve(img);
+                    }
+                });
+            }, {
+                rootMargin: "100px", // anticipa un poco la carga
+                threshold: 0.01
+            });
+
+            lazyImages.forEach(function (img) {
+                observer.observe(img);
+            });
+        });
+    </script>--%>
+    <script>
+        function verEnPantallaCompleta(imgElement) {
+            if (imgElement.requestFullscreen) {
+                imgElement.requestFullscreen();
+            } else if (imgElement.webkitRequestFullscreen) { /* Safari */
+                imgElement.webkitRequestFullscreen();
+            } else if (imgElement.msRequestFullscreen) { /* IE11 */
+                imgElement.msRequestFullscreen();
+            }
+        }
+    </script>
+
+    <script>
+        function abrirModal(src) {
+            var modal = document.getElementById("imgModal");
+            var modalImg = document.getElementById("imgModalContent");
+            modalImg.src = src;
+            modal.style.display = "block";
+        }
+
+        function cerrarModal() {
+            document.getElementById("imgModal").style.display = "none";
+        }
+    </script>
+
+
 </asp:Content>

AF/CatAF.aspx.vb

@@ -53,6 +53,14 @@ Partial Class AF_CatAF
             CargaCombos()
             CargaCaracteristicas()
 
+            If UsuarioActual.CveEmpresa = 13 Then
+                ChkUltimaImagen.Checked = True
+                ChkMarcaActivoFijo.Checked = True
+                ChkModeloActivoFijo.Checked = True
+                ChkNoSerie.Checked = True
+                ChkObservaciones.Checked = True
+            End If
+
             If (Request("GPO") IsNot Nothing AndAlso Request("GPO").ToEntero() > 0) Then
                 CargaParametrosInicial()
             Else
@@ -62,6 +70,7 @@ Partial Class AF_CatAF
             CargaPersonalizacion()
 
 
+
         End If
     End Sub
 
@@ -598,6 +607,8 @@ Partial Class AF_CatAF
 
         If ChkObservaciones.Checked Then ListPersonalizada.Add("Observaciones")
 
+        If ChkUltimaImagen.Checked Then ListPersonalizada.Add("UltimaImagen")
+
 
         If objUsuario.AddUsuariosPersonalizaciones(UsuarioActual, "CatAF.aspx", String.Join("|", ListPersonalizada)) Then
             'Alert("Personalizacion guardada")
@@ -638,6 +649,15 @@ Partial Class AF_CatAF
             'ChkSubProyecto.Checked = False
             ChkNombreCliente.Checked = False
             ChkObservaciones.Checked = False
+            ChkUltimaImagen.Checked = False
+
+            If UsuarioActual.CveEmpresa = 13 Then
+                ChkUltimaImagen.Checked = True
+                ChkMarcaActivoFijo.Checked = True
+                ChkModeloActivoFijo.Checked = True
+                ChkNoSerie.Checked = True
+                ChkObservaciones.Checked = True
+            End If
 
             Dim Personalizaciones As String() = strBasePersonalizacion.Split("|"c)
 
@@ -703,6 +723,9 @@ Partial Class AF_CatAF
                     Case "Observaciones"
                         ChkObservaciones.Checked = True
                         Exit Select
+                    Case "UltimaImagen"
+                        ChkUltimaImagen.Checked = True
+                        Exit Select
                     Case Else
                         Exit Select
                 End Select
@@ -762,6 +785,7 @@ Partial Class AF_CatAF
         'GvDatos.Columns(18).Visible = ChkSubProyecto.Checked
         GvDatos.Columns(18).Visible = ChkNombreCliente.Checked
         GvDatos.Columns(19).Visible = ChkObservaciones.Checked
+        GvDatos.Columns(20).Visible = ChkUltimaImagen.Checked
 
 
 

App_Code/ClsBancos.vb

@@ -1593,7 +1593,14 @@ Public Class ClsBancos
             '		Me.OnError("Ocurrió un error al guardar los cambios en el Banco", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
             '	End If
         Catch ex As Exception
-            OnError("Ocurrió un error al guardar los cambios en el Banco IE Conciliar.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+
+            If ex.Message.Contains("Número: 2601;") Then
+                Alert("Ya existe un movimiento bancario con el mismo Folio: <b>" & Folio & "</b>.", TipoMensaje.MsgAdvertencia)
+                Me.OnError("Ocurrió un error al Guardar el Movimiento. Ya existe un movimiento bancario con el mismo Folio: <b>" & Folio & "</b>.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            Else
+                OnError("Ocurrió un error al guardar los cambios en el Banco IE Conciliar.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+            End If
+
         End Try
 
         Return Retorno

Compras/PopUpVerFactura.aspx.vb

@@ -3538,7 +3538,12 @@ Partial Class PopUpVerFactura
                         params.Add(New ReportParameter("Almacen", Almacen))
                         params.Add(New ReportParameter("Fecha", Fecha))
                         params.Add(New ReportParameter("FacturaProveedor", FolioVenta))
-                        params.Add(New ReportParameter("FacturadoA", If(DtMovimientos(0)("Nombre").ToString <> "", DtMovimientos(0)("Nombre").ToString, NombreCliente)))
+                        If NombreCliente = "" Then
+                            params.Add(New ReportParameter("FacturadoA", Recibio))
+                        Else
+                            params.Add(New ReportParameter("FacturadoA", If(DtMovimientos(0)("Nombre").ToString <> "", DtMovimientos(0)("Nombre").ToString, NombreCliente)))
+                        End If
+
                         params.Add(New ReportParameter("Observaciones", Observaciones))
                         params.Add(New ReportParameter("FechaImpresion", NowADS().ToString("dd/MM/yyyy")))
                         params.Add(New ReportParameter("Folio", Folio))

Empresas/Grales/Formatos/Salida.rdlc

@@ -1104,7 +1104,7 @@
               <Top>0.79361cm</Top>
               <Left>11.65255cm</Left>
               <Height>0.6cm</Height>
-              <Width>9.5262cm</Width>
+              <Width>9.15694cm</Width>
               <ZIndex>4</ZIndex>
               <Style>
                 <Border>

Inventarios/EntradasSalidas.aspx

@@ -259,13 +259,14 @@
                                             <div class="col-md-2">
                                                 <asp:TextBox ID="TxtGuia" runat="server" MaxLength="20" Width="100%"></asp:TextBox>
                                             </div>
-                                            <div class="col-md-6" runat="server" id="TrResponsable">
+                                           
-                                                <label class="col-md-1" style="width: 110px">Recibe:</label>
+                                        </div>
-                                                <div class="col-md-3">
+                                        <div class="row" id="TrResponsable" runat="server" visible="false" >
-                                                    <asp:TextBox runat="server" Text="" ID="TxtResponsable" Width="100%" />
+                                             
-                                                    <%--<asp:DropDownList ID="DdlResponsable" runat="server" DataTextField="Nombre" DataValueField="CveUsuario" CssClass="form-control input-sm" Style="width: 200px !important;"></asp:DropDownList>--%>
+                                                 <label class="col-md-1" style="width: 110px">Recibe:</label>
-                                                </div>
+                                                 <div class="col-md-5">
-                                            </div>
+                                                     <asp:TextBox runat="server" Text="" ID="TxtResponsable" Width="100%"  ssClass="form-control input-sm"  />                                             
+                                                 </div>                                             
                                         </div>
 
                                         <div class="row">

Inventarios/EntradasSalidas.aspx.vb

@@ -722,6 +722,8 @@ Partial Class Inventarios_EntradasSalidas
         DdlConcepto.DataSource = GlobalDTInvConceptos.FiltraParametros(IIf(UsuarioActual.CveEmpresa.Contiene(72, 80, 1), "CveConcepto NOT IN (4,5,10)", "CveConcepto NOT IN (1,2,4,5,8,9,10,12,26,27,29)").ToString)
         DdlConcepto.DataBind()
 
+
+
         'Llenar el dropdownlist de almacén
         If Not IfNull(Request("CI"), -1).ToString.ToEntero > 0 AndAlso Not IfNull(Request("CveEntregaAlmacen"), -1).ToString.ToEntero > 0 Then
             DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (9,11)") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa)
@@ -2589,6 +2591,9 @@ Partial Class Inventarios_EntradasSalidas
 
 
         If CveMovimiento > 0 And Not EsNuevoMov Then
+            If Not DdlConcepto.SelectedValue.Contiene("10", "28") Then
+                TrResponsable.Visible = True
+            End If
             Exit Sub
         End If