Merge branch 'master' of http://192.168.10.111:8383/SIG

App_Code/ClsAF.vb

@@ -530,7 +530,7 @@ Public Class ClsAF
         Return Retorno
     End Function
 
-    Public Function UpdateActivosFijosCompra(CveActivoFijo As Integer, CveCompraDetalle As Integer, TipoAF As Integer, ValorCompra As Double, FechaCompra As Date) As Boolean
+    Public Function UpdateActivosFijosCompra(CveActivoFijo As Integer, CveCompraDetalle As Integer, TipoAF As Integer, ValorCompra As Double, FechaCompra As Date, Optional Opcion As Integer = 1) As Boolean
         Dim Retorno As Boolean = False
 
         DataAdapter("PA_AF_ActivosFijosCompraUpdate")
@@ -541,6 +541,7 @@ Public Class ClsAF
             .Add("@TipoAF", SqlDbType.Int).Value = TipoAF
             .Add("@ValorCompra", SqlDbType.Float).Value = ValorCompra
             .Add("@FechaCompra", SqlDbType.Date).Value = FechaCompra
+            .Add("@Opcion", SqlDbType.Int).Value = Opcion  ' Opcion 1 es la actualiacion normal , opcion 2 Desvicula   los AF en base a la CveComrpaDetalle(en tabla  AF_ActivosFijos pone el campo CveComrpaDetalle en null en base a CveComrpaDetalle )
         End With
 
         Try

App_Code/ClsInventarios.vb

@@ -1702,7 +1702,7 @@ Public Class ClsInventarios
 
 #Region "  INVENTARIOS - REPORTES  "
 
-    Public Function RepExistenciasCostos(FechaI As Date, FechaF As Date, CveMoneda As Integer, CveProveedores As Integer, CveConcepto As Integer, CvePS As Integer, CveEmpresa As Integer, CveAlmacen As Integer, CveUsuario As Integer, Optional CveClasificacion As Integer = -1, Optional CvePersonal As Integer = -1) As Boolean
+    Public Function RepExistenciasCostos(FechaI As Date, FechaF As Date, CveMoneda As Integer, CveProveedores As Integer, CveConcepto As Integer, CvePS As Integer, CveEmpresa As Integer, CveAlmacen As String, CveUsuario As Integer, Optional CveClasificacion As Integer = -1, Optional CvePersonal As Integer = -1) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Inv_RepExistenciasCostosGet")
         With SqlAdapter.SelectCommand.Parameters
@@ -1710,7 +1710,7 @@ Public Class ClsInventarios
             .Add("@CveConcepto", SqlDbType.Int).Value = CveConcepto
             .Add("@CveMoneda", SqlDbType.Int).Value = CveMoneda
             .Add("@CvePS", SqlDbType.Int).Value = CvePS
-            .Add("@CveAlmacen", SqlDbType.Int).Value = CveAlmacen
+            .Add("@CveAlmacen", SqlDbType.VarChar).Value = CveAlmacen
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
             .Add("@FechaI", SqlDbType.Date).Value = FechaI
             .Add("@FechaF", SqlDbType.Date).Value = FechaF

CRM/Acercamiento.aspx.cs

@@ -653,7 +653,7 @@ public partial class CRM_Acercamiento : ClsPaginas
             Double Comision = TxtComision.Text.ToDouble();
 
             int Prioridad = DdlPrioridad.SelectedValue.ToEntero();
-
+            int CveRechazoMotivo = DdlRechazoMotivo.SelectedValue.ToEntero();
             int CveUsuarioIng = UsuarioActual.CveUsuario;
 
             if (CveEncuestaProcesoCRM > 0)
@@ -675,8 +675,10 @@ public partial class CRM_Acercamiento : ClsPaginas
             AcercaminetoModel.CveUsuarioIng = UsuarioActual.CveUsuario;
             AcercaminetoModel.CveEncuestaAplicadaProceso = CveEncuestaAplicadaProceso;
             AcercaminetoModel.FechaApertura = FechaApertura;
-            AcercaminetoModel.FechaCierre = (DateTime)FechaCierre;
+            AcercaminetoModel.FechaCierre = FechaCierre != null ? (DateTime)FechaCierre : ModExtensiones.MinFecha;
             AcercaminetoModel.CvePS = DdlPS.SelectedValue.ToEntero();
+            AcercaminetoModel.CveRechazoMotivo = CveRechazoMotivo;
+
 
             if (cRMService.AcercamientoUpdate(AcercaminetoModel))
             {

Compras/Compras.aspx

@@ -734,7 +734,7 @@
                                     </asp:Panel>
 
 
-                                    <asp:GridView ID="GvPS" ShowHeader="false" runat="server" AutoGenerateColumns="False" DataKeyNames="CvePS,Cantidad,CveUM,UM,PU,Descuento,OtrosGastos,CvePresupuestoEgreso,PS,Clasificacion,CveClasificacion,CveOrdenCompraDetalle,IVA,IVAPorcentaje,RetIVAPorcentaje,RetISRPorcentaje,IEPSPSPorcentaje,Obs,Total,CveProyecto,CveSubProyecto,Proyecto,SubProyecto,Consec,CveTipoGasto,NoDeducible,DifPSSat" GridLines="none" BorderWidth="0" EmptyDataText="Sin Productos o Servicios agregados" CssClass="table GvPS table-striped table-hover table-advance Widthall ScrollAD mysmallbtn"  >
+                                    <asp:GridView ID="GvPS" ShowHeader="false" runat="server" AutoGenerateColumns="False" DataKeyNames="CvePS,Cantidad,CveUM,UM,PU,Descuento,OtrosGastos,CvePresupuestoEgreso,PS,Clasificacion,CveClasificacion,CveOrdenCompraDetalle,IVA,IVAPorcentaje,RetIVAPorcentaje,RetISRPorcentaje,IEPSPSPorcentaje,Obs,Total,CveProyecto,CveSubProyecto,Proyecto,SubProyecto,Consec,CveTipoGasto,NoDeducible,DifPSSat,TipoAF" GridLines="none" BorderWidth="0" EmptyDataText="Sin Productos o Servicios agregados" CssClass="table GvPS table-striped table-hover table-advance Widthall ScrollAD mysmallbtn"  >
                                         <Columns>
                                             <%-- 0 --%>
                                             <asp:TemplateField ItemStyle-Width="15px">
@@ -4476,6 +4476,13 @@
                                                             <label for="<%= TxtIEPSModal.ClientID.ToString()%>">% IEPS:</label>
                                                         </div>
                                                     </div>
+                                                     <div class="col-md-3" runat="server" id="DVModalAddPSChkDesvincularAF" visible="false">
+                                                        <div class="form-group form-md-line-input input-iconright">
+                                                            <asp:CheckBox  runat="server" ID="ChkModalDesvincularAF" CssClass="form-control " />
+                                                            <label for="<%= ChkModalDesvincularAF.ClientID.ToString()%>">Desvicnular A.F.:</label>
+                                                        </div>
+                                                    </div>
+
                                                 </div>
                                             </ContentTemplate>
                                         </asp:UpdatePanel>

Compras/Compras.aspx.vb

@@ -1778,6 +1778,7 @@ Partial Class Compras_Compras
                         If ObjeFacturas.GetFacturasComparacionXML(Version, Xml.ToString, UsuarioActual.CveEmpresa) Then
                             TmpDT = ObjeFacturas.DtResultados
                             TmpDT.Columns.Add("CveSATPSActualizado")
+
                             'TmpDT.Columns.Add("RetIVAPorcentaje")
                             'TmpDT.Columns.Add("RetISRPorcentaje")
                             'TmpDT.Columns.Add("IEPSPSPorcentaje")
@@ -9929,6 +9930,22 @@ Partial Class Compras_Compras
 
 
 
+
+                        If Not TmpDT.Columns.Contains("DesvicularAF") Then
+                            TmpDT.Columns.Add("DesvicularAF", GetType(Boolean))
+                        End If
+
+                        For Each drowAF As DataRow In TmpDT.Rows
+                            If drowAF("DesvicularAF").ToString <> "" AndAlso Boolean.Parse(drowAF("DesvicularAF").ToString) Then
+                                If Not ObjAF.UpdateActivosFijosCompra(-1, drowAF("CveCompraDetalle").ToString.ToEntero, -1, 0, Now, Opcion:=2) Then
+                                    Retorno = False
+                                End If
+                            End If
+                        Next
+
+
+
+
                         'If UsuarioActual.Empresa.Funcionalidad(207) = "1" Then
                         If Not ActualizarPrePoliza(ObjContabilidad, ObjCompra) Then
                             Retorno = False
@@ -10513,6 +10530,9 @@ Partial Class Compras_Compras
             tipoCambioPago = 1
         End If
 
+
+
+
         If ObjConta.GetPlantillaConceptos(UsuarioActual.CveEmpresa, CvePlantillaPrePoliza) Then
             For Each Row As DataRow In ObjConta.DtResultados.Rows
 
@@ -17900,6 +17920,17 @@ Partial Class Compras_Compras
         ChkAgregar.Checked = False
         divagregrarotrops.Visible = False
 
+        DVModalAddPSChkDesvincularAF.Visible = False
+
+
+        Dim TipoAF As Integer = GvRow.DataKey("TipoAF").ToEntero
+        ChkModalDesvincularAF.Checked = False
+
+        If CveCompra > 0 AndAlso TipoAF = 2 Then
+            DVModalAddPSChkDesvincularAF.Visible = True
+        End If
+
+
         UpPSS.Update()
         RegistraScript("$('#divAddProducto').modal('show');")
     End Sub
@@ -18297,6 +18328,38 @@ Partial Class Compras_Compras
             GuardaAC()
         End If
 
+
+
+
+
+        If CveCompra > 0 AndAlso ChkModalDesvincularAF.Checked Then
+
+
+            If Not TmpDT.Columns.Contains("DesvicularAF") Then
+                TmpDT.Columns.Add("DesvicularAF", GetType(Boolean))
+            End If
+
+            Dim CveCompraDetalleDesvicnualarAF As Integer = TmpDT.FiltroPrimeroValor("CveCompraDetalle", $"Consec={Index}").ToEntero
+            'If ObjAF.UpdateActivosFijosCompra(-1, CveCompraDetalleDesvicnualarAF, -1, 0, Now, Opcion:=2) Then
+
+            For Each dRow As DataRow In TmpDT.Rows
+
+                If dRow("CveCompraDetalle").ToString.ToEntero = CveCompraDetalleDesvicnualarAF Then
+                    dRow("TipoAF") = 0
+                    dRow("CveActivoFijo") = 0
+                    dRow("DesvicularAF") = True
+
+                End If
+
+            Next
+                TmpDT.AcceptChanges()
+            'Else
+            '    Retorno = False
+            'End If
+
+
+        End If
+
         UpPS.Update()
         CargaGvPersonal()
 

Empresas/152/Formatos/Factura.rdlc

@@ -2620,7 +2620,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox42</rd:DefaultName>
-            <Top>5.91303in</Top>
+            <Top>5.61303in</Top>
             <Left>7.16224in</Left>
             <Height>0.17708in</Height>
             <Width>0.98426in</Width>
@@ -2655,7 +2655,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox42</rd:DefaultName>
-            <Top>6.1055in</Top>
+            <Top>5.8055in</Top>
             <Left>7.16224in</Left>
             <Height>0.17966in</Height>
             <Width>0.98425in</Width>
@@ -2690,7 +2690,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox42</rd:DefaultName>
-            <Top>6.30449in</Top>
+            <Top>6.00449in</Top>
             <Left>7.17266in</Left>
             <Height>0.18819in</Height>
             <Width>0.98425in</Width>
@@ -2726,7 +2726,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox42</rd:DefaultName>
-            <Top>6.51074in</Top>
+            <Top>6.21074in</Top>
             <Left>7.17266in</Left>
             <Height>0.17119in</Height>
             <Width>0.98425in</Width>
@@ -2762,7 +2762,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox42</rd:DefaultName>
-            <Top>6.70137in</Top>
+            <Top>6.40137in</Top>
             <Left>7.18308in</Left>
             <Height>0.19596in</Height>
             <Width>0.98425in</Width>

GPS/PalletEtiquetaCaja.rdlc

@@ -898,7 +898,6 @@ KM12 HERMOSILLO, SONORA</Value>
                           </Style>
                         </Textbox>
                         <ColSpan>5</ColSpan>
-                        <rd:Selected>true</rd:Selected>
                       </CellContents>
                     </TablixCell>
                     <TablixCell />
@@ -2457,41 +2456,20 @@ KM12 HERMOSILLO, SONORA</Value>
                   </TablixCells>
                 </TablixRow>
                 <TablixRow>
-                  <Height>1.44667cm</Height>
+                  <Height>1.18209cm</Height>
                   <TablixCells>
                     <TablixCell>
                       <CellContents>
-                        <Textbox Name="Textbox821">
+                        <Image Name="Image2">
-                          <CanGrow>true</CanGrow>
+                          <Source>Embedded</Source>
-                          <KeepTogether>true</KeepTogether>
+                          <Value>CodBarr</Value>
-                          <Paragraphs>
+                          <Sizing>FitProportional</Sizing>
-                            <Paragraph>
-                              <TextRuns>
-                                <TextRun>
-                                  <Value>=Parameters!noPallet.Value</Value>
-                                  <Style>
-                                    <FontFamily>Free 3 of 9 Extended</FontFamily>
-                                    <FontSize>41pt</FontSize>
-                                  </Style>
-                                </TextRun>
-                              </TextRuns>
-                              <Style>
-                                <TextAlign>Center</TextAlign>
-                              </Style>
-                            </Paragraph>
-                          </Paragraphs>
-                          <rd:DefaultName>Textbox821</rd:DefaultName>
                           <Style>
                             <Border>
                               <Style>None</Style>
                             </Border>
-                            <VerticalAlign>Bottom</VerticalAlign>
-                            <PaddingLeft>2pt</PaddingLeft>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
-                        </Textbox>
+                        </Image>
                         <ColSpan>5</ColSpan>
                       </CellContents>
                     </TablixCell>
@@ -2501,37 +2479,16 @@ KM12 HERMOSILLO, SONORA</Value>
                     <TablixCell />
                     <TablixCell>
                       <CellContents>
-                        <Textbox Name="Textbox822">
+                        <Image Name="Image3">
-                          <CanGrow>true</CanGrow>
+                          <Source>Embedded</Source>
-                          <KeepTogether>true</KeepTogether>
+                          <Value>CodBarr</Value>
-                          <Paragraphs>
+                          <Sizing>FitProportional</Sizing>
-                            <Paragraph>
-                              <TextRuns>
-                                <TextRun>
-                                  <Value>=Parameters!noPallet.Value</Value>
-                                  <Style>
-                                    <FontFamily>Free 3 of 9 Extended</FontFamily>
-                                    <FontSize>41pt</FontSize>
-                                  </Style>
-                                </TextRun>
-                              </TextRuns>
-                              <Style>
-                                <TextAlign>Center</TextAlign>
-                              </Style>
-                            </Paragraph>
-                          </Paragraphs>
-                          <rd:DefaultName>Textbox821</rd:DefaultName>
                           <Style>
                             <Border>
                               <Style>None</Style>
                             </Border>
-                            <VerticalAlign>Bottom</VerticalAlign>
-                            <PaddingLeft>2pt</PaddingLeft>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
-                        </Textbox>
+                        </Image>
                         <ColSpan>5</ColSpan>
                       </CellContents>
                     </TablixCell>
@@ -2542,7 +2499,7 @@ KM12 HERMOSILLO, SONORA</Value>
                   </TablixCells>
                 </TablixRow>
                 <TablixRow>
-                  <Height>0.62646cm</Height>
+                  <Height>0.49417cm</Height>
                   <TablixCells>
                     <TablixCell>
                       <CellContents>
@@ -3026,8 +2983,8 @@ Produce of MX.</Value>
             </TablixRowHierarchy>
             <Top>0.07228cm</Top>
             <Left>0.05625cm</Left>
-            <Height>10.59604cm</Height>
+            <Height>10.19917cm</Height>
-            <Width>10.52137cm</Width>
+            <Width>10.52136cm</Width>
             <Style>
               <Border>
                 <Style>None</Style>
@@ -3229,6 +3186,13 @@ tz/88IQXNLT1jvK6x5rYowb8xgXvcqDTfe8tfhiRVs/61rv+9bCPvexnT/va2/72uM+97nfP+977/vfA
 +qAIhvmYQymZeniYlTmZkGmZjrmZmpmZl0mZkfmZoxmanmmaoNmZqemNosmZrHmaqlkQibmWNtiYr/mWwTiMaqEPiwAAd0gk9NiHEMCbJGiCrDeQyqCYPamXg7l7EZiT3hiYRCGZ4ficlxmY1kmI2EkF0PmTZZid0fmd3Hmd4tmdtHkK4Omd6Dme2lme5Lme5lmY8Pme6Xme9Smf9ymdNUGdrBmf+okQxWieSYmEzEmKFFiMReCGcsicfTiTBcGfzVmTVPAA5Imby8maFNqe0SCG/jl+HFqhH6qhIRqeG8qeJDqi3v9Zoh2qoiBqoimKorTJoiLqojEKo7ZJohhaoXJ5kjUxDzFwAwKRA3qpiMNYjJKIfsNwgUU4oLqpoREKfDDakWqpnggRpdRZn1I6n/vpnluqpQxxpTSapVgKpgJKpm9ppl06plz6pWuKEGjKpoIpn1UaphAKl62nD8vYlwhhgatIjLFYEHYpoHz6h8D4n0/aexc6pzN5o/uQqIAqmo66D2IImZE6qUv5hZbKqJlaqZCKqZ2qh5vqqZQqqpcKqp/KEKFqqqOqqhb6hZz6hQPJepjpjb0ZAE0aqDqKgpLYpBsYqYeqe5FplQKapd44l2AZrGJZmcKqrMmKrMdqrGTprNHMCq1wKa3VSq1Caa3Ziq1Uqa3dyq1KOZ1q6a3h+pNBuXpyupbr95ZU2Z68GIxu2Xp1+qu7F6uxmqIMEasWqa/6yK8+6K8ICYb/6pD7SrD9arADy4QJ64QL+4MNK7AB+5APK7GFCqsI65gCOqtJmaHBCARxGYx3EJU/CZEFiq/0ynu+WLEcmbKyKIqtuIqvWIu0CLO2KLMvO4s367KgiLM7q7Mty4o9C7Q/G7M0e67nWZRFe5MpqRbLiACOmKQQCYYRqRbFSI39F41S+3rpwXqyu6eES2qyWIiEcWiwUwiGZfuQZ+u1Y8uEafuEZnuFb5uFYUu2cIu2CjG1Trq2NWGRG6gIdgiBCqoQ
 0FkLf3uGgTsQGeurXIt7CqgW89p/BuiAAii5BAi5D3h/l1uAmWu5k4u5nau5n8u5lZuAkeu5o9u4oOsACOimUyq6CDiSvOqNvOCBDUCoRtoX3YkMMCAQtQugnQEAw/q4izu8xFu8xnu8yJu8yru8zNu8zvu80Bu90ju91Fu91nu92Lu4AQEAOw==</ImageData>
     </EmbeddedImage>
+    <EmbeddedImage Name="CodBarr">
+      <MIMEType>image/png</MIMEType>
+      <ImageData>iVBORw0KGgoAAAANSUhEUgAAAWMAAABVCAYAAACcloXlAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAhwSURBVHhe7ZZRThxmDAY5FwfiPJwml+GFm2yJZTcr+XOtYrtt1LE0CvllVhPkjHh5MOP5/Pz0rxjm/z38X/j+vPz84QEAwL/L02/GPx5vLy+PF+Pt629/MR/vj9fYfXva/PHm3695ff/wxZ+reif49bEfj/fXeH99/PqIZ1/B6/vXd/pUvmI+3l///Iz/hK9i4d/w93yf7mHRTXHq+/wzVvPN+9VuijvfZ7fuZzz3Ffwu96vm2ffZ7R/t2ddvxv7n1/xu8t88jmdfMcTYn6t7WHRTnPoSY2PuKyDGcifofYlxGmLsz9U9LLopTn2JsTH3FRBjuRP0vsQ4DTH25+oeFt0Up77E2Jj7Coix3Al6X2Kchhj7c3UPi26KU19ibMx9BcRY7gS9LzFOQ4z9ubqHRTfFqS8xNua+AmIsd4LelxinIcb+XN3Dopvi1JcYG3NfATGWO0HvS4zTEGN/ru5h0U1x6kuMjbmvgBjLnaD3JcZpiLE/V/ew6KY49SXGxtxXQIzlTtD7EuM0xNifq3tYdFOc+hJjY+4rIMZyJ+h9iXEaYuzP1T0suilOfYmxMfcVEGO5E/S+xDgNMfbn6h4W3RSnvsTYmPsKiLHcCXpfYpyGGPtzdQ+LbopTX2JszH0FxFjuBL0vMU5DjP25uodFN8WpLzE25r4CYix3gt6XGKchxv5c3cOim+LUlxgbc18BMZY7Qe9LjNMQY3+u7mHRTXHqS4yNua+AGMudoPclxmmIsT9X97Dopjj1JcbG3FdAjOVO0PsS4zTE2J+re1h0U5z6EmNj7isgxnIn6H2JcRpi7M/VPSy6KU59ibEx9xUQY7kT9L7EOA0x9ufqHhbdFKe+xNiY+wqIsdwJel9inIYY+3N1D4tu
+ilNfYmzMfQXEWO4EvS8xTkOM/bm6h0U3xakvMTbmvgJiLHeC3pcYpyHG/lzdw6Kb4tSXGBtzXwExljtB70uM0xBjf67uYdFNcepLjI25r4AYy52g9yXGaYixP1f3sOimOPUlxsbcV0CM5U7Q+xLjNMTYn6t7WHRTnPoSY2PuKyDGcifofYlxGmLsz9U9LLopTn2JsTH3FRBjuRP0vsQ4DTH25+oeFt0Up77E2Jj7Coix3Al6X2Kchhj7c3UPi26KU19ibMx9BcRY7gS9LzFOQ4z9ubqHRTfFqS8xNua+AmIsd4LelxinIcb+XN3Dopvi1JcYG3NfATGWO0HvS4zTEGN/ru5h0U1x6kuMjbmvgBjLnaD3JcZpiLE/V/ew6KY49SXGxtxXQIzlTtD7EuM0xNifq3tYdFOc+hJjY+4rIMZyJ+h9iXEaYuzP1T0suilOfYmxMfcVEGO5E/S+xDgNMfbn6h4W3RSnvsTYmPsKiLHcCXpfYpyGGPtzdQ+LbopTX2JszH0FxFjuBL0vMU5DjP25uodFN8WpLzE25r4CYix3gt6XGKchxv5c3cOim+LUlxgbc18BMZY7Qe9LjNMQY3+u7mHRTXHqS4yNua+AGMudoPclxmmIsT9X97Dopjj1JcbG3FdAjOVO0PsS4zTE2J+re1h0U5z6EmNj7isgxnIn6H2JcRpi7M/VPSy6KU59ibEx9xUQY7kT9L7EOA0x9ufqHhbdFKe+xNiY+wqIsdwJel9inIYY+3N1D4tuilNfYmzMfQXEWO4EvS8xTkOM/bm6h0U3xakvMTbmvgJiLHeC3pcYpyHG/lzdw6Kb4tSXGBtzXwExljtB70uM0xBjf67uYdFNcepLjI25r4AYy52g9yXGaYixP1f3sOimOPUlxsbcV0CM5U7Q+xLjNMTYn6t7WHRTnPoSY2PuKyDGcifofYlxGmLsz9U9LLopTn2JsTH3FRBjuRP0vsQ4DTH25+oeFt0Up77E2Jj7Coix
+3Al6X2Kchhj7c3UPi26KU19ibMx9BcRY7gS9LzFOQ4z9ubqHRTfFqS8xNua+AmIsd4LelxinIcb+XN3Dopvi1JcYG3NfATGWO0HvS4zTEGN/ru5h0U1x6kuMjbmvgBjLnaD3JcZpiLE/V/ew6KY49SXGxtxXQIzlTtD7EuM0xNifq3tYdFOc+hJjY+4rIMZyJ+h9iXEaYuzP1T0suilOfYmxMfcVEGO5E/S+xDgNMfbn6h4W3RSnvsTYmPsKiLHcCXpfYpyGGPtzdQ+LbopTX2JszH0FxFjuBL0vMU5DjP25uodFN8WpLzE25r4CYix3gt6XGKchxv5c3cOim+LUlxgbc18BMZY7Qe9LjNMQY3+u7mHRTXHqS4yNua+AGMudoPclxmmIsT9X97Dopjj1JcbG3FdAjOVO0PsS4zTE2J+re1h0U5z6EmNj7isgxnIn6H2JcRpi7M/VPSy6KU59ibEx9xUQY7kT9L7EOA0x9ufqHhbdFKe+xNiY+wqIsdwJel9inIYY+3N1D4tuilNfYmzMfQXEWO4EvS8xTkOM/bm6h0U3xakvMTbmvgJiLHeC3pcYpyHG/lzdw6Kb4tSXGBtzXwExljtB70uM0xBjf67uYdFNcepLjI25r4AYy52g9yXGaYixP1f3sOimOPUlxsbcV0CM5U7Q+xLjNMTYn6t7WHRTnPoSY2PuKyDGcifofYlxGmLsz9U9LLopTn2JsTH3FRBjuRP0vsQ4DTH25+oeFt0Up77E2Jj7Coix3Al6X2Kchhj7c3UPi26KU19ibMx9BcRY7gS9LzFOQ4z9ubqHRTfFqS8xNua+AmIsd4LelxinIcb+XN3Dopvi1JcYG3NfATGWO0HvS4zTEGN/ru5h0U1x6kuMjbmvgBjLnaD3JcZpiLE/V/ew6KY49SXGxtxXQIzlTtD7EuM0xNifq3tYdFOc+hJjY+4rIMZyJ+h9iXEaYuzP1T0suilOfYmxMfcVEGO5E/S+j8cfhNAi
+G/UY+X4AAAAASUVORK5CYII=</ImageData>
+    </EmbeddedImage>
   </EmbeddedImages>
   <rd:ReportUnitType>Cm</rd:ReportUnitType>
   <rd:ReportID>ab0e0117-79b9-44e9-a7a3-e3d163f1ee55</rd:ReportID>

Inventarios/RepEntradasSalidas.aspx

@@ -208,7 +208,9 @@
 
     <asp:UpdatePanel ID="UPPMov" runat="server" RenderMode="Inline" UpdateMode="Conditional">
         <ContentTemplate>
-            <asp:GridView ID="GvM" Width="100%" runat="server" data-sort="false" GridLines="None"  CssClass="table table-smallpadding table-striped table-hover Widthall ScrollAD" ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true" AutoGenerateColumns="False" AllowPaging="False" ShowFooter="False">
+            <asp:GridView ID="GvM" Width="100%" runat="server" data-sort="false" GridLines="None"  CssClass="table table-smallpadding table-striped table-hover Widthall ScrollAD" 
+                DataKeyNames="CvePS,CveMoneda,CveProveedor,CveConcepto,FechaI,FechaF,CveAlmacen,CvePersonal,Codigo,Codigo2,PS"
+                ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true" AutoGenerateColumns="False" AllowPaging="False" ShowFooter="False">
                 <Columns>
                     <asp:HyperLinkField  DataNavigateUrlFields="CvePS,CveMoneda,CveProveedor,CveConcepto,FechaI,FechaF,CveAlmacen,CvePersonal" DataNavigateUrlFormatString="~/Inventarios/RepExistenciasCostos.aspx?CvePS={0}&CveMoneda={1}&CveProveedor={2}&CveConcepto={3}&FechaI={4}&FechaF={5}&CveAlmacen={6}&CvePersonal={7}" Target="_blank" ItemStyle-Width="10%" HeaderText="Código" ControlStyle-CssClass="Texto" ItemStyle-HorizontalAlign="Left" DataTextField="Codigo" />
                     <asp:HyperLinkField DataNavigateUrlFields="CvePS,CveMoneda,CveProveedor,CveConcepto,FechaI,FechaF,CveAlmacen,CvePersonal" DataNavigateUrlFormatString="~/Inventarios/RepExistenciasCostos.aspx?CvePS={0}&CveMoneda={1}&CveProveedor={2}&CveConcepto={3}&FechaI={4}&FechaF={5}&CveAlmacen={6}&CvePersonal={7}" Target="_blank" ItemStyle-Width="10%" HeaderText="Código2" ControlStyle-CssClass="Texto" ItemStyle-HorizontalAlign="Left" Visible="False" DataTextField="Codigo2" />

Inventarios/RepEntradasSalidas.aspx.vb

@@ -293,7 +293,13 @@ Partial Class Inventarios_ReporteEntradasSalidas
     Protected Sub gvMovimientos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvM.RowDataBound
         If e.Row.RowType = DataControlRowType.DataRow Then
             If e.Row.DBCampo("CvePS").ToEntero <= 0 Then
+
                 e.Row.CssClass = "Totales"
+                Dim Almacenes As String = If(DdlAlmacen.GetSelectedValuesM = "", "-1", DdlAlmacen.GetSelectedValuesM)
+                'e.Row.Cells(0).Text = $"<a class='Texto' href='./RepExistenciasCostos.aspx?CvePS={e.Row.DataKey("CvePS")}&CveMoneda={e.Row.DataKey("CveMoneda")}&CveProveedor={e.Row.DataKey("CveProveedor")}&CveConcepto={e.Row.DataKey("CveConcepto")}&FechaI={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&FechaF={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&CveAlmacen={e.Row.DataKey("CveAlmacen")}&CvePersonal={e.Row.DataKey("CvePersonal")}'>{e.Row.DataKey("Codigo")}</a>"
+                e.Row.Cells(4).Text = $"<a class='Texto' href='./RepExistenciasCostos.aspx?CvePS={DdlPS.txtValue.Value}&CveMoneda={DdlMoneda.SelectedValue}&CveProveedor={DdlProveedor.txtValue.Value}&CveConcepto={DdlTipoMovimiento.SelectedValue}&FechaI={TxtFechaI.Text}&FechaF={TxtFechaF.Text}&CveAlmacen={Almacenes}&CvePersonal={DdlPersonal.SelectedValue}'>{e.Row.DataKey("PS")}</a>"
+                'e.Row.Cells(4).Text = $"<a class='Texto' href='./RepExistenciasCostos.aspx?CvePS={e.Row.DataKey("CvePS")}&CveMoneda={e.Row.DataKey("CveMoneda")}&CveProveedor={e.Row.DataKey("CveProveedor")}&CveConcepto={e.Row.DataKey("CveConcepto")}&FechaI={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&FechaF={e.Row.DataKey("FechaF").ToDate().ToString("dd/MM/yyyy")}&CveAlmacen={e.Row.DataKey("CveAlmacen")}&CvePersonal={e.Row.DataKey("CvePersonal")}'>{e.Row.DataKey("PS")}</a>"
+
             Else
                 e.Row.Cells(9).BackColor = Drawing.Color.LightGray
                 e.Row.Cells(13).BackColor = Drawing.Color.LightGray
@@ -306,6 +312,14 @@ Partial Class Inventarios_ReporteEntradasSalidas
                 e.Row.FCLabel("lbEntradaImp").Text = If(e.Row.DBCampo("EntradaImp").ToString().ToDecimal = 0, "-", e.Row.DBCampo("EntradaImp").ToDouble.ToString("N2"))
                 e.Row.FCLabel("lbSalidaImp").Text = If(e.Row.DBCampo("SalidaImp").ToString().ToDecimal = 0, "-", e.Row.DBCampo("SalidaImp").ToDouble.ToString("N2"))
                 e.Row.FCLabel("lbSaldoF2").Text = If(e.Row.DBCampo("SaldoFImp").ToString().ToDecimal = 0, "-", e.Row.DBCampo("SaldoFImp").ToDouble.ToString("N2"))
+
+
+
+
+                '0,1,4
+
+
+
             End If
 
         End If

Inventarios/RepExistenciasCostos.aspx.vb

@@ -60,7 +60,7 @@ Partial Class Inventarios_RepExistenciasCostos
                Request("CveMoneda") IsNot Nothing AndAlso Request("CveConcepto") IsNot Nothing AndAlso
                Request("FechaI") IsNot Nothing AndAlso Request("FechaF") IsNot Nothing Then
                 '   Alert(Request("CvePS").ToString, TipoMensaje.MsgAdvertencia)
-                Dim CveAlmacen = IfNull(Request("CveAlmacen"), "-1").ToString.ToEntero
+                Dim CveAlmacen As String = IfNull(Request("CveAlmacen"), "-1").ToString
 
                 CargaDatos(Request("CvePS").ToString.Trim.ToEntero,
                             Request("CveProveedor").ToString.Trim.ToEntero,
@@ -176,7 +176,7 @@ Partial Class Inventarios_RepExistenciasCostos
         CargaDatos(CvePS, CveProveedor, CveMoneda, CveConcepto, fechaI, fechaF, CveAlmacen, CveClasificacion, DdlPersonal.SelectedValue.ToEntero)
     End Sub
 
-    Protected Sub CargaDatos(CvePS As Integer, CveProveedor As Integer, CveMoneda As Integer, CveConcepto As Integer, FechaI As Date, FechaF As Date, CveAlmacen As Integer, CveClasificacion As Integer, CvePersonal As Integer)
+    Protected Sub CargaDatos(CvePS As Integer, CveProveedor As Integer, CveMoneda As Integer, CveConcepto As Integer, FechaI As Date, FechaF As Date, CveAlmacen As String, CveClasificacion As Integer, CvePersonal As Integer)
         If CvePS > 0 Then
             LnkKardex.Visible = True
             LnkKardex.NavigateUrl = String.Format("/Inventarios/Kardex.aspx?CvePS={0}", CvePS)

Nomina/Nomina.aspx

@@ -196,7 +196,7 @@
                 <asp:LinkButton ID="LnkTimbrarTodos" Visible="false" OnClick="LnkTimbrarTodos_Click" runat="server"><i class="fa fa-bell"></i> Timbrar todos</asp:LinkButton>
             </li>
             <li>
-                <asp:LinkButton ID="LnkRegistrarProvision" Visible="false" OnClick="LnkRegistrarProvision_Click" runat="server"><i class="fa fa-thumbs-up" aria-hidden="true"></i>Registrar provisión</asp:LinkButton>
+                <asp:LinkButton ID="LnkRegistrarProvision" Visible="false" OnClick="LnkRegistrarProvision_Click" runat="server" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea registrar provisión?" data-btn-ok-label="si" ><i class="fa fa-thumbs-up" aria-hidden="true" ></i>Registrar provisión</asp:LinkButton>
             </li>
             <li>
                 <asp:HyperLink ID="LnkProvisionNomina" Visible="false" runat="server"><i class="fa fa-eye"></i>Ver provisión</asp:HyperLink>

Nomina/Nomina.aspx.cs

@@ -439,7 +439,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
                     int CvePrePolizaProrrateo = drow["CvePrePolizaProrrateo"].ToString().ToEntero();
 
                     //LnkConceptoEmpleado.Visible = (Estatus == 1);
-                    LnkRegistrarProvision.Visible = (Estatus >= 2) && (CvePrePolizaProvision <= 0 || UsuarioActual.CveUsuario == 100);
+                    LnkRegistrarProvision.Visible = (Estatus >= 2);//&& (CvePrePolizaProvision <= 0 || UsuarioActual.CveUsuario == 100);
+                    LnkRegistrarProvision.Text = CvePrePolizaProvision <= 0 ? "<i class=\"fa fa-thumbs-up\" aria-hidden=\"true\" ></i>Registrar provisión" : "<i class=\"fa fa-thumbs-up\" aria-hidden=\"true\" ></i>Regenerar provisión";
                     LnkConceptoEmpleado.Visible = true;//(Estatus < 2);
                     LnkCargaAsistenciaMasiva.Visible = (Estatus < 2);
                     LnkModalPlantillaNomina.Visible = true;

vwd.webinfo

@@ -410,6 +410,8 @@
     
   
     
+  
+