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

AC/RepEstadoActividades.aspx.vb

@@ -330,8 +330,8 @@ Partial Class AC_RepEstadoActividades
         params.Add(New ReportParameter("pEmp", UsuarioActual.Empresa.Empresa))
         params.Add(New ReportParameter("pImg", New Uri(Server.MapPath(String.Format("~/Empresas/{0}/Logo.png", UsuarioActual.CveEmpresa))).AbsoluteUri))
         If (UsuarioActual.CveEmpresa = 48 And ChkFirma.Checked) Then
-            params.Add(New ReportParameter("pFirma1", String.Format("Lic. Damian A. Benitez Alcantar{0}Director Administrativo", vbCrLf)))
+            params.Add(New ReportParameter("pFirma1", String.Format("Ing. Héctor Díaz Young{0}Dirección Administrativa", vbCrLf)))
-            params.Add(New ReportParameter("pFirma2", String.Format("Ing. Soraida Mesinas Reyes{0}Director General", vbCrLf)))
+            params.Add(New ReportParameter("pFirma2", String.Format("M.E.R Carla Neudert Cordova{0}Dirección General", vbCrLf)))
         ElseIf (UsuarioActual.CveEmpresa = 120 And ChkFirma.Checked) Then
             params.Add(New ReportParameter("pFirma1", String.Format("C.P.NEFTALI PEÑA MIRANDA{0}Subdirector de Contabilidad", vbCrLf)))
             params.Add(New ReportParameter("pFirma2", String.Format("Dra. María Antonieta Laso López{0}Director General", vbCrLf)))

AC/RepSituacionFinanciera.aspx.vb

@@ -639,9 +639,10 @@ Partial Class AC_SituacionFinanciera
         params.Add(New ReportParameter("pEmp", UsuarioActual.Empresa.Empresa))
         params.Add(New ReportParameter("CveEmpresa", UsuarioActual.CveEmpresa.ToString))
         params.Add(New ReportParameter("pImg", New Uri(Server.MapPath(String.Format("~/Empresas/{0}/Logo.png", UsuarioActual.CveEmpresa))).AbsoluteUri))
+
         If (UsuarioActual.CveEmpresa = 48 And ChkFirma.Checked) Then
-            params.Add(New ReportParameter("pFirma1", String.Format("Lic. Damian A. Benitez Alcantar{0}Director Administrativo", vbCrLf)))
+            params.Add(New ReportParameter("pFirma1", String.Format("Ing. Héctor Díaz Young{0}Dirección Administrativa", vbCrLf)))
-            params.Add(New ReportParameter("pFirma2", String.Format("Ing. Soraida Mesinas Reyes{0}Director General", vbCrLf)))
+            params.Add(New ReportParameter("pFirma2", String.Format("M.E.R Carla Neudert Cordova{0}Dirección General", vbCrLf)))
         ElseIf (UsuarioActual.CveEmpresa = 120 And ChkFirma.Checked) Then
             params.Add(New ReportParameter("pFirma1", String.Format("C.P.NEFTALI PEÑA MIRANDA{0}Subdirector de Contabilidad", vbCrLf)))
             params.Add(New ReportParameter("pFirma2", String.Format("Dra. María Antonieta Laso López{0}Director General", vbCrLf)))
@@ -652,6 +653,7 @@ Partial Class AC_SituacionFinanciera
             params.Add(New ReportParameter("pFirma1", ""))
             params.Add(New ReportParameter("pFirma2", ""))
         End If
+
         params.Add(New ReportParameter("pFechaFin", FechaF))
         params.Add(New ReportParameter("Level2", If(ChkNivel.Checked, "SI", "NO")))
         ImprimirPDF(reportpath, lrds, params, fileName, Formato)

AC/Reportes/RepEstadoActividades.rdlc

@@ -1008,18 +1008,7 @@
             <Paragraph>
               <TextRuns>
                 <TextRun>
-                  <Value>C.P Vera Guadalupe Tarazon Moreno</Value>
+                  <Value>=Parameters!pFirma1.Value</Value>
-                  <Style />
-                </TextRun>
-              </TextRuns>
-              <Style>
-                <TextAlign>Center</TextAlign>
-              </Style>
-            </Paragraph>
-            <Paragraph>
-              <TextRuns>
-                <TextRun>
-                  <Value>Director Administrativo</Value>
                   <Style />
                 </TextRun>
               </TextRuns>

AC/Reportes/RepSituacionFinanciera.rdlc

@@ -2942,18 +2942,7 @@
                 <Paragraph>
                   <TextRuns>
                     <TextRun>
-                      <Value>C.P Vera Guadalupe Tarazon Moreno</Value>
+                      <Value>=Parameters!pFirma1.Value</Value>
-                      <Style />
-                    </TextRun>
-                  </TextRuns>
-                  <Style>
-                    <TextAlign>Center</TextAlign>
-                  </Style>
-                </Paragraph>
-                <Paragraph>
-                  <TextRuns>
-                    <TextRun>
-                      <Value>Director Administrativo</Value>
                       <Style />
                     </TextRun>
                   </TextRuns>

App_Code/ClsGenerales.vb

@@ -2956,6 +2956,8 @@ Public Class ClsGenerales
             .Add("@Filtro", SqlDbType.Int).Value = Filtro
             .Add("@CveUsuarioEntrega", SqlDbType.Int).Value = CveUsuarioEntrega
             .Add("@EsEntregaInterna", SqlDbType.Bit).Value = EsEntregaInterna
+
+
         End With
         Try
             SqlAdapter.Fill(Data)
@@ -3030,6 +3032,7 @@ Public Class ClsGenerales
         With SqlAdapter.SelectCommand.Parameters
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
             .Add("@CveAsignacionEntrega", SqlDbType.BigInt).Value = CveAsignacionEntrega
+
         End With
         Try
             SqlAdapter.Fill(Data)
@@ -3041,7 +3044,7 @@ Public Class ClsGenerales
         Return Retorno
     End Function
 
-    Public Function AsignarEntregasPorRealizar(CvePaqueteriaGuia As Integer, CvePersonal As Integer, Optional CveAsignacionEntrega As Long = -1, Optional CveMotivoRechazoPaqueteria As Integer = -1, Optional Orden As Integer = 0) As Boolean
+    Public Function AsignarEntregasPorRealizar(CvePaqueteriaGuia As Integer, CvePersonal As Integer, Optional CveAsignacionEntrega As Long = -1, Optional CveMotivoRechazoPaqueteria As Integer = -1) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Gral_AsignarEntregasPorRealizar")
         With SqlAdapter.SelectCommand.Parameters
@@ -3049,7 +3052,6 @@ Public Class ClsGenerales
             .Add("@CveUsuarioAsignado", SqlDbType.Int).Value = CvePersonal
             .Add("@CveAsignacionEntrega", SqlDbType.BigInt).Value = CveAsignacionEntrega
             .Add("@CveMotivoRechazoPaqueteria", SqlDbType.Int).Value = CveMotivoRechazoPaqueteria
-            .Add("@Orden", SqlDbType.Int).Value = Orden
         End With
         Try
             SqlAdapter.Fill(Data)
@@ -3611,8 +3613,9 @@ Public Class ClsGenerales
 #Region "GRAL TIMBRES"
 
 
-    Public Function AddGralTimbre(TipoDocto As String, Serie As String, Folio As Integer, FolioFiscal As String, Fecha As Date, CvePaqueteriaGuia As Integer, CveMovimientoAlmacen As Integer, CveUsuario As Integer, CveEmpresa As Integer,
+    Public Function AddGralTimbre(TipoDocto As String, Serie As String, Folio As Integer, FolioFiscal As String, Fecha As Date, CveUsuario As Integer, CveEmpresa As Integer,
-                                      Estatus As Integer, CvePAC As Integer, AplicaCP As Boolean, CveSubProyectoOrigen As Integer, CveDireccionOrigen As Integer, CveDireccionDestino As Integer, CveChofer As Integer, CveCamion As Integer, FechaEntrega As Date) As Integer
+                                  Estatus As Integer, CvePAC As Integer, AplicaCP As Boolean, CveEntregaAlmacen As Integer, CveSubProyectoOrigen As Integer) As Integer
+
         Dim Retorno As Integer = -1
         DataAdapter("PA_Gral_TimbreAdd")
 
@@ -3623,19 +3626,13 @@ Public Class ClsGenerales
             .Add("@Folio", SqlDbType.Int).Value = Folio
             .Add("@FolioFiscal", SqlDbType.VarChar).Value = FolioFiscal
             .Add("@Fecha", SqlDbType.Date).Value = Fecha
-            .Add("@CvePaqueteriaGuia", SqlDbType.Int).Value = CvePaqueteriaGuia
-            .Add("@CveMovimientoAlmacen", SqlDbType.Int).Value = CveMovimientoAlmacen
             .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
             .Add("@Estatus", SqlDbType.Int).Value = Estatus
             .Add("@CvePAC", SqlDbType.Int).Value = CvePAC
             .Add("@AplicaCP", SqlDbType.Bit).Value = AplicaCP
+            .Add("@CveEntregaAlmacen", SqlDbType.Int).Value = CveEntregaAlmacen
             .Add("@CveSubProyectoOrigen", SqlDbType.Int).Value = CveSubProyectoOrigen
-            .Add("@CveDireccionOrigen", SqlDbType.Int).Value = CveDireccionOrigen
-            .Add("@CveDireccionDestino", SqlDbType.Int).Value = CveDireccionDestino
-            .Add("@CveChofer", SqlDbType.Int).Value = CveChofer
-            .Add("@CveCamion", SqlDbType.Int).Value = CveCamion
-            .Add("@FechaEntrega", SqlDbType.DateTime).Value = FechaEntrega
 
             .Add("@CveTimbre", SqlDbType.Int).Direction = ParameterDirection.Output
             .Add("@FolioInsertado", SqlDbType.Int).Direction = ParameterDirection.Output
@@ -3657,7 +3654,7 @@ Public Class ClsGenerales
         Return Retorno
     End Function
 
-    Public Function GetGralTimbre(CveTimbre As Integer, TipoDocto As String, Serie As String, Folio As Integer, FechaI As Date, FechaF As Date, Estatus As Integer, CveEmpresa As Integer, CveMovimiento As Integer, CvePaqueteriaGuia As Integer) As Boolean
+    Public Function GetGralTimbre(CveTimbre As Integer, TipoDocto As String, Serie As String, Folio As Integer, FechaI As Date, FechaF As Date, Estatus As Integer, CveEmpresa As Integer, CveMovimiento As Integer) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Gral_TimbreGet")
 
@@ -3671,9 +3668,6 @@ Public Class ClsGenerales
             .Add("@Estatus", SqlDbType.Int).Value = Estatus
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
             .Add("@CveMovimiento", SqlDbType.Int).Value = CveMovimiento
-            .Add("@CvePaqueteriaGuia", SqlDbType.Int).Value = CvePaqueteriaGuia
-
-
 
         End With
 
@@ -3687,9 +3681,9 @@ Public Class ClsGenerales
         Return Retorno
     End Function
 
-    Public Function UpdateGralTimbre(CveTimbre As Integer, TipoDocto As String, Serie As String, Folio As Integer, FolioFiscal As String, Fecha As Date, CvePaqueteriaGuia As Integer, CveMovimientoAlmacen As Integer, CveUsuario As Integer, CveEmpresa As Integer,
+    Public Function UpdateGralTimbre(CveTimbre As Integer, TipoDocto As String, Serie As String, Folio As Integer, FolioFiscal As String, Fecha As Date, CveUsuario As Integer, CveEmpresa As Integer,
-                                      Estatus As Integer, CvePAC As Integer, CvePACCancelacion As Integer, FechaCancelacion As Date, AplicaCP As Boolean, CveSubProyectoOrigen As Integer, CveDireccionOrigen As Integer, CveDireccionDestino As Integer,
+                                      Estatus As Integer, CvePAC As Integer, CvePACCancelacion As Integer, FechaCancelacion As Date, AplicaCP As Boolean, SelloCancelacion As String
-                                      CveChofer As Integer, CveCamion As Integer) As Boolean
+                                      ) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Gral_TimbreUpdate")
 
@@ -3701,20 +3695,15 @@ Public Class ClsGenerales
             .Add("@Folio", SqlDbType.Int).Value = Folio
             .Add("@FolioFiscal", SqlDbType.VarChar).Value = FolioFiscal
             .Add("@Fecha", SqlDbType.Date).Value = Fecha
-            .Add("@CvePaqueteriaGuia", SqlDbType.Int).Value = CvePaqueteriaGuia
-            .Add("@CveMovimientoAlmacen", SqlDbType.Int).Value = CveMovimientoAlmacen
             .Add("@Estatus", SqlDbType.Int).Value = Estatus
             .Add("@CvePAC", SqlDbType.Int).Value = CvePAC
             .Add("@CvePACCancelacion", SqlDbType.Int).Value = CvePACCancelacion
             .Add("@FechaCancelacion", SqlDbType.DateTime).Value = FechaCancelacion
             .Add("@AplicaCP", SqlDbType.Bit).Value = AplicaCP
-            .Add("@CveSubProyectoOrigen", SqlDbType.Int).Value = CveSubProyectoOrigen
-            .Add("@CveDireccionOrigen", SqlDbType.Int).Value = CveDireccionOrigen
-            .Add("@CveDireccionDestino", SqlDbType.Int).Value = CveDireccionDestino
             .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
-            .Add("@CveChofer", SqlDbType.Int).Value = CveChofer
+            .Add("@SelloCancelacion", SqlDbType.VarChar).Value = SelloCancelacion
-            .Add("@CveCamion", SqlDbType.Int).Value = CveCamion
+
 
         End With
 
@@ -3769,8 +3758,114 @@ Public Class ClsGenerales
 
     End Function
 
+    Public Function AddInvEntregaAlmacenRuta(CveSubProyectoOrigen As Integer, CveMovimientoAlmacen As Integer, CveDireccionOrigen As Integer, CveDireccionDestino As Integer, CveChofer As Integer, CveCamion As Integer, FechaEntrega As Date, Tipo As String, Orden As Integer) As Integer
+        Dim Retorno As Integer = -1
+        DataAdapter("PA_Inv_EntregaAlmacenRutaAdd")
+
+        With SqlAdapter.SelectCommand.Parameters
+
+            .Add("@CveSubProyectoOrigen", SqlDbType.Int).Value = CveSubProyectoOrigen
+            .Add("@CveMovimientoAlmacen", SqlDbType.Int).Value = CveMovimientoAlmacen
+            .Add("@CveDireccionOrigen", SqlDbType.Int).Value = CveDireccionOrigen
+            .Add("@CveDireccionDestino", SqlDbType.Int).Value = CveDireccionDestino
+            .Add("@CveChofer", SqlDbType.Int).Value = CveChofer
+            .Add("@CveCamion", SqlDbType.Int).Value = CveCamion
+            .Add("@FechaEntrega", SqlDbType.DateTime).Value = FechaEntrega
+            .Add("@Orden", SqlDbType.Int).Value = Orden
+            .Add("@Tipo", SqlDbType.VarChar).Value = Tipo
+            .Add("@CveEntregaAlmacen", SqlDbType.Int).Direction = ParameterDirection.Output
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = SqlAdapter.SelectCommand.Parameters("@CveEntregaAlmacen").Value.ToString.ToEntero
+        Catch ex As Exception
+            OnError("Ocurrió un error al agregar la entrega almacen", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return Retorno
+    End Function
+
+    Public Function UpdateInvEntregaAlmacenRuta(CveEntregaAlmacen As Integer, CveDireccionOrigen As Integer, CveDireccionDestino As Integer, CveChofer As Integer, CveCamion As Integer, FechaEntrega As Date, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Inv_EntregaAlmacenRutaUpdate")
+
+        With SqlAdapter.SelectCommand.Parameters
+
+
+            .Add("@CveEntregaAlmacen", SqlDbType.Int).Value = CveEntregaAlmacen
+            .Add("@CveDireccionOrigen", SqlDbType.Int).Value = CveDireccionOrigen
+            .Add("@CveDireccionDestino", SqlDbType.Int).Value = CveDireccionDestino
+            .Add("@CveChofer", SqlDbType.Int).Value = CveChofer
+            .Add("@CveCamion", SqlDbType.Int).Value = CveCamion
+            .Add("@FechaEntrega", SqlDbType.DateTime).Value = FechaEntrega
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al actualizar la entrega almacen", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return Retorno
+    End Function
+
+    Public Function GetInvEntregaAlmacenRuta(CveSubProyecto As Integer, FechaInicio As Date, FechaFin As Date, CveEmpresa As Integer, Opcion As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+
+        DataAdapter("PA_Inv_EntregaAlmacenRutaGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+
+            .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
+            .Add("@FechaInicio", SqlDbType.Date).Value = FechaInicio
+            .Add("@FechaFin", SqlDbType.Date).Value = FechaFin
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@Opcion", SqlDbType.Int).Value = Opcion
+
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error obtener las entregas", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return Retorno
+    End Function
+
+
+    Public Function GetInvEntregaAlmacenRutaRep(CveSubProyecto As Integer, CveEmpresa As Integer, Estatus As Integer, FechaInicio As Date, FechaFin As Date, CveChofer As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+
+        DataAdapter("PA_Inv_EntregaAlmacenRutaRepGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+
+            .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@Estatus", SqlDbType.Int).Value = Estatus
+            .Add("@FechaInicio", SqlDbType.Date).Value = FechaInicio
+            .Add("@FechaFin", SqlDbType.Date).Value = FechaFin
+            .Add("@CveChofer", SqlDbType.Int).Value = CveChofer
+
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error obtener las entregas", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return Retorno
+    End Function
+
 
 #End Region
 
 End Class
 
+

App_Code/ClsPaginas.vb

@@ -4870,6 +4870,7 @@ Public Class ClsPaginas
             PaginaDict.Add("/Inventarios/AjustesSeccionAlmacen.aspx".ToUpper(), 892)
             PaginaDict.Add("/Inventarios/RepTraspasoAlmacen.aspx".ToUpper(), 688)
             PaginaDict.Add("/Inventarios/EntregasPorRealizar.aspx".ToUpper(), 728)
+
             PaginaDict.Add("/Inventarios/CatAlmacenClasificacionSecciones.aspx".ToUpper(), 764)
             PaginaDict.Add("/Inventarios/ReconstruirCostos.aspx".ToUpper(), 764)
             PaginaDict.Add("/Inventarios/RecepcionDevolucion.aspx".ToUpper(), 696)
@@ -4879,6 +4880,14 @@ Public Class ClsPaginas
 
 
 
+            'PaginaDict.Add("/Inventarios/EntregasPorRealizarRuta.aspx".ToUpper(), -1)
+            'PaginaDict.Add("/General/RepPaqueteriasGuiasRuta.aspx".ToUpper(), -1)
+
+            PaginaDict.Add("/Inventarios/EntregaAlmacenRuta.aspx".ToUpper(), 1320)
+            PaginaDict.Add("/General/RepEntregaAlmacenRuta.aspx".ToUpper(), 1319)
+
+
+
 #End Region
 #Region "MF"
             PaginaDict.Add("/MF/BitacoraDiaria.aspx".ToUpper(), 801)
@@ -8492,7 +8501,8 @@ Public Class ClsPaginas
         Dim PathXML As String = $"{Ruta}XML\Pag\{Serie}-{Folio}.xml"
         Dim PathPDF As String = $"{Ruta}PDF\Pag\{Serie}-{Folio}.pdf"
         SerieFolio = $"{Serie}-{Folio}"
-        Dim ImagenCBB As String = String.Format("{0}://{1}:{2}/Empresas/{3}/CBB/{4}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa, $"{Serie}-{Folio}.jpg")
+
+        Dim ImagenCBB As String = $"file://{Ruta}CBB\{Serie}-{Folio}.jpg"
 
         If File.Exists(PathXML) Then
             Dim XmlDoc As New System.Xml.XmlDocument

App_Code/Timbrado.vb

@@ -3313,6 +3313,18 @@ Public Class Timbrado
         comprobante.MetodoPagoSpecified = If(ObjCFDITimbre.Comprobante.MetodoPago <> "", True, False)
         comprobante.LugarExpedicion = ObjCFDITimbre.Comprobante.LugarExpedicion
 
+        If ObjCFDITimbre.CFDIRelacionados.TipoRelacion <> "" Then
+            Dim CfdiRelacionados As New Profact.TimbraCFDI33.ComprobanteCfdiRelacionados
+            CfdiRelacionados.CfdiRelacionado = New Profact.TimbraCFDI33.ComprobanteCfdiRelacionadosCfdiRelacionado(ObjCFDITimbre.CFDIRelacionados.UUID.Count - 1) {}
+            Dim i As Integer = 0
+            For Each uid As String In ObjCFDITimbre.CFDIRelacionados.UUID
+                CfdiRelacionados.CfdiRelacionado(i) = New Profact.TimbraCFDI33.ComprobanteCfdiRelacionadosCfdiRelacionado With {.UUID = uid}
+                i += 1
+            Next
+            CfdiRelacionados.TipoRelacion = ObjCFDITimbre.CFDIRelacionados.TipoRelacion
+            comprobante.CfdiRelacionados = CfdiRelacionados
+        End If
+
 #Region "Emisor"
         comprobante.Emisor = New Profact.TimbraCFDI33.ComprobanteEmisor()
         comprobante.Emisor.Rfc = EmisorRFC

Bancos/IE.aspx.vb

@@ -2860,7 +2860,9 @@ Partial Class Bancos_IE
 
                                                     'Agregamos el IVA
                                                     If DivIvaIxC.Visible AndAlso TxtIvaIxC.Text.ToDecimal <> 0 Then
-                                                        If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, TxtIvaIxC.Text.ToDecimal, Concepto, 61, Concepto, FechaMovimiento, UsuarioActual.Empresa.IdCuentaIVAxTrasladar, -1, CveIE:=CveIE, CveCompra:=CveCompra, CveProveedor:=CveProveedor, CvePersonal:=CvePersonal, CveCreditoDetalle:=CveCreditoDetalle, CveCliente:=CveCliente, ImporteMX:=TxtIvaIxC.Text.ToDecimal, ImporteME:=tImporteMonedaExtranjera) Then
+                                                        Dim CveConIVA As Integer = 61
+                                                        If UsuarioActual.CveEmpresa = 70 Then CveConIVA = 299
+                                                        If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, TxtIvaIxC.Text.ToDecimal, Concepto, CveConIVA, Concepto, FechaMovimiento, UsuarioActual.Empresa.IdCuentaIVAxTrasladar, -1, CveIE:=CveIE, CveCompra:=CveCompra, CveProveedor:=CveProveedor, CvePersonal:=CvePersonal, CveCreditoDetalle:=CveCreditoDetalle, CveCliente:=CveCliente, ImporteMX:=TxtIvaIxC.Text.ToDecimal, ImporteME:=tImporteMonedaExtranjera) Then
                                                             MsgError = "Ocurrió un error al registrar el asiento del ingreso."
                                                         End If
                                                     End If
@@ -4502,16 +4504,18 @@ Partial Class Bancos_IE
                     If Not ObjConta.UpdatePrePolizasDetalleBloquear(CvePrePoliza, False) Then
                         ErrorCancelar = True
                         MensajeError = "Error al desbloquear prepoliza."
+                    Else
+                        'CANCELA IE MES ACTUAL
+                        CvePrePolizaCancelacion = Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, False, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate, CveTipoTransaccionCancelacion:=DdlTipoTransaccionCancelacion.SelectedValue.ToEntero)
+                        If CvePrePolizaCancelacion <= 0 Then
+                            ErrorCancelar = True
+                            MensajeError = "Error al cancelar IE MES ACTUAL"
+                        End If
                     End If
-                    'CANCELA IE MES ACTUAL
+
-                    CvePrePolizaCancelacion = Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, False, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate, CveTipoTransaccionCancelacion:=DdlTipoTransaccionCancelacion.SelectedValue.ToEntero)
-                    If CvePrePolizaCancelacion <= 0 Then
-                        ErrorCancelar = True
-                        MensajeError = "Error al cancelar IE MES ACTUAL"
-                    End If
                 End If
 
-                If UsuarioActual.Empresa.Funcionalidad(200).ToString = "1" Then
+                If Not ErrorCancelar AndAlso UsuarioActual.Empresa.Funcionalidad(200).ToString = "1" Then
 
                     If Not ObjConta.ContabilizarPrePoliza(CvePrePolizaCancelacion, UsuarioActual.CveUsuario, UsuarioActual.Empresa, pIDPoliza:=If(IDPoliza > 0, IDPoliza, -1), ObjConta:=ObjAC) Then
                         ErrorCancelar = True
@@ -4577,7 +4581,7 @@ Partial Class Bancos_IE
                 End If
 
 
-                If Not ErrorCancelarComplemento Then
+                If Not ErrorCancelarComplemento AndAlso Not ErrorCancelar Then
 
                     If ObjAC IsNot Nothing Then ObjAC.Commit()
                     Banc.Commit()
@@ -5698,24 +5702,30 @@ Partial Class Bancos_IE
 
         DVGenerarComplementoModal.Visible = False
 
-        If ObjBancos.GetVincularPago(CveProveedor, CveCompra, 2, MinFecha, MaxFecha, UsuarioActual.CveEmpresa, CveIE) Then
+        If Tipo = "Abono" Then
 
-            GvComplementoPagos.DataSource = ObjBancos.DtResultados
+            If ObjBancos.GetVincularPago(CveProveedor, CveCompra, 2, MinFecha, MaxFecha, UsuarioActual.CveEmpresa, CveIE) Then
 
-            If ObjBancos.DtResultados.FiltraParametros(" Estatus IN (1,3) ").Rows.Count = 0 And Tipo.ToUpper = "CARGO" And CveCliente > 0 And CveEstatusIE <> 2 And ObjBancos.DtResultados.FiltraParametros(" CveIECancelacion > 0 ").Rows.Count = 0 Then
+                GvComplementoPagos.DataSource = ObjBancos.DtResultados
-                DVGenerarComplementoModal.Visible = True
+
+                If ObjBancos.DtResultados.FiltraParametros(" Estatus IN (1,3) ").Rows.Count = 0 And Tipo.ToUpper = "CARGO" And CveCliente > 0 And CveEstatusIE <> 2 And ObjBancos.DtResultados.FiltraParametros(" CveIECancelacion > 0 ").Rows.Count = 0 Then
+                    DVGenerarComplementoModal.Visible = True
+                End If
+            Else
+                GvComplementoPagos.DataSource = Nothing
             End If
         Else
-            GvComplementoPagos.DataSource = Nothing
+            If CveIE > 0 Then
-        End If
+                If ObjBancos.GetComplementoPagos(-1, CveIE, -1, UsuarioActual.CveEmpresa) Then
+                    GvComplementoPagos.DataSource = ObjBancos.DtResultados.FiltraParametros("", DistinctColumns:={"CveComplementoPago", "SerieFolio", "Fecha", "CveIE"})
+                End If
+            End If
 
+        End If
         ObjBancos.Dispose()
         GvComplementoPagos.DataBind()
         UpComplementoPagos.Update()
 
-        'If ObjBancos.GetComplementoPagos(-1, CveIE, -1, UsuarioActual.CveEmpresa) Then
-        '    GvComplementoPagos.DataSource = ObjBancos.DtResultados.FiltraParametros("", DistinctColumns:={"CveComplementoPago", "SerieFolio", "Fecha", "CveIE"})
-        'End If
 
         'ObjBancos.Dispose()
         'GvComplementoPagos.DataBind()
@@ -5727,7 +5737,7 @@ Partial Class Bancos_IE
         If e.Row.RowType = DataControlRowType.DataRow Then
 
             If e.Row.DataKey("Tipo") = "Ing" Then
-                e.Row.Cells(3).Text = String.Format("<a class="" texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class="" fa fa-ad-excel""></i></a>", Encripta(String.Format("OP=CompP&EXT=xml&SerieFolio={0}&CVECOMPLEMENTOPAGO={1}&CVEIE={2}", e.Row.DBCampo("SerieFolio"), e.Row.DBCampo("CveComplementoPago"), e.Row.DBCampo("CveIE"))))
+                e.Row.Cells(3).Text = String.Format("<a class="" texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class="" fa fa-file-code-o""></i></a>", Encripta(String.Format("OP=CompP&EXT=xml&SerieFolio={0}&CVECOMPLEMENTOPAGO={1}&CVEIE={2}", e.Row.DBCampo("SerieFolio"), e.Row.DBCampo("CveComplementoPago"), e.Row.DBCampo("CveIE"))))
                 e.Row.Cells(4).Text = String.Format("<a class="" texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class="" fa fa-ad-pdf""></i></a>", Encripta(String.Format("OP=CompP&EXT=pdf&SerieFolio={0}&CVECOMPLEMENTOPAGO={1}&CVEIE={2}", e.Row.DBCampo("SerieFolio"), e.Row.DBCampo("CveComplementoPago"), e.Row.DBCampo("CveIE"))))
 
                 If e.Row.DataKey("Estatus").Contiene("1", "3") Then
@@ -5738,7 +5748,7 @@ Partial Class Bancos_IE
 
             ElseIf e.Row.DataKey("Tipo") = "Egs" Then
 
-                e.Row.Cells(3).Text = String.Format("<a class=""texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class=""fa fa-ad-excel""></i></a>", Encripta(String.Format("OP=Fact&EXT=xml&CveFactura={0}&RFC={1}", e.Row.DBCampo("CveFactura"), e.Row.DBCampo(("RFCde").ToString.Replace("&", "%26%")))))
+                e.Row.Cells(3).Text = String.Format("<a class=""texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class=""fa fa-file-code-o""></i></a>", Encripta(String.Format("OP=Fact&EXT=xml&CveFactura={0}&RFC={1}", e.Row.DBCampo("CveFactura"), e.Row.DBCampo(("RFCde").ToString.Replace("&", "%26%")))))
                 e.Row.Cells(4).Text = String.Format("<a class=""texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class=""fa fa-ad-pdf""></i></a>", Encripta(String.Format("OP=Fact&EXT=pdf&CveFactura={0}&RFC={1}", e.Row.DBCampo("CveFactura"), e.Row.DBCampo("RFCde").ToString.Replace("&", "%26%"))))
 
                 GvComplementoPagos.Columns(6).Visible = False

Bancos/PopIEVentas.aspx.vb

@@ -598,11 +598,8 @@ Partial Class Bancos_PopIEVentas
             CargaTipoTransaccion(TipoTransaccion)
             CargaCuentas()
 
-            Dim ObjCompras As New ClsCompras
+
-            If ObjCompras.GetCompras(-1, "-1", "-1", -1, -1, UsuarioActual.CveEmpresa, ProveedorRFC:=RFCCliente) Then
+
-                RBLContado.Items(4).Enabled = True
-            End If
-            ObjCompras.Dispose()
 
             Dim dia As Integer = If(UsuarioActual.CveEmpresa = 13, Now.Day - 1, Now.Day)
             Fecha = (dia.ToString + "/" + Now.Month.ToString + "/" + Now.Year.ToString).ToDate
@@ -726,7 +723,7 @@ Partial Class Bancos_PopIEVentas
                 CveMoneda = dr("CveMoneda").ToString.ToEntero
                 CveMonedaVenta = dr("CveMoneda").ToString.ToEntero
                 CveMonedaFiltros = dr("CveMoneda").ToString.ToEntero
-                NombreCliente = GlobalDTCliente(UsuarioActual.CveEmpresa, CveCliente:=CveCliente).FiltroPrimeroValor("Nombre", String.Format("CveCliente = {0}", CveCliente))
+                NombreCliente = dr("ClienteNombre").ToString '' GlobalDTCliente(UsuarioActual.CveEmpresa, CveCliente:=CveCliente).FiltroPrimeroValor("Nombre", String.Format("CveCliente = {0}", CveCliente))
                 SerieFolio = dr("SerieFolio").ToString
                 TipoCambioOriginal = dr("TipoCambio").ToString.ToDecimal
                 CveSubProyectoVenta = dr("CveSubProyecto").ToString.ToEntero
@@ -787,6 +784,14 @@ Partial Class Bancos_PopIEVentas
                     CargaCorteCaja()
                 End If
 
+                If RFCCliente.ToUpper <> "XAXX010101000" Then
+                    Dim ObjCompras As New ClsCompras
+                    If ObjCompras.GetCompras(-1, "-1", "-1", -1, -1, UsuarioActual.CveEmpresa, ProveedorRFC:=RFCCliente) Then
+                        RBLContado.Items(4).Enabled = True
+                    End If
+                    ObjCompras.Dispose()
+                End If
+
                 If Not Validada Then
                     BtnGuardar.Visible = False
                 End If

Compras/PopUpVerFactura.aspx.vb

@@ -946,7 +946,7 @@ Partial Class PopUpVerFactura
 
             Dim ObjInv As New ClsGenerales
 
-            If ObjInv.GetGralTimbre(CveTimbre, "-1", "-1", -1, MinFecha, MaxFecha, -1, UsuarioActual.CveEmpresa, -1, -1) Then
+            If ObjInv.GetGralTimbre(CveTimbre, "-1", "-1", -1, MinFecha, MaxFecha, -1, UsuarioActual.CveEmpresa, -1) Then
                 If ObjInv.DtResultados.Rows.Count > 0 Then
                     Dim Dr As DataRow = ObjInv.DtResultados.Rows(0)
                     If Dr IsNot Nothing Then

Compras/RepProductosServicios.aspx

@@ -262,7 +262,7 @@
                         </div> 
                         <label id="lblCultivo" runat="server" class="col-md-1 truncate">Cultivo </label>
                         <div class="col-md-2" id="DivCultivo" runat="server">
-                            <asp:ListBox ID="DdlCultivo" SelectionMode="Multiple" data-text="Todos" AppendDataBoundItems="true" DataTextField="Cuadro" DataValueField="CveCultivoCuadroDetalle" CssClass="ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server"></asp:ListBox>
+                            <asp:ListBox ID="DdlCultivo" SelectionMode="Multiple" data-text="Todos" AppendDataBoundItems="true" DataTextField="TemporadaCultivoVariedadCuadro" DataValueField="CveCultivoCuadroDetalle" CssClass="ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server"></asp:ListBox>
                         </div>
                     </div>
                 </div>

Contabilidad/RegPrePoliza.aspx.vb

@@ -1188,10 +1188,12 @@ Partial Class ContabilidadC_RegPrePoliza
                     Dim TipoMovtoOld As Boolean = (row.DataKey("TipoMovto").ToString = "True")
                     Dim ImporteMN As Decimal = If(row.FCTextBox("TxtCargo").Text.ToDecimal() <> 0, row.FCTextBox("TxtCargo").Text.ToDecimal(), row.FCTextBox("TxtAbono").Text.ToDecimal())
                     Dim CveTipoGastonew As Integer = If(DdlTipoGasto.Visible, row.FCDropDownList("DdlTipoGasto").SelectedValue.ToEntero(), row.DataKey("CveTipoGasto").ToEntero())
+                    Dim ttSubProyecto As Integer = row.DataKey("CveSubProyecto").ToEntero()
+                    If ttSubProyecto = 0 Then ttSubProyecto = -1
 
                     If row.DataKey("CvePrePolizaDetalle").ToEntero() > 0 Then
                         Dim actualizar As Boolean
-                        actualizar = (Concepto <> row.DataKey("Concepto") OrElse CveSubProyecto <> row.DataKey("CveSubProyecto").ToEntero() OrElse CtaContable <> row.DataKey("IdCtaContable").ToEntero() OrElse
+                        actualizar = (Concepto <> row.DataKey("Concepto") OrElse CveSubProyecto <> ttSubProyecto OrElse CtaContable <> row.DataKey("IdCtaContable").ToEntero() OrElse
                             TipoMovto <> TipoMovtoOld OrElse ImporteMN <> row.DataKey("ImporteMN").ToDecimal() OrElse CveTipoGastonew <> row.DataKey("CveTipoGasto").ToEntero())
                         'diferencia = $"{diferencia}\r\n /*{actualizar}*/actualizar = '{Concepto}' <> '{row.DataKey("Concepto")}' || '{CveSubProyecto}' <> '{row.DataKey("CveSubProyecto").ToEntero()}' || '{CtaContable}' <> '{row.DataKey("IdCtaContable").ToEntero()}' ||"
                         'diferencia = $"{diferencia} '{TipoMovto}' <> '{TipoMovtoOld}' OrElse '{ImporteMN}' <> '{row.DataKey("ImporteMN").ToEntero()}' OrElse '{CveTipoGastonew}' <> '{row.DataKey("CveTipoGasto").ToEntero()}'"

Contabilidad/RegPrePolizaS.aspx.vb

@@ -1351,6 +1351,8 @@ Partial Class ContabilidadC_RegPrePolizaS
                 Dim dr As DataRow = DtMovimientos.NewRow
                 dr("IdCtaContable") = IdCtaContable
                 dr("CveCuenta") = DdlCuentaContableE.SelectedValue
+                'dr("CodigoCuenta") = CodigoCuenta & "<br>" & NombreCuenta
+                dr("CodigoNombreCuenta") = DdlCuentaContableE.SelectedItem.Text
                 dr("ConceptoContable") = DdlConceptosContablesE.SelectedItem.Text
                 dr("CveConceptoContable") = DdlConceptosContablesE.SelectedValue
                 dr("Concepto") = TxtConceptoE.Text

General/RepEntregaAlmacenRuta.aspx

@@ -0,0 +1,223 @@
+<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="RepEntregaAlmacenRuta.aspx.cs" Inherits="General_RepEntregaAlmacenRuta" %>
+
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+    <style>
+        .MultiLineTextBox {
+            resize: none;
+        }
+    </style>
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
+    Reporte Entrega Almacen Ruta
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+
+</asp:Content>
+<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
+
+    <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div id="PFiltros" class="portlet solid  grey-cascade portlet-filter">
+                <div class="portlet-title portlet-filterT smalltitle">
+                    <div class="tools">
+                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" OnClick="BtnConsultar_Click" class="btn btn-primary" ValidationGroup="Valida" />
+                        <a href="javascript:;" class="expand"></a>
+                    </div>
+
+                    <div class="titlefiltros  caption">
+                        <div class="row" style="margin-left: 10px;">
+                            <asp:label class="col-md-1 " id="LblDdlSucursal" runat="server" style="width: 90px; margin-top: 5px;">Sucursal:</asp:label>
+                            <div class="col-md-2" id="DivDdlSucursal" runat="server">
+                                <asp:DropDownList ID="DdlSucursales" runat="server" Width="100%" DataTextField="SubProyecto" DataValueField="CveSubProyecto" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-sm select2me">
+                                </asp:DropDownList>
+                            </div>
+                            <label class="col-md-1 " style="width: 80px; margin-top: 5px;">Estatus:</label>
+                            <div class="col-md-2">
+                                <asp:DropDownList ID="DdlEstatus" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="EntregaForaneaEstatus" DataValueField="CveEntregaForaneaEstatus" Class="table-group-action-input form-control input-inline input-small input-sm select2me"></asp:DropDownList>
+                            </div>
+
+                         <label class="col-md-1 " style="width: 90px;">Fecha Inicial:</label>
+                        <div class="col-md-2">
+                            <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 138px !important; padding: 0px; margin-bottom: -10px;">
+                                <asp:TextBox ID="TxtFechaI" runat="server" CssClass="form-control" CausesValidation="true" Width="98%" MaxLength="10"></asp:TextBox>
+                                <span class="input-group-btn ">
+                                    <asp:LinkButton ID="imgCalendarioI" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                </span>
+                            </div>
+                            <ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="TxtFechaI" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                            <ajax:CalendarExtender runat="server" ID="Calendario" TargetControlID="TxtFechaI" PopupButtonID="ImgCalendarioI" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                            <asp:CompareValidator ID="cvFechaI" runat="server" ControlToValidate="TxtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
+                            <ajax:ValidatorCalloutExtender ID="vcoCvFI" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
+                            <asp:RequiredFieldValidator ID="rfvFechaI" runat="server" ControlToValidate="TxtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
+                            <ajax:ValidatorCalloutExtender ID="vcoFfvFI" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
+                        </div>
+
+                        <label class="col-md-1 " style="width: 80px;">Fecha Final:</label>
+                        <div class="col-md-2">
+                            <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 138px !important; padding: 0px; margin-bottom: -10px;">
+                                <asp:TextBox ID="TxtFechaF" runat="server" CssClass="form-control" CausesValidation="true" Width="98%" MaxLength="10"></asp:TextBox>
+                                <span class="input-group-btn ">
+                                    <asp:LinkButton ID="imgCalendarioF" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                </span>
+                            </div>
+                            <ajax:MaskedEditExtender ID="MEEFechaF" runat="server" TargetControlID="TxtFechaF" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                            <ajax:CalendarExtender runat="server" ID="Calendario2" TargetControlID="TxtFechaF" PopupButtonID="imgCalendarioF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                            <asp:CompareValidator ID="cvFechaF" runat="server" ControlToValidate="TxtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
+                            <ajax:ValidatorCalloutExtender ID="vcoCvFF" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
+                            <asp:RequiredFieldValidator ID="rfvFechaF" runat="server" ControlToValidate="TxtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
+                            <ajax:ValidatorCalloutExtender ID="vcoRfvFF" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
+                        </div>
+
+ 
+                        </div>
+                    </div>
+                </div>
+                <div class="portlet-body" style="display: none;">
+                    <div class="row">
+                         <label class="col-md-1 " id="Label1" runat="server" style="width: 90px; margin-top: 5px;">Chofer:</label>
+                            <div class="col-md-2"    >
+                               <asp:DropDownList ID="DdlChofer" runat="server" DataTextField="Chofer" DataValueField="CveChofer"   CssClass="form-control input-sm select2me" Width="100%" CausesValidation="true"></asp:DropDownList>
+                            </div>
+                    </div>
+     
+                </div>
+            </div>
+
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+    <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div class="row" style="margin-left: 0px; margin-top: 15px; margin-bottom: 5px; text-align: right; margin-right: 5px;" align="left">
+                <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+            </div>
+            <asp:GridView ID="GVDatos" runat="server" 
+                DataKeyNames="CveEntregaAlmacen,Estatus,CveCliente,CveDireccionOrigen,CveDireccionDestino,CveCamion,CveChofer,FechaEntrega,CveAlmacen"
+                AutoGenerateColumns="False" EmptyDataText="No se encontraron Registros con los filtros especificados" CssClass="table table-striped table-advance table-hover Widthall mysmallbtn ScrollAD" data-sort="true" GridLines="None"
+                EmptyDataRowStyle-HorizontalAlign="Center" OnRowDataBound="GVDatos_RowDataBound">
+                <Columns>
+                    <asp:BoundField DataField="SubProyecto" HeaderText="Sucursal" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Left" />
+                
+                                        
+                    <asp:BoundField DataField="SerieFolio" HeaderText="Folio"  ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField DataField="Nombre" HeaderText="Cliente"  ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField DataField="Chofer" HeaderText="Operador"   ItemStyle-HorizontalAlign="Left" />
+                     <asp:BoundField DataField="Unidad" HeaderText="Unidad"   ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField DataField="EstatusStr" HeaderText="Estatus" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Left" />
+
+                    <asp:BoundField DataField="FechaEntrega" HeaderText="Fecha Entrega" ItemStyle-Width="4%" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Center" />
+                    
+                     <asp:TemplateField ItemStyle-Width="13%" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" HeaderText="Opciones">
+                        <ItemTemplate>
+                            <asp:LinkButton ID="LnkEditar" runat="server" OnClick="imgEditar_Click" AlternateText="Editar" ToolTip="Actualizar"   CausesValidation="False" CssClass="btn btn-circle btn-sm blue" Text="<i class='fa fa-pencil'></i>" />                                                        
+                            <asp:LinkButton ID="LnkTimbrar" runat="server" OnClick="LnkTimbrar_Click" AlternateText="Timbrar" ToolTip="Timbrar"   CausesValidation="False" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-external-link'></i>" />                                                        
+                            <asp:LinkButton ID="LnkCancelaTimbre" runat="server" OnClick="LnkCancelaTimbre_Click" AlternateText="Cancelar timbre" ToolTip="Cancelar timbre"  CausesValidation="False" CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-times'></i>" />                                                        
+                        </ItemTemplate>
+                    </asp:TemplateField>
+
+                </Columns>
+            </asp:GridView>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+ 
+
+
+        <div id="DivEditarEntrega" class="modal ADS fade" role="dialog">
+        <div class="modal-dialog">
+            <asp:UpdatePanel ID="UpModalEditarentrega" class="modal-content rowpadding" tabindex="-1" runat="server" UpdateMode="Conditional">
+                <ContentTemplate>
+                    <div class="modal-header">
+                        <button type="button" class="close" data-dismiss="modal" aria-label="Close">
+                            <span aria-hidden="true">&times;</span>
+                        </button>
+                        <h4 class="modal-title" id="H3" runat="server">Editar Entrega</h4>
+                    </div>
+                    <div class="modal-body">
+
+
+                        <div class="row">
+                                <div class="form-group col-md-6 form-md-line-input input-iconright">
+                                    <asp:DropDownList ID="DdlModalDireccionOrigen" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="DireccionEnvio" DataValueField="CveDireccionEnvio" Class="table-group-action-input form-control input-inline input-small input-sm select2me"></asp:DropDownList>
+                                    <label for="<%= DdlModalDireccionOrigen.ClientID.ToString()%>">Dirección Origen:</label>
+                                </div>
+                                <asp:RequiredFieldValidator ID="RfvDdlModalDireccionOrigen" runat="server" ControlToValidate="DdlModalDireccionOrigen" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Dirección Origen''</b> es necesario." InitialValue="-1" ValidationGroup="GrpModalEditarentrega"></asp:RequiredFieldValidator>
+                                <ajax:ValidatorCalloutExtender ID="VceDdlModalDireccionOrigen" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalDireccionOrigen" Width="250px" PopupPosition="BottomLeft"></ajax:ValidatorCalloutExtender>
+                            </div>
+
+                            <div class="row">
+                                <div class="form-group col-md-6 form-md-line-input input-iconright">
+                                    <asp:DropDownList ID="DdlModalDireccionDestino" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="DireccionEnvio" DataValueField="CveDireccionEnvio" Class="table-group-action-input form-control input-inline input-small input-sm select2me"></asp:DropDownList>
+                                    <label for="<%= DdlModalDireccionDestino.ClientID.ToString()%>">Dirección Destino:</label>
+                                </div>
+                                <asp:RequiredFieldValidator ID="RfvDdlModalDireccionDestino" runat="server" ControlToValidate="DdlModalDireccionDestino" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Dirección Destino''</b> es necesario." InitialValue="-1" ValidationGroup="GrpModalEditarentrega"></asp:RequiredFieldValidator>
+                                <ajax:ValidatorCalloutExtender ID="VceDdlModalDireccionDestino" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalDireccionDestino" Width="250px" PopupPosition="BottomLeft"></ajax:ValidatorCalloutExtender>
+                            </div>
+
+                            <div class="row">
+                                <div class="form-group col-md-6 form-md-line-input input-iconright">
+                                    <asp:DropDownList ID="DdlModalChofer" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="Chofer" DataValueField="CveChofer" Class="table-group-action-input form-control input-inline input-small input-sm select2me"></asp:DropDownList>
+                                    <label for="<%= DdlModalChofer.ClientID.ToString()%>">Chofer:</label>
+                                </div>
+                                <asp:RequiredFieldValidator ID="RfvDdlModalChofer" runat="server" ControlToValidate="DdlModalChofer" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Chofer''</b> es necesario." InitialValue="-1" ValidationGroup="GrpModalEditarentrega"></asp:RequiredFieldValidator>
+                                <ajax:ValidatorCalloutExtender ID="VceDdlModalChofer" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalChofer" Width="250px" PopupPosition="BottomLeft"></ajax:ValidatorCalloutExtender>
+                            </div>
+
+                            <div class="row">
+                                <div class="form-group col-md-6 form-md-line-input input-iconright">
+                                    <asp:DropDownList ID="DdlModalCamion" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="Placa" DataValueField="CveCamion" Class="table-group-action-input form-control input-inline input-small input-sm select2me"></asp:DropDownList>
+                                    <label for="<%= DdlModalCamion.ClientID.ToString()%>">Unidad:</label>
+                                </div>
+                                <asp:RequiredFieldValidator ID="RfvDdlModalCamion" runat="server" ControlToValidate="DdlModalCamion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Unidad''</b> es necesario." InitialValue="-1" ValidationGroup="GrpModalEditarentrega"></asp:RequiredFieldValidator>
+                                <ajax:ValidatorCalloutExtender ID="VceDdlModalCamion" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalCamion" Width="250px" PopupPosition="BottomLeft"></ajax:ValidatorCalloutExtender>
+                            </div>
+
+                        <div class="row"   >
+
+                            <div style="margin-left:16px!important">
+                            <label   for="<%= TxtmodalFechaEntrega.ClientID.ToString()%>">Fecha Entrega:</label>
+                            <br />
+                            <div   class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 138px !important; padding: 0px; margin-bottom: -10px;">
+                                <asp:TextBox ID="TxtmodalFechaEntrega" runat="server" CssClass="form-control" CausesValidation="true" Width="98%" MaxLength="10"></asp:TextBox>
+                                <span class="input-group-btn ">
+                                    <asp:LinkButton ID="LnkModalTxtmodalFechaEntrega" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                </span>
+                            </div>
+                            <ajax:MaskedEditExtender ID="METxtmodalFechaEntrega" runat="server" TargetControlID="TxtmodalFechaEntrega" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                            <ajax:CalendarExtender runat="server" ID="CeTxtmodalFechaEntrega" TargetControlID="TxtmodalFechaEntrega" PopupButtonID="LnkModalTxtmodalFechaEntrega" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                            <asp:RequiredFieldValidator ID="RfvTxtmodalFechaEntrega" runat="server" ControlToValidate="TxtmodalFechaEntrega" Display="None" ErrorMessage="El campo <b>''Fecha de Entrega''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpModalEditarentrega"></asp:RequiredFieldValidator>
+                            <ajax:ValidatorCalloutExtender ID="VceTxtmodalFechaEntrega" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtmodalFechaEntrega" Width="350px"></ajax:ValidatorCalloutExtender>
+                                </div>
+                        </div>
+
+
+                        
+                    </div>
+                    <div class="modal-footer">
+                        <asp:UpdatePanel runat="server">
+                            <ContentTemplate>
+                                <asp:Button ID="BtnModalEditarentrega" runat="server" OnClick="BtnModalEditarentrega_Click" CssClass="btn btn-success" Text="Actualizar" ValidationGroup="GrpModalEditarentrega" />                        
+                                <button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
+                            </ContentTemplate>
+                        </asp:UpdatePanel>
+                    </div>
+                </ContentTemplate>
+            </asp:UpdatePanel>
+        </div>
+    </div>
+
+  
+</asp:Content>
+<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
+
+   
+
+</asp:Content>
+

General/RepEntregaAlmacenRuta.aspx.cs

@@ -0,0 +1,435 @@
+using System;
+using System.Collections.Generic;
+using System.Linq;
+using System.Web;
+using System.Web.UI;
+using System.Web.UI.WebControls;
+
+using Extensiones;
+using System.Data;
+using Microsoft.Reporting.WebForms;
+using System.IO;
+using System.Text;
+
+public partial class General_RepEntregaAlmacenRuta : ClsPaginas
+{
+    #region PROPIEDADES
+    private DataTable DTDatos
+    {
+        get
+        {
+            return (DataTable)ViewState["DTDatos"];
+        }
+
+        set
+        {
+            ViewState["DTDatos"] = value;
+        }
+    }
+
+    private int CveEntregaAlmacen
+    {
+        get
+        {
+            return ViewState["CveEntregaAlmacen"].ToString().ToEntero();
+        }
+
+        set
+        {
+            ViewState["CveEntregaAlmacen"] = value;
+        }
+    }
+
+    private int CveVenta
+    {
+        get
+        {
+            return ViewState["CveVenta"].ToString().ToEntero();
+        }
+
+        set
+        {
+            ViewState["CveVenta"] = value;
+        }
+    }
+
+    private int CveMovimiento
+    {
+        get
+        {
+            return ViewState["CveMovimiento"].ToString().ToEntero();
+        }
+
+        set
+        {
+            ViewState["CveMovimiento"] = value;
+        }
+    }
+
+    private String SerieFolio
+    {
+        get
+        {
+            return ViewState["SerieFolio"].ToString();
+        }
+        set
+        {
+            ViewState["SerieFolio"] = value;
+        }
+    }
+
+    private String NombreCliente
+    {
+        get
+        {
+            return ViewState["NombreCliente"].ToString();
+        }
+        set
+        {
+            ViewState["NombreCliente"] = value;
+        }
+    }
+
+    private String Destinatario
+    {
+        get
+        {
+            return ViewState["Destinatario"].ToString();
+        }
+        set
+        {
+            ViewState["Destinatario"] = value;
+        }
+    }
+
+    private String Paqueteria
+    {
+        get
+        {
+            return ViewState["Paqueteria"].ToString();
+        }
+        set
+        {
+            ViewState["Paqueteria"] = value;
+        }
+    }
+    private String Guia
+    {
+        get
+        {
+            return ViewState["Guia"].ToString();
+        }
+        set
+        {
+            ViewState["Guia"] = value;
+        }
+    }
+
+    private String Rastreo
+    {
+        get
+        {
+            return ViewState["Rastreo"].ToString();
+        }
+        set
+        {
+            ViewState["Rastreo"] = value;
+        }
+    }
+
+
+    private DataTable DTMovimientos
+    {
+        get
+        {
+            return (DataTable)ViewState["DTMovimientos"];
+        }
+
+        set
+        {
+            ViewState["DTMovimientos"] = value;
+        }
+    }
+
+    private int CvePaqueteriaGuiaReasignar
+    {
+        get
+        {
+            return ViewState["CvePaqueteriaGuiaReasignar"].ToString().ToEntero();
+        }
+
+        set
+        {
+            ViewState["CvePaqueteriaGuiaReasignar"] = value;
+        }
+    }
+
+    private String Folio
+    {
+        get
+        {
+            return ViewState["Folio"].ToString();
+        }
+        set
+        {
+            ViewState["Folio"] = value;
+        }
+    }
+
+    #endregion
+
+
+    protected void Page_Load(object sender, EventArgs e)
+    {
+        if (!IsPostBack)
+        {
+            CargaEstatus();
+            CargaCombosModalEntrega();           
+            InicializaFechas();
+            CargaChoferes();            
+            UPFiltros.Update();
+            CargarCentrosDeCosto(null, DdlSucursales, null, LblDdlSucursal);
+            CargaDatos();
+        }
+    }
+
+    #region CARGA DDL
+    protected void CargaCombosModalEntrega()
+    {
+        ClsInventarios ObjInventarios = new ClsInventarios();
+
+        if (ObjInventarios.GetCamiones(-1, UsuarioActual.CveEmpresa) && ObjInventarios.DtResultados.Rows.Count > 0)
+        {
+            DdlModalCamion.DataSource = ObjInventarios.DtResultados;
+        }
+
+        ObjInventarios.Dispose();
+        DdlModalCamion.Items.Insert(0, new ListItem("Seleccione", "-1"));
+        DdlModalCamion.DataBind();
+
+        ClsAcarreos ObjAcar = new ClsAcarreos();
+
+        if (ObjAcar.GetChofer(-1, UsuarioActual.CveEmpresa, 1, -1))
+        {
+            DdlModalChofer.DataSource = ObjAcar.DtResultados;
+            DdlModalChofer.DataBind();
+        }
+        ObjAcar.Dispose();
+        DdlModalChofer.Items.Insert(0, new ListItem("Seleccione", "-1"));
+    }
+    protected void CargaChoferes()
+    {
+        ClsAcarreos ObjAcar = new ClsAcarreos();
+
+        if (ObjAcar.GetChofer(-1, UsuarioActual.CveEmpresa, 1, -1))
+        {
+            DdlChofer.DataSource = ObjAcar.DtResultados;            
+        }
+        ObjAcar.Dispose();
+        DdlChofer.DataBind();
+        DdlChofer.Items.Insert(0, new ListItem("Todos", "-1"));
+    }
+
+  
+
+ 
+
+    protected void CargaEstatus()
+    {
+        
+            DdlEstatus.Items.Insert(0, new ListItem("Todos ", "-1"));
+            DdlEstatus.Items.Insert(1, new ListItem("Registrado", "0"));
+            DdlEstatus.Items.Insert(2, new ListItem("Timbrado", "1"));
+            DdlEstatus.Items.Insert(3, new ListItem("Cancelado ", "2"));      
+
+    }
+
+  
+
+ 
+
+    protected void InicializaFechas()
+    {
+
+        TxtFechaI.Text = DateTime.Now.AddDays(-1).ToString("dd/MM/yyyy");
+        TxtFechaF.Text = DateTime.Now.ToString("dd/MM/yyyy");
+
+    }
+    #endregion
+
+    #region CARGA DATOS
+    protected void CargaDatos()
+    {
+        ClsGenerales ObjGeneral = new ClsGenerales();
+
+        if (ObjGeneral.GetInvEntregaAlmacenRutaRep(DdlSucursales.SelectedValue.ToEntero(),UsuarioActual.CveEmpresa, DdlEstatus.SelectedValue.ToEntero(), TxtFechaI.Text.ToDate(), TxtFechaF.Text.ToDate(), DdlChofer.SelectedValue.ToEntero()))
+        {
+            DTDatos = ObjGeneral.DtResultados;
+            GVDatos.DataSource = DTDatos;
+        }
+
+        ObjGeneral.Dispose();
+        GVDatos.DataBind();
+        UPDatos.Update();
+    }
+
+    
+
+ 
+    #endregion
+
+    #region BOTONES
+
+    protected void BtnConsultar_Click(object sender, EventArgs e)
+    {
+        CargaDatos();
+    }
+
+    protected void imgEditar_Click(object sender, EventArgs e)
+    {
+        GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
+
+        CveEntregaAlmacen = GvRow.DataKey("CveEntregaAlmacen").ToEntero();
+
+        int CveCliente = GvRow.DataKey("CveCliente").ToEntero();
+        int CveDireccionOrigen = GvRow.DataKey("CveDireccionOrigen").ToEntero();
+        int CveAlmacen = GvRow.DataKey("CveAlmacen").ToEntero();
+
+        CargaModalCombosDirecciones(CveCliente, CveDireccionOrigen, CveAlmacen);
+
+        DdlModalDireccionOrigen.SelectedValueExist(GvRow.DataKey("CveDireccionOrigen"));
+        DdlModalDireccionDestino.SelectedValueExist(GvRow.DataKey("CveDireccionDestino"));
+
+        DdlModalCamion.SelectedValueExist(GvRow.DataKey("CveCamion"));
+        DdlModalChofer.SelectedValueExist(GvRow.DataKey("CveChofer"));
+
+        TxtmodalFechaEntrega.Text = GvRow.DataKey("FechaEntrega").ToDate().ToString("dd/MM/yyyy");
+      
+
+        UpModalEditarentrega.Update();
+        this.RegistraScript("$('#DivEditarEntrega').modal('show');");
+    }
+
+
+    private void CargaModalCombosDirecciones(int CveCliente, int CveDireccionOrigen, int CveAlmacen )
+    {
+
+        DdlModalDireccionOrigen.Items.Clear();
+        DdlModalDireccionDestino.Items.Clear();
+
+        DataTable DTDireccionesCliente = new DataTable();
+        ClsClientes ObjClientes = new ClsClientes();
+        if (ObjClientes.DireccionEnvioGet(-1, -1, -1))
+        {
+            DTDireccionesCliente = ObjClientes.DtResultados ;
+        }
+        ObjClientes.Dispose();
+
+        DdlModalDireccionDestino.DataSource = DTDireccionesCliente.FiltraParametros($"CveCliente = {CveCliente}");
+        DdlModalDireccionDestino.DataBind();
+        DdlModalDireccionDestino.Items.Insert(0,new ListItem("Seleccione Una", "-1"));
+
+        string Almacen = get_GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen: CveAlmacen).FiltroPrimeroValor("Almacen", $"CveAlmacen = {CveAlmacen}");
+        if (CveDireccionOrigen > 0)
+        {
+            DdlModalDireccionOrigen.DataSource = DTDireccionesCliente.FiltraParametros($"CveDireccionEnvio = {CveDireccionOrigen}");
+            DdlModalDireccionOrigen.DataBind();            
+            DdlModalDireccionOrigen.Items.Insert(0, new ListItem($"Almacen: {Almacen}", "-2"));
+        }else
+        {
+            DdlModalDireccionOrigen.Items.Insert(0, new ListItem($"Almacen: {Almacen}", "-2"));
+        }
+
+    }
+
+
+    protected void LnkTimbrar_Click(object sender, EventArgs e)
+    {
+
+    }
+
+    protected void LnkCancelaTimbre_Click(object sender, EventArgs e)
+    {
+
+    }
+
+
+    protected void BtnModalEditarentrega_Click(object sender, EventArgs e)
+    {
+
+        bool ProcesoOK = true ;
+
+        ClsGenerales ObjGral = new ClsGenerales();
+        if(!ObjGral.UpdateInvEntregaAlmacenRuta(CveEntregaAlmacen,DdlModalDireccionOrigen.SelectedValue.ToEntero(), DdlModalDireccionDestino.SelectedValue.ToEntero(), DdlModalChofer.SelectedValue.ToEntero(), DdlModalCamion.SelectedValue.ToEntero(), TxtmodalFechaEntrega.Text.ToDate(), UsuarioActual.CveEmpresa))
+        {
+            ProcesoOK = false;
+        }
+        ObjGral.Dispose();
+        
+        if (ProcesoOK)
+        {
+            this.RegistraScript("$('#DivEditarEntrega').modal('hide');");
+            Alert("Entrega Actualizada correctamente.");
+            CargaDatos();
+        }
+
+    }
+
+    protected void BtnEliminarGuia_Click(object sender, EventArgs e)
+    {
+        //EliminaGuia();
+        //this.RegistraScript("$('#DivEditarGuia').modal('hide');");
+        //CargaDatos();
+    }
+
+    protected void GVDatos_RowDataBound(object sender, GridViewRowEventArgs e)
+    {
+        if (e.Row.RowType == DataControlRowType.DataRow)
+        {
+            LinkButton LnkEditar = e.Row.FCLinkButton("LnkEditar");
+            LinkButton LnkTimbrar = e.Row.FCLinkButton("LnkTimbrar");
+            LinkButton LnkCancelaTimbre = e.Row.FCLinkButton("LnkCancelaTimbre");
+
+            LnkEditar.Visible = false;
+            LnkTimbrar.Visible = false;
+            LnkCancelaTimbre.Visible = false;
+
+            if (e.Row.DataKey("Estatus").ToEntero() == 0)
+            {
+                LnkEditar.Visible = true;
+                LnkTimbrar.Visible = true;
+            }
+
+            if (e.Row.DataKey("Estatus").ToEntero() == 1)
+            {
+                LnkCancelaTimbre.Visible = true;
+            }
+
+            if (e.Row.DataKey("Estatus").ToEntero() == 2)
+            {
+
+            }
+
+            LnkCancelaTimbre.Visible = true;
+
+        }
+    }
+
+ 
+
+ 
+
+
+
+    #endregion
+
+
+
+
+
+
+
+
+
+   
+}

General/SaldosIniciales.aspx.vb

@@ -390,6 +390,7 @@ Partial Class General_SaldosIniciales
                 End If
             End If
 
+
         ElseIf RblFormato.SelectedValue = "7" Then
             If Not dt.Columns(0).ColumnName = "Código" Then
                 Alert("El nombre de la primera columna debe ser 'Código'. Favor de corregirlo", TipoMensaje.MsgError)
@@ -1726,7 +1727,7 @@ Partial Class General_SaldosIniciales
                             Exit For
                         End If
 
-                        Dim SubP As String = Row("SubProyecto").ToString
+                        Dim SubP As String = Row("SubProyecto").ToString.Trim
                         If SubP <> "" OrElse SubP <> "-" Then
                             DataTemp = SubProTemp.FiltraParametros(String.Format("SubProyecto = '{0}'", SubP))
                             CveSubProyecto = DataTemp.FiltroPrimeroValor("CveSubProyecto", "").ToEntero
@@ -1771,6 +1772,7 @@ Partial Class General_SaldosIniciales
 
 
                 Catch ex As Exception
+                    Alert(ex.Message)
                     ObjConta.RollBack()
                 End Try
 

Inventarios/EntradasSalidas.aspx.vb

@@ -5064,7 +5064,7 @@ Partial Class Inventarios_EntradasSalidas
 
                     If DtPSVirtual IsNot Nothing AndAlso DtPSVirtual.Rows.Count > 0 Then
 
-                        CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirtual, If(tOrigen > 0, 2, 3), 1, Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CveMovimientoRelacionado:=CveMovimiento, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="ES/GV")
+                        CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirtual, If(tOrigen > 0, 36, 37), 1, Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CveMovimientoRelacionado:=CveMovimiento, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="ES/GV")
                         FolioVirtual = ObjInventario.Folio
 
                         For Each RowUsado As DataRow In DtPSVirtual.Rows

Inventarios/EntregaAlmacenRuta.aspx

@@ -0,0 +1,326 @@
+<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="EntregaAlmacenRuta.aspx.cs" Inherits="Inventarios_EntregaAlmacenRuta" %>
+
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+    <style>
+        .MultiLineTextBox {
+            resize: none;
+        }
+    </style>
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+    <style>
+        .posicionvalidation {
+            left: 530px !important;
+        }
+    </style>
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
+     Entrega Almacen Ruta
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
+
+
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">  
+</asp:Content>
+<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
+    <asp:UpdatePanel ID="UpFiltro" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div class="portlet solid  grey-cascade portlet-filter" id="idnecesaria">
+                <div class="portlet-title portlet-filterT smalltitle">
+                    <div class="tools">                        
+                        <asp:Button ID="BtnConsultar" OnClick="BtnConsultar_Click" runat="server" Text="Consultar" class="btn btn-primary" Visible="true" />                        
+                        <a href="javascript:;" class="expand"></a>
+                    </div>
+                    <div class="titlefiltros  caption">
+                        <div class="row">
+                            <div class="col-sm-1"><asp:Label runat="server" id="LblSubProyecto"></asp:Label></div>
+                            <div class="col-sm-2">
+                                <asp:DropDownList runat="server" Id="DdlSubProyecto" CssClass="select2me" Width="100%"  DataValueField="CveSubProyecto" DataTextField="SubProyecto"></asp:DropDownList>
+                            </div>
+                            <label class="col-md-1 " style="width: 90px;">Fecha Inicial:</label>
+                        <div class="col-md-2">
+                            <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 138px !important; padding: 0px; margin-bottom: -10px;">
+                                <asp:TextBox ID="TxtFechaI" runat="server" CssClass="form-control" CausesValidation="true" Width="98%" MaxLength="10"></asp:TextBox>
+                                <span class="input-group-btn ">
+                                    <asp:LinkButton ID="imgCalendarioI" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                </span>
+                            </div>
+                            <ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="TxtFechaI" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                            <ajax:CalendarExtender runat="server" ID="Calendario" TargetControlID="TxtFechaI" PopupButtonID="ImgCalendarioI" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                            <asp:CompareValidator ID="cvFechaI" runat="server" ControlToValidate="TxtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
+                            <ajax:ValidatorCalloutExtender ID="vcoCvFI" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
+                            <asp:RequiredFieldValidator ID="rfvFechaI" runat="server" ControlToValidate="TxtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
+                            <ajax:ValidatorCalloutExtender ID="vcoFfvFI" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
+                        </div>
+
+                        <label class="col-md-1 " style="width: 80px;">Fecha Final:</label>
+                        <div class="col-md-2">
+                            <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 138px !important; padding: 0px; margin-bottom: -10px;">
+                                <asp:TextBox ID="TxtFechaF" runat="server" CssClass="form-control" CausesValidation="true" Width="98%" MaxLength="10"></asp:TextBox>
+                                <span class="input-group-btn ">
+                                    <asp:LinkButton ID="imgCalendarioF" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                </span>
+                            </div>
+                            <ajax:MaskedEditExtender ID="MEEFechaF" runat="server" TargetControlID="TxtFechaF" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                            <ajax:CalendarExtender runat="server" ID="Calendario2" TargetControlID="TxtFechaF" PopupButtonID="imgCalendarioF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                            <asp:CompareValidator ID="cvFechaF" runat="server" ControlToValidate="TxtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
+                            <ajax:ValidatorCalloutExtender ID="vcoCvFF" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
+                            <asp:RequiredFieldValidator ID="rfvFechaF" runat="server" ControlToValidate="TxtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
+                            <ajax:ValidatorCalloutExtender ID="vcoRfvFF" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
+                        </div>
+                        </div>
+                    </div>
+                </div>
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+
+
+    <asp:UpdatePanel runat="server" ID="UpDatosEntrga">
+        <ContentTemplate>
+            
+                    <div class="row"   >
+
+                        <div class="col-md-1" runat="server" id="DVDatosEntrega1" visible="false">
+                            Chofer:
+                        </div>
+                        <div class="col-md-1" runat="server"   id="DVDatosEntrega2" visible="false">
+                            <asp:DropDownList ID="DdlChofer" runat="server" DataTextField="Chofer" DataValueField="CveChofer"   CssClass="form-control input-sm select2me" Width="100%" CausesValidation="true"></asp:DropDownList>
+                            <asp:RequiredFieldValidator ID="RfvDdlChofer"  runat="server" Enabled="false" ControlToValidate="DdlChofer" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Chofer''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                            <ajax:ValidatorCalloutExtender ID="VceDdlChofer" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlChofer" Width="350px"></ajax:ValidatorCalloutExtender>
+                        </div>
+                        <div class="col-md-1" runat="server"   id="DVDatosEntrega3" visible="false">
+                            Unidad:
+                        </div>
+                        <div class="col-md-1" runat="server"   id="DVDatosEntrega4" visible="false">
+                            <asp:DropDownList runat="server" ID="DdlUnidadCamion"   Width="100%" AppendDataBoundItems="true" CssClass="form-control input-sm select2me" DataValueField="CveCamion" DataTextField="Placa" CausesValidation="true"></asp:DropDownList>
+                            <asp:RequiredFieldValidator ID="RfvDdlUnidadCamion" runat="server" Enabled="false" ControlToValidate="DdlUnidadCamion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Unidad''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                            <ajax:ValidatorCalloutExtender ID="VceDdlUnidadCamion" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlUnidadCamion" Width="350px"></ajax:ValidatorCalloutExtender>
+                        </div>
+
+                        <div class="col-md-1" runat="server"   id="DVDatosEntrega5" visible="false">
+                            Fecha de Entrega:
+                        </div>
+
+                        <div class="col-md-1"  runat="server"  id="DVDatosEntrega6" visible="false">
+                            <div class="input-group input-sm  input-small date date-picker" data-date-format="dd/mm/yyyy" style="width: 125px !important;">
+                                <asp:TextBox ID="TxtFechaEntrega" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10" Width="80px" ClientIDMode="Static"></asp:TextBox>
+                                <span class="input-group-btn ">
+                                    <asp:LinkButton runat="server" ID="ImgFechaEntrega" class="btn default"> <i class="fa fa-calendar"></i>  </asp:LinkButton>
+                                </span>
+                                <ajax:MaskedEditExtender ID="MaskedEditExtender2" runat="server" TargetControlID="TxtFechaEntrega" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                                <ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaEntrega" PopupButtonID="ImgFechaEntrega" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                                <asp:CompareValidator ID="CompareValidator1" runat="server" ControlToValidate="TxtFechaEntrega" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Entrega''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
+                                <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender4" runat="server" HighlightCssClass="vco" TargetControlID="CompareValidator1" Width="350px"></ajax:ValidatorCalloutExtender>
+                            </div>
+                        </div>
+                        <div class="col-md-1"  runat="server" id="DvCartaPorte1" visible="false"> 
+                            Carta Porte:
+                        </div> 
+                        <div class="col-md-1"  runat="server" id="DvCartaPorte2"  visible="false"> 
+                             
+                             <asp:CheckBox ID="ChkEmitirCartaPorte" runat="server"  Text="Carta Porte"  CssClass="chksino" />
+                        </div>
+                        <div class="col-md-9" runat="server"   id="DVDatosEntrega7"  >
+                            
+                        </div>                        
+
+                         <div class="col-md-2" style="text-align:center!important">
+                             <asp:LinkButton runat="server" CssClass="btn btn-primary"  ID="LnkGenerarDocumentos" OnClick="LnkGenerarDocumentos_Click">Preselección de Entregas</asp:LinkButton>
+                        </div>
+
+                         <div class="col-md-1"  style="text-align:center!important">
+                             <asp:LinkButton ID="BtnAsignar" OnClick="BtnAsignar_Click" runat="server" Text="Asignar" class="btn btn-primary" ValidationGroup="GrpGuardar"  CausesValidation="true" Visible="false" />
+                        </div>
+
+                    </div>
+
+        </ContentTemplate>
+        <Triggers>
+            <asp:PostBackTrigger  ControlID="BtnAsignar" />
+        </Triggers>
+    </asp:UpdatePanel>
+
+
+    <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <asp:Panel runat="server" ID="portletTarea" class="portlet light smmallpadding bordered">
+                <div class="portlet-title">
+                    <div class="caption font-green">
+                        <i class="icon-pin font-green"></i>
+                        <span class="caption-subject bold uppercase">ASIGNACIÓN DE ENTREGAS</span>
+                    </div>
+                    <div class="tools">
+                        <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
+                    </div>
+                </div>                              
+                <div class="portlet-body rowpadding">
+
+
+                    <div class="row" runat="server" id="DVGvPaqueteriasGuias" >
+                        <div class="col-md-12">
+
+
+                            <asp:GridView ID="GvPaqueteriasGuias" runat="server" AutoGenerateColumns="False"
+                                DataKeyNames="SerieFolio,FechaIng,Nombre,CveVenta,OrdenCompra,NombreComercial,TipoDocto,CorreoNotificacion,CveVendedor,Orden,CveMovimiento,CveDireccionEnvio,CveSubProyectoOrigen"
+                                EmptyDataText="No se encontraron registros" ToolTip="Listado de entregas"
+                                CssClass="table table-striped table-advance table-hover Widthall ScrollAD"
+                                data-sort="true"
+                                data-freezerows="1"
+                                GridLines="None">
+                                <Columns>
+                                    <asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="3%" HeaderStyle-Width="3%">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:CheckBox ID="ChkAsigna" runat="server" Checked="false" />
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                    <asp:BoundField HeaderText="Cons" DataField="Num" HeaderStyle-Width="25px" ItemStyle-HorizontalAlign="Center" />
+                                    <asp:TemplateField HeaderText="Folio" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="10%" HeaderStyle-Width="10%">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:HyperLink ID="LblFolio" runat="server" NavigateUrl='<%# Eval("CveVenta","/Ventas/Ventas.aspx?CveVenta={0}") %>' Text='<%# Eval("SerieFolio") %>'></asp:HyperLink>
+                                        </ItemTemplate>
+
+                                    </asp:TemplateField>
+                                    <%--<asp:BoundField HeaderText="Estatus" DataField="Estatus" HeaderStyle-Width="150px" ItemStyle-Width="150px" ItemStyle-HorizontalAlign="Left" />--%>
+                                    <asp:TemplateField HeaderText="Fecha" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="10%" HeaderStyle-Width="10%">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:Literal ID="LblFechaIng" runat="server" Text='<%# Eval("FechaIng", "{0:dd/MM/yyyy}") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                    <asp:TemplateField HeaderText="Cliente" HeaderStyle-HorizontalAlign="Left">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:Literal ID="LblNombre" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                    <asp:TemplateField HeaderText="Contacto" HeaderStyle-HorizontalAlign="Left">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:Literal ID="LblContacto" runat="server" Text='<%# Eval("Contacto") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                     <asp:BoundField HeaderText="Dirección" DataField="Direccion"  ItemStyle-HorizontalAlign="Left" />
+                                </Columns>
+
+                            </asp:GridView>
+
+
+
+                        </div>
+
+                    </div>
+
+
+
+                      <div class="row" runat="server" id="DVGvGenerarDocumentos" visible="false">
+                        <div class="col-md-12">
+
+
+                            <asp:GridView ID="GvGenerarDocumentos" runat="server" AutoGenerateColumns="False" Width="100%"  
+                                DataKeyNames="SerieFolio,FechaIng,Nombre,CveVenta,OrdenCompra,NombreComercial,TipoDocto,CorreoNotificacion,CveVendedor,Orden,CveMovimiento,CveDireccionEnvio,CveSubProyectoOrigen"
+                                EmptyDataText="No se encontraron registros" ToolTip="Listado de entregas"
+                                CssClass="GvGenerarDocumentos"
+                                data-sort="true"
+                                data-freezerows="1"
+                                GridLines="None">
+                                <Columns>
+                                    
+                                    <asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="3%" HeaderStyle-Width="3%">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:CheckBox ID="ChkAsigna" runat="server" Checked="false" Visible="false" />                                          
+                                            
+                                           <a class="blue"><i class="fa fa-arrows-v green" aria-hidden="true"></i></a>
+                                            
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                    <%--<asp:BoundField HeaderText="Cons" DataField="Num" HeaderStyle-Width="25px" ItemStyle-HorizontalAlign="Center" />--%>
+
+                                    <asp:TemplateField HeaderText="Cons" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="25px">
+                                        <ItemTemplate>
+                                            <asp:Label ID="LblNum" runat="server" Text='<%# Eval("Num") %>' CssClass="RowOrdenamiento" ></asp:Label>
+                                             <input type="hidden" name="OrdenMovimientos" value='<%# Eval("CveMovimiento") %>' />
+                                            
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                    
+                                    <asp:TemplateField HeaderText="Folio" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="10%" HeaderStyle-Width="10%">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:Literal ID="LblFolio" runat="server" Text='<%# Eval("SerieFolio") %>'></asp:Literal>
+                                        </ItemTemplate>
+
+                                    </asp:TemplateField>
+                                    <%--<asp:BoundField HeaderText="Estatus" DataField="Estatus" HeaderStyle-Width="150px" ItemStyle-Width="150px" ItemStyle-HorizontalAlign="Left" />--%>
+                                    <asp:TemplateField HeaderText="Fecha" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="10%" HeaderStyle-Width="10%">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:Literal ID="LblFechaIng" runat="server" Text='<%# Eval("FechaIng", "{0:dd/MM/yyyy}") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                    <asp:TemplateField HeaderText="Cliente" HeaderStyle-HorizontalAlign="Left">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:Literal ID="LblNombre" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                    <asp:TemplateField HeaderText="Contacto" HeaderStyle-HorizontalAlign="Left">
+                                        <ItemTemplate>
+                                            &nbsp;<asp:Literal ID="LblContacto" runat="server" Text='<%# Eval("Contacto") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
+                                    <asp:BoundField HeaderText="Dirección" DataField="Direccion"  ItemStyle-HorizontalAlign="Left" />
+
+                                    
+                                </Columns>
+
+                            </asp:GridView>
+
+
+
+                        </div>
+
+                    </div>
+
+
+               
+
+
+                </div>
+            </asp:Panel>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+</asp:Content>
+<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
+
+    <script>           
+
+
+
+        function InitOrdenamientoGvGenerarDocumentos() {
+
+            $(".GvGenerarDocumentos").sortable({
+                items: 'tr:not(tr:first-child)',
+                cursor: 'pointer',
+                axis: 'y',
+                dropOnEmpty: false,
+                start: function (e, ui) {
+                    ui.item.addClass("selected");                   
+                    let asd = ui.item.children('a');
+                },
+                stop: function (e, ui) {                
+                    //Ordenar el numero de la columna *Cons*
+                    $(".RowOrdenamiento").each(function (index) {
+                        let nRow = (index + 1);
+                        $(this).text(nRow);
+                    });
+
+                },
+            });
+        }
+
+        
+       
+
+
+    </script>
+
+</asp:Content>

Inventarios/EntregaAlmacenRuta.aspx.cs

@@ -0,0 +1,420 @@
+using System;
+using System.Collections.Generic;
+using System.Linq;
+using System.Web;
+using System.Web.UI;
+using System.Web.UI.WebControls;
+using System.Data;
+using Extensiones;
+using Microsoft.Reporting.WebForms;
+using System.Text;
+
+public partial class Inventarios_EntregaAlmacenRuta : ClsPaginas
+{
+
+
+    DataTable DTGenrarDocumentos
+    {
+        get {
+
+            if(ViewState["DTGenrarDocumentos"] == null){
+                ViewState["DTGenrarDocumentos"] = new DataTable();
+            }
+            return (DataTable)ViewState["DTGenrarDocumentos"];
+
+        }
+        set {
+            ViewState["DTGenrarDocumentos"] = (DataTable)value;
+        }
+    }
+
+    DataTable DTDatosConsulta
+    {
+        get
+        {
+
+            if (ViewState["DTDatosConsulta"] == null)
+            {
+                ViewState["DTDatosConsulta"] = new DataTable();
+            }
+            return (DataTable)ViewState["DTDatosConsulta"];
+
+        }
+        set
+        {
+            ViewState["DTDatosConsulta"] = (DataTable)value;
+        }
+    }
+
+
+    bool SelecionEntrega
+    {
+        get
+        {
+            if (ViewState["SelecionEntrega"] == null)
+            {
+                ViewState["SelecionEntrega"] = false;
+            } 
+            return (bool) ViewState["SelecionEntrega"];
+        }
+        set
+        {
+            ViewState["SelecionEntrega"] = (bool)value;
+        }
+    }
+
+
+    protected void Page_Load(object sender, EventArgs e)
+    {
+        if (!IsPostBack)
+        {
+
+         
+
+            SelecionEntrega = true;           
+           
+            CargaCombos();
+            CargaDatos();
+
+        }
+    }
+
+    protected void BtnAsignar_Click(object sender, EventArgs e)
+    {
+
+        
+
+
+       if(DdlChofer.SelectedValue.ToEntero() <= 0)
+        {
+            Alert("Debe seleccionar un chofer.", ModExtensiones.TipoMensaje.MsgAdvertencia);
+            return;
+        }
+
+       if(DdlUnidadCamion.SelectedValue.ToEntero() <= 0)
+        {
+            Alert("Debe seleccionar una unidad", ModExtensiones.TipoMensaje.MsgAdvertencia);
+            return;
+        }
+      
+
+        StringBuilder SBError = new StringBuilder();
+        ActualizaOrdenDTGenrarDocumentos();
+
+
+        
+        bool TieneError = false;
+        ClsGenerales ObjGeneral = new ClsGenerales();
+        ObjGeneral.IniciaTransacSQL();
+
+        GridViewRowCollection Grid = GvGenerarDocumentos.Rows;
+
+       
+        string Usuario = DdlChofer.SelectedItem.Text;
+
+        
+
+
+        int CveDireccionOrigen = -1;
+        foreach (GridViewRow row in Grid)
+        {
+            //int CvePaqueteriasGuias = row.DataKey("CvePaqueteriaGuia").ToEntero();
+            int Orden = row.DataKey("Orden").ToEntero();
+
+            //if (ObjGeneral.AsignarEntregasPorRealizar(CvePaqueteriasGuias, CvePersonal: -1, CveAsignacionEntrega: CveAsignacionEntrega, Orden: Orden))
+            //{
+
+                int CveDireccionDestino = row.DataKey("CveDireccionEnvio").ToEntero();
+
+            if (CveDireccionDestino <= 0)
+            {
+                SBError.AppendLine($"Factura {row.DataKey("SerieFolio")}  el cliente {row.DataKey("Nombre")} no tiene una dirección de envio. ");
+                TieneError = true;
+                break;
+            }
+            int CveEntregaAlmacen = ObjGeneral.AddInvEntregaAlmacenRuta(row.DataKey("CveSubProyectoOrigen").ToEntero(), row.DataKey("CveMovimiento").ToEntero(), CveDireccionOrigen, CveDireccionDestino, DdlChofer.SelectedValue.ToEntero(), DdlUnidadCamion.SelectedValue.ToEntero(), TxtFechaEntrega.Text.ToDate(), "E",Orden);
+            CveDireccionOrigen = row.DataKey("CveDireccionEnvio").ToEntero();
+
+            if (CveEntregaAlmacen > 0)
+            {
+                DateTime MinFecha = new DateTime(1900, 01, 01);
+                int CveTimbre = ObjGeneral.AddGralTimbre("Tra", "-1", -1, "", MinFecha, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 0, -1, ChkEmitirCartaPorte.Checked, CveEntregaAlmacen, row.DataKey("CveSubProyectoOrigen").ToEntero());
+
+                if (CveTimbre <= 0)
+                {
+                    SBError.AppendLine($"Factura {row.DataKey("SerieFolio")} error al agregar timbre. ");
+  
+                     TieneError = true;
+                    break;
+                }
+            }
+            else
+            {
+                SBError.AppendLine($"Factura {row.DataKey("SerieFolio")} error al agregar entrega alamcen. ");
+                TieneError = true;
+                break;
+            }
+
+          
+        }
+
+
+      
+
+
+        if (!TieneError)
+        {
+
+            foreach (GridViewRow row in Grid)
+            {
+                try
+                {
+                    //MandarNotificacionCorreo(row);
+                }
+                catch (Exception ex)
+                {
+                    TieneError = true;
+                    ModExtensiones.GuardaLog(ex.Message);
+                }
+
+
+            }
+
+            if (!TieneError)
+            {
+                ObjGeneral.Commit();
+                Alert("Entregas asignadas correctamente");
+
+                DdlChofer.SelectedValueExist("-1");
+                DdlUnidadCamion.SelectedValueExist("-1");
+                ChkEmitirCartaPorte.Checked = false;
+
+                SelecionEntrega = false;
+                SeleccioanrGenrar();
+
+                CargaDatos();
+                UpDatos.Update();
+            }
+            else
+            {
+                ObjGeneral.RollBack();
+            }
+            ObjGeneral.Dispose();
+        }else
+        {
+            Alert(SBError.ToString(), ModExtensiones.TipoMensaje.MsgAdvertencia);
+        }
+       
+    }
+    private void CargaDatos()
+    {
+        ClsGenerales ObjGeneral = new ClsGenerales();
+        if (ObjGeneral.GetInvEntregaAlmacenRuta(DdlSubProyecto.SelectedValue.ToEntero(), TxtFechaI.Text.ToDate(), TxtFechaF.Text.ToDate(), UsuarioActual.CveEmpresa,  1))
+        {
+            GvPaqueteriasGuias.DataSource = ObjGeneral.DtResultados;
+            DTDatosConsulta = ObjGeneral.DtResultados;
+            DTGenrarDocumentos = ObjGeneral.DtResultados.Clone();
+
+        }
+        ObjGeneral.Dispose();
+        GvPaqueteriasGuias.DataBind();
+
+        UpDatos.Update();   
+    }
+
+ 
+    private void CargaCombos()
+    {
+
+        ClsInventarios ObjInventarios = new  ClsInventarios();
+        
+       if(ObjInventarios.GetCamiones(-1, UsuarioActual.CveEmpresa) && ObjInventarios.DtResultados.Rows.Count > 0){
+            DdlUnidadCamion.DataSource = ObjInventarios.DtResultados;           
+        }
+        ObjInventarios.Dispose();
+        DdlUnidadCamion.Items.Insert(0, new ListItem("Seleccione", "-1"));
+        DdlUnidadCamion.DataBind();
+
+        TxtFechaI.Text = DateTime.Now.AddDays(-1).ToShortDateString();
+        TxtFechaF.Text = DateTime.Now.ToShortDateString();
+
+        ClsAcarreos ObjAcar = new ClsAcarreos();
+
+        if(ObjAcar.GetChofer(-1, UsuarioActual.CveEmpresa, 1, -1) ){
+            DdlChofer.DataSource = ObjAcar.DtResultados;
+            DdlChofer.DataBind();
+        }
+        ObjAcar.Dispose();
+        DdlChofer.Items.Insert(0, new ListItem("Seleccione", "-1"));
+
+        TxtFechaEntrega.Text =  DateTime.Now.ToShortDateString();
+ 
+
+        CargarCentrosDeCosto(null, DdlSubProyecto, null, LblSubProyecto);
+
+
+    }
+     
+
+    protected void LnkGenerarDocumentos_Click(object sender, EventArgs e)
+    {
+        SeleccioanrGenrar();
+    }
+
+
+    private void SeleccioanrGenrar() {
+
+        if (SelecionEntrega)
+        {
+           
+            DTGenrarDocumentos.Rows.Clear();
+
+
+
+            int CountRows = 0;
+            foreach (GridViewRow GvRow in GvPaqueteriasGuias.Rows)
+            {
+
+                CheckBox ChkAsigna = GvRow.FCCheckBox("ChkAsigna");
+
+                if (ChkAsigna.Checked)
+                {
+
+                    int CveMovimiento = GvRow.DataKey("CveMovimiento").ToEntero();
+
+                    DataRow dRow = DTGenrarDocumentos.NewRow();
+                    DataRow dRowOrigen = DTDatosConsulta.FiltraParametros($"CveMovimiento = {CveMovimiento}").Rows[0];
+
+                    int IndexColun = 0;
+                    foreach (DataColumn dColumn in DTDatosConsulta.Columns)
+                    {
+                        dRow[IndexColun] = dRowOrigen[IndexColun];
+                        IndexColun++;
+                    }
+
+                    dRow["Num"] = CountRows + 1;
+                    DTGenrarDocumentos.Rows.Add(dRow);
+                    CountRows++;
+                }
+            }
+
+            DTGenrarDocumentos.AcceptChanges();
+
+           
+
+
+            SelecionEntrega = false;
+            LnkGenerarDocumentos.Text = "Regresar a Preselección";
+            LnkGenerarDocumentos.CssClass = "btn btn-default";
+
+            DVDatosEntrega1.Visible = true;
+            DVDatosEntrega2.Visible = true;
+            DVDatosEntrega3.Visible = true;
+            DVDatosEntrega4.Visible = true;
+            DVDatosEntrega5.Visible = true;
+            DVDatosEntrega6.Visible = true;
+
+            DVDatosEntrega7.Attributes.Add("class", "col-md-1");
+
+            if (UsuarioActual.Empresa.Funcionalidad(161).ToEntero() == 1)
+            {
+                DvCartaPorte1.Visible = true;
+                DvCartaPorte2.Visible = true;
+            }
+
+         
+            BtnConsultar.Visible = false;
+
+            UpDatos.Update();
+            UpFiltro.Update();
+
+
+            if (CountRows > 0)
+            {
+                GvGenerarDocumentos.DataSource = DTGenrarDocumentos;
+                GvGenerarDocumentos.DataBind();
+
+                DVGvGenerarDocumentos.Visible = true;
+                BtnAsignar.Visible = true;
+                DVGvPaqueteriasGuias.Visible = false;
+
+                RegistraScript("InitOrdenamientoGvGenerarDocumentos();");
+            }
+            else
+            {
+                Alert("No hay entregas seleccionadas", ModExtensiones.TipoMensaje.MsgAdvertencia);
+                return;
+            }
+        }
+        else
+        {
+
+            BtnConsultar.Visible = true;
+            SelecionEntrega = true;
+            LnkGenerarDocumentos.Text = "Preselección de Entregas";
+            LnkGenerarDocumentos.CssClass = "btn btn-primary";
+            DVDatosEntrega7.Attributes.Add("class", "col-md-9");
+
+            DVDatosEntrega1.Visible = false;
+            DVDatosEntrega2.Visible = false;
+            DVDatosEntrega3.Visible = false;
+            DVDatosEntrega4.Visible = false;
+            DVDatosEntrega5.Visible = false;
+            DVDatosEntrega6.Visible = false;            
+
+            if (UsuarioActual.Empresa.Funcionalidad(161).ToEntero() == 1)
+            {
+                DvCartaPorte1.Visible = false;
+                DvCartaPorte2.Visible = false;
+            }
+
+            BtnAsignar.Visible = false;
+            DVGvGenerarDocumentos.Visible = false;
+            DVGvPaqueteriasGuias.Visible = true;
+            UpDatos.Update();
+            UpFiltro.Update();
+
+        }        
+    }
+
+
+
+ 
+
+    private void ActualizaOrdenDTGenrarDocumentos()
+    {
+        string[] OrdenMovimientos = Request.Form.GetValues("OrdenMovimientos");       
+
+        int NumOrden = 1;
+        foreach (string CveMovimiento in OrdenMovimientos)
+        {
+            foreach(DataRow dRow in DTGenrarDocumentos.Rows)
+            {
+                if (CveMovimiento.ToEntero() == dRow["CveMovimiento"].ToString().ToEntero()  )
+                {
+                    dRow["Orden"] = NumOrden;
+                }
+            }
+            DTGenrarDocumentos.AcceptChanges();
+            NumOrden++;
+        }
+
+
+        DataView DTview = new DataView(DTGenrarDocumentos);
+
+        // Sort by State and ZipCode column in descending order
+        DTview.Sort = "Orden ASC";
+
+        GvGenerarDocumentos.DataSource = DTview;
+        GvGenerarDocumentos.DataBind();
+        UpDatos.Update();
+
+         
+
+    }
+
+    protected void BtnConsultar_Click(object sender, EventArgs e)
+    {
+        CargaDatos();
+    }
+}

Inventarios/RepAnomalias.aspx

@@ -130,18 +130,18 @@
                     <div class="titlefiltros  caption">
                         <div class="row">
                             <div class="col-md-1 truncate">Ver por:</div>
-                            <div class="col-md-1">
+                            <div class="col-md-2">
                                 <asp:DropDownList ID="DdlGPO" CssClass="form-control select2me" runat="server" AppendDataBoundItems="true" Width="100%">
-                                    <asp:ListItem Text="Detalle" Value="1"></asp:ListItem>
+                                    <asp:ListItem Text="Detallado Serie/Lote/Cad" Value="1"></asp:ListItem>
-                                    <asp:ListItem Text="Cantidad" Value="2"></asp:ListItem>
+                                    <asp:ListItem Text="Cantidad" Value="2" Selected="True"></asp:ListItem>
                                 </asp:DropDownList>
                             </div>
 
-                            <div class="col-md-1 truncate">Vista de Resultados:</div>
+                            <div class="col-md-2 truncate">Vista de Resultados:</div>
                             <div class="col-md-1">
                                 <asp:DropDownList ID="DdlVista" CssClass="form-control select2me" runat="server" AppendDataBoundItems="true" Width="100%">
-                                    <asp:ListItem Text="Ver por Detalle" Value="1"></asp:ListItem>
+                                    <asp:ListItem Text="Detallado" Value="1"></asp:ListItem>
-                                    <asp:ListItem Text="Ver por Grupos" Value="2"></asp:ListItem>
+                                    <asp:ListItem Text="Agrupado" Value="2"></asp:ListItem>
                                 </asp:DropDownList>
                             </div>
 
@@ -234,203 +234,227 @@
     <asp:UpdatePanel runat="server"   ID="UpGeneral"   UpdateMode="Conditional">
         <ContentTemplate>
 
-                <div runat="server" id="DVNormal">
+            <div runat="server" id="DVNormal">
-        <asp:UpdatePanel ID="UPAnomalias" UpdateMode="Conditional" runat="server">
+                <asp:UpdatePanel ID="UPAnomalias" UpdateMode="Conditional" runat="server">
-        <ContentTemplate>
+                    <ContentTemplate>
-            <div class="row">
+                        <div class="row">
-                <div class="col-md-12">
+                            <div class="col-md-12">
-                    <label style="font-size: 16px"><b>Productos que Faltan</b></label>
+                                <label style="font-size: 16px"><b>Productos que Faltan</b></label>
-                    <div class="row">
+                                <div class="row">
-                        <div class="col-md-4" align="left" id="divRegistradosFaltan" runat="server">
+                                    <div class="col-md-4" align="left" id="divRegistradosFaltan" runat="server">
-                            <asp:Label runat="server">Número de registros: <b><asp:Literal ID="LtlTotalRegistrosFaltan" runat="server"></asp:Literal></b></asp:Label>
+                                        <asp:Label runat="server">Número de registros: <b>
-                        </div>
+                                            <asp:Literal ID="LtlTotalRegistrosFaltan" runat="server"></asp:Literal></b></asp:Label>
-                        <div class="col-md-8" align="right" id="DivBuscadorFaltan" runat="server">
-                            <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvF.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
-                            <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvF.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
-                        </div>
-                    </div>
-                </div>
-            </div>
-            <asp:GridView ID="GvF" data-sort="true" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False"
-                CssClass="table table-striped table-hover Widthall ScrollAD" Style="text-align: center;"
-                GridLines="None"  DataKeyNames="CvePS">
-                <Columns>
-                    <asp:TemplateField Visible="false">
-                        <HeaderTemplate>
-                            <asp:CheckBox ID="ChkAllFaltante" runat="server"/>
-                        </HeaderTemplate>
-                        <ItemTemplate>
-                            <asp:CheckBox ID="ChkPSFaltante"  runat="server" />
-                        </ItemTemplate>
-                    </asp:TemplateField>
-                    <asp:TemplateField HeaderText="#">
-                        <ItemTemplate>
-                            <asp:Label ID="LblC" runat="server" Font-Size="6pt"></asp:Label>
-                        </ItemTemplate>
-                    </asp:TemplateField>
-                    <asp:BoundField HeaderText="Código Barras" DataField="CodigoBarras" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen"/>
-                    <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" DataFormatString="{0:d}" />
-                    <asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
-                    <%--<asp:BoundField HeaderText="Existencia" DataField="CantidadReal" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />--%>
-                    <asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
-                    <asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
-                    <asp:BoundField HeaderText="Costo" DataField="Costo" DataFormatString="{0:#,##0.00}" ItemStyle-HorizontalAlign="Right" />
-                </Columns>
-            </asp:GridView>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-    <br />
-                   
-    <asp:UpdatePanel ID="UpdateGvS" UpdateMode="Conditional" runat="server">
-        <ContentTemplate>
-            <div class="row">
-                <div class="col-md-12">
-                    <label style="font-size: 16px"><b>Productos que Sobran</b></label>
-                    <div class="row">
-                        <div class="col-md-4" align="left" id="divRegistradosSobran" runat="server">
-                            <asp:Label runat="server">Número de registros: <b><asp:Literal ID="LtlTotalRegistrosSobran" runat="server"></asp:Literal></b></asp:Label>
-                        </div>
-                        <div class="col-md-8" align="right" id="DivBuscadorSobran" runat="server">
-                            <input type="text" id="TxtBusqueda2" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvS.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
-                            <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvS.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
-                        </div>
-                    </div>
-                </div>
-            </div>
-            <asp:GridView ID="GvS" data-sort="true" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False"
-                CssClass="table table-striped table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None" DataKeyNames="CvePS">
-                <Columns>
-                    <asp:TemplateField Visible="false">
-                        <HeaderTemplate>
-                            <asp:CheckBox ID="ChkAllSobrante" runat="server"/>
-                        </HeaderTemplate>
-                        <ItemTemplate>
-                            <asp:CheckBox ID="ChkPSSobrante"  runat="server" />
-                        </ItemTemplate>
-                    </asp:TemplateField>
-                    <asp:TemplateField HeaderText="#">
-                        <ItemTemplate>
-                            <asp:Label ID="LblC" runat="server" Font-Size="6pt"></asp:Label>
-                        </ItemTemplate>
-                    </asp:TemplateField>
-                    <asp:BoundField HeaderText="Código Barras" DataField="CodigoBarras" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen"/>
-                    <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" DataFormatString="{0:d}" />
-                    <%--<asp:BoundField HeaderText="Existencia" DataField="CantidadReal" ItemStyle-HorizontalAlign="Right" />--%>
-                    <asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" ItemStyle-HorizontalAlign="Right" />
-                    <asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
-                    <asp:BoundField HeaderText="Costo" DataField="Costo" DataFormatString="{0:#,##0.00}" ItemStyle-HorizontalAlign="Right" />
-                </Columns>
-            </asp:GridView>
-
-            <div class="row">
-                <div class="col-md-12">
-                    <label style="font-size: 16px"><b>Productos Coincidentes</b></label>
-                    <div class="row">
-                        <div class="col-md-4" align="left" id="div1" runat="server">
-                            <asp:Label runat="server">Número de registros: <b><asp:Literal ID="LtlCoincidentes" runat="server"></asp:Literal></b></asp:Label>
-                        </div>
-                        <div class="col-md-8" align="right" id="divRegistradosCoinciden" runat="server">
-                            <input type="text" id="TxtBusqueda3" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda3','{0}')", GvC.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
-                            <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda3','{0}')", GvS.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
-                        </div>
-                    </div>
-                </div>
-            </div>
-            <asp:GridView ID="GvC" data-sort="true" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False"
-                CssClass="table table-striped table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None" DataKeyNames="CvePS">
-                <Columns>                     
-                    <asp:TemplateField Visible="false">
-                        <HeaderTemplate>
-                            
-                        </HeaderTemplate>
-                        <ItemTemplate>
-                            
-                        </ItemTemplate>
-                    </asp:TemplateField>
-                    <asp:TemplateField HeaderText="#">
-                        <ItemTemplate>
-                            <asp:Label ID="LblC" runat="server" Font-Size="6pt"></asp:Label>
-                        </ItemTemplate>
-                    </asp:TemplateField>
-                    <asp:BoundField HeaderText="Código Barras" DataField="CodigoBarras" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen"/>
-                    <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" DataFormatString="{0:d}" />
-                    <%--<asp:BoundField HeaderText="Existencia" DataField="CantidadReal" ItemStyle-HorizontalAlign="Right" />--%>
-                    <asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" ItemStyle-HorizontalAlign="Right" />
-                    <asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
-                    <asp:BoundField HeaderText="Costo" DataField="Costo" DataFormatString="{0:#,##0.00}" ItemStyle-HorizontalAlign="Right" />
-                </Columns>
-            </asp:GridView>
-
-        </ContentTemplate>
-    </asp:UpdatePanel>
-    <br />
-
-    <div id="ModalGuardar" class="modal ADS fade" role="dialog">
-                <div class="modal-dialog modal-sm">
-                    <div class="modal-content">
-                        <div class="modal-header ">
-                            <button type="button" class="close" data-dismiss="modal">&times;</button>
-                            <h4 class="modal-title">Guardar Nuevo Inventario Físico</h4>
-                        </div>
-
-                        <div class="modal-body">
-                            <asp:UpdatePanel runat="server" ID="UpFecha" UpdateMode="Conditional">
-                                <ContentTemplate>
-                                    <div class="form-group form-md-line-input input-iconright">
-                                        <asp:TextBox ID="TxtTitulo" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="50"></asp:TextBox>
-                                        <asp:RequiredFieldValidator ID="RFVTitulos" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtTitulo" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Titulo''</b> es necesario, por favor ingréselo." ValidationGroup="GrpObligatorio"></asp:RequiredFieldValidator>
-                                        <label for="<%= TxtTitulo.ClientID.ToString()%>">Titulo:</label>
                                     </div>
-                                </ContentTemplate>
+                                    <div class="col-md-8" align="right" id="DivBuscadorFaltan" runat="server">
-                            </asp:UpdatePanel>
+                                        <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvF.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                                        <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvF.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                                    </div>
+                                </div>
+                            </div>
                         </div>
-                        <div class="modal-footer">
+                        <asp:GridView ID="GvF" data-sort="true" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False"
-                            <asp:UpdatePanel runat="server">
+                            CssClass="table table-striped table-hover Widthall ScrollAD" Style="text-align: center;"
-                                <ContentTemplate>
+                            GridLines="None" DataKeyNames="CvePS">
-                                    <asp:Button ID="BtnCrear" runat="server" ClientIDMode="Static" Text="Crear" CssClass="btn btn-primary" ValidationGroup="Actualiza" />
+                            <Columns>
-                                    <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
+                                <asp:TemplateField Visible="false">
+                                    <HeaderTemplate>
+                                        <asp:CheckBox ID="ChkAllFaltante" runat="server" />
+                                    </HeaderTemplate>
+                                    <ItemTemplate>
+                                        <asp:CheckBox ID="ChkPSFaltante" runat="server" />
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+                                <asp:TemplateField HeaderText="#">
+                                    <ItemTemplate>
+                                        <asp:Label ID="LblC" runat="server" Font-Size="6pt"></asp:Label>
+                                    </ItemTemplate>
+                                </asp:TemplateField>                                
+                                <asp:BoundField HeaderText="Proveedor" DataField="NombreComercial" ItemStyle-HorizontalAlign="Left" Visible="false" />
+                                <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen" />
+                                <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" DataFormatString="{0:d}" />
+                                <asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="U. Medida" DataField="Abreviatura" ItemStyle-HorizontalAlign="Left" />
                                 
-                                </ContentTemplate>
+                                <asp:BoundField HeaderText="Buen Estado" DataField="BuenEstado" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
-                            </asp:UpdatePanel>
+                                <asp:BoundField HeaderText="Vendible" DataField="MalEstado" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="No vendible" DataField="NoVendible" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+
+                                <%--<asp:BoundField HeaderText="Existencia" DataField="CantidadReal" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />--%>
+                                <asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
+                                <asp:BoundField HeaderText="Costo" DataField="Costo" DataFormatString="{0:#,##0.00}" ItemStyle-HorizontalAlign="Right" />
+                            </Columns>
+                        </asp:GridView>
+                    </ContentTemplate>
+                </asp:UpdatePanel>
+                <br />
+
+                <asp:UpdatePanel ID="UpdateGvS" UpdateMode="Conditional" runat="server">
+                    <ContentTemplate>
+                        <div class="row">
+                            <div class="col-md-12">
+                                <label style="font-size: 16px"><b>Productos que Sobran</b></label>
+                                <div class="row">
+                                    <div class="col-md-4" align="left" id="divRegistradosSobran" runat="server">
+                                        <asp:Label runat="server">Número de registros: <b>
+                                            <asp:Literal ID="LtlTotalRegistrosSobran" runat="server"></asp:Literal></b></asp:Label>
+                                    </div>
+                                    <div class="col-md-8" align="right" id="DivBuscadorSobran" runat="server">
+                                        <input type="text" id="TxtBusqueda2" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvS.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                                        <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvS.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                                    </div>
+                                </div>
+                            </div>
+                        </div>
+                        <asp:GridView ID="GvS" data-sort="true" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False"
+                            CssClass="table table-striped table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None" DataKeyNames="CvePS">
+                            <Columns>
+                                <asp:TemplateField Visible="false">
+                                    <HeaderTemplate>
+                                        <asp:CheckBox ID="ChkAllSobrante" runat="server" />
+                                    </HeaderTemplate>
+                                    <ItemTemplate>
+                                        <asp:CheckBox ID="ChkPSSobrante" runat="server" />
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+                                <asp:TemplateField HeaderText="#">
+                                    <ItemTemplate>
+                                        <asp:Label ID="LblC" runat="server" Font-Size="6pt"></asp:Label>
+                                    </ItemTemplate>
+                                </asp:TemplateField>                                
+                                <asp:BoundField HeaderText="Proveedor" DataField="NombreComercial" ItemStyle-HorizontalAlign="Left" Visible="false" />
+                                <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen" />
+                                <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" DataFormatString="{0:d}" />
+                                <asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="U. Medida" DataField="Abreviatura" ItemStyle-HorizontalAlign="Left" />
+
+                                     <asp:BoundField HeaderText="Buen Estado" DataField="BuenEstado" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="Vendible" DataField="MalEstado" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="No vendible" DataField="NoVendible" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+
+                                <%--<asp:BoundField HeaderText="Existencia" DataField="CantidadReal" ItemStyle-HorizontalAlign="Right" />--%>
+                                <asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
+                                <asp:BoundField HeaderText="Costo" DataField="Costo" DataFormatString="{0:#,##0.00}" ItemStyle-HorizontalAlign="Right" />
+                            </Columns>
+                        </asp:GridView>
+
+                        <div class="row">
+                            <div class="col-md-12">
+                                <label style="font-size: 16px"><b>Productos Coincidentes</b></label>
+                                <div class="row">
+                                    <div class="col-md-4" align="left" id="div1" runat="server">
+                                        <asp:Label runat="server">Número de registros: <b>
+                                            <asp:Literal ID="LtlCoincidentes" runat="server"></asp:Literal></b></asp:Label>
+                                    </div>
+                                    <div class="col-md-8" align="right" id="divRegistradosCoinciden" runat="server">
+                                        <input type="text" id="TxtBusqueda3" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda3','{0}')", GvC.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                                        <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda3','{0}')", GvS.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                                    </div>
+                                </div>
+                            </div>
+                        </div>
+                        <asp:GridView ID="GvC" data-sort="true" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False"
+                            CssClass="table table-striped table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None" DataKeyNames="CvePS">
+                            <Columns>
+                                <asp:TemplateField Visible="false">
+                                    <HeaderTemplate>
+                                    </HeaderTemplate>
+                                    <ItemTemplate>
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+                                <asp:TemplateField HeaderText="#">
+                                    <ItemTemplate>
+                                        <asp:Label ID="LblC" runat="server" Font-Size="6pt"></asp:Label>
+                                    </ItemTemplate>
+                                </asp:TemplateField>                                
+                                <asp:BoundField HeaderText="Proveedor" DataField="NombreComercial" ItemStyle-HorizontalAlign="Left" Visible="false" />
+                                <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen" />
+                                <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" DataFormatString="{0:d}" />
+                                <asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="U. Medida" DataField="Abreviatura" ItemStyle-HorizontalAlign="Left" />
+
+                                 <asp:BoundField HeaderText="Buen Estado" DataField="BuenEstado" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="Vendible" DataField="MalEstado" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="No vendible" DataField="NoVendible" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+
+                                <%--<asp:BoundField HeaderText="Existencia" DataField="CantidadReal" ItemStyle-HorizontalAlign="Right" />--%>                                
+                                <asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                                <asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
+                                <asp:BoundField HeaderText="Costo" DataField="Costo" DataFormatString="{0:#,##0.00}" ItemStyle-HorizontalAlign="Right" />
+                            </Columns>
+                        </asp:GridView>
+
+                    </ContentTemplate>
+                </asp:UpdatePanel>
+                <br />
+
+                <div id="ModalGuardar" class="modal ADS fade" role="dialog">
+                    <div class="modal-dialog modal-sm">
+                        <div class="modal-content">
+                            <div class="modal-header ">
+                                <button type="button" class="close" data-dismiss="modal">&times;</button>
+                                <h4 class="modal-title">Guardar Nuevo Inventario Físico</h4>
+                            </div>
+
+                            <div class="modal-body">
+                                <asp:UpdatePanel runat="server" ID="UpFecha" UpdateMode="Conditional">
+                                    <ContentTemplate>
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <asp:TextBox ID="TxtTitulo" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="50"></asp:TextBox>
+                                            <asp:RequiredFieldValidator ID="RFVTitulos" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtTitulo" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Titulo''</b> es necesario, por favor ingréselo." ValidationGroup="GrpObligatorio"></asp:RequiredFieldValidator>
+                                            <label for="<%= TxtTitulo.ClientID.ToString()%>">Titulo:</label>
+                                        </div>
+                                    </ContentTemplate>
+                                </asp:UpdatePanel>
+                            </div>
+                            <div class="modal-footer">
+                                <asp:UpdatePanel runat="server">
+                                    <ContentTemplate>
+                                        <asp:Button ID="BtnCrear" runat="server" ClientIDMode="Static" Text="Crear" CssClass="btn btn-primary" ValidationGroup="Actualiza" />
+                                        <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
+
+                                    </ContentTemplate>
+                                </asp:UpdatePanel>
+                            </div>
                         </div>
                     </div>
                 </div>
             </div>
-    </div>
 
-    <div runat="server" id="DVGrupos" visible="false"  >
+            <div runat="server" id="DVGrupos" visible="false">
 
-         <div class="col-md-12">
+                <div class="col-md-12">
 
                     <div class="row">
-                        <div class="col-md-2" align="left" id="div2" runat="server">                            
+                        <div class="col-md-2" align="left" id="DV1" runat="server">
-                            <asp:Label runat="server">Registros Productos que Faltan: <b><asp:Literal ID="LtlGrupos1" runat="server"></asp:Literal></b></asp:Label>
+                            <asp:Label runat="server" ID="LblGrupos1">Registros Productos que Faltan: <b>
+                                <asp:Literal ID="LtlGrupos1" runat="server"></asp:Literal></b></asp:Label>
                         </div>
 
-                        <div class="col-md-2" align="left" id="div4" runat="server">
+                        <div class="col-md-2" align="left" id="DV2" runat="server">
-                            <asp:Label runat="server">Registros Productos que Sobran: <b><asp:Literal ID="LtlGrupos2" runat="server"></asp:Literal></b></asp:Label>
+                            <asp:Label runat="server" ID="LblGrupos2">Registros Productos que Sobran: <b>
+                                <asp:Literal ID="LtlGrupos2" runat="server"></asp:Literal></b></asp:Label>
                         </div>
 
-                        <div class="col-md-2" align="left" id="div5" runat="server">
+                        <div class="col-md-2" align="left" id="DV3" runat="server">
-                             <asp:Label runat="server">Registros Productos Coincidentes: <b><asp:Literal ID="LtlGrupos3" runat="server"></asp:Literal></b></asp:Label>
+                            <asp:Label runat="server" ID="LblGrupos3">Registros Productos Coincidentes: <b>
+                                <asp:Literal ID="LtlGrupos3" runat="server"></asp:Literal></b></asp:Label>
                         </div>
 
-                        <div class="col-md-6" align="right" id="div3" runat="server">
+                        <div class="col-md-6" align="right" id="DV4" runat="server">
                             <input type="text" id="TxtBusqueda4" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda4','{0}')", GvGrupos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
                             <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda4','{0}')", GvGrupos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
                         </div>
@@ -439,35 +463,41 @@
 
 
 
-              <asp:GridView ID="GvGrupos" data-sort="true" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False"
+                <asp:GridView ID="GvGrupos" data-sort="true" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False"
-                CssClass="table table-striped table-hover Widthall ScrollAD" Style="text-align: center;"
+                    CssClass="table table-striped table-hover Widthall ScrollAD" Style="text-align: center;"
-                GridLines="None"  DataKeyNames="CvePS,PS,Grupo,Orden">
+                    GridLines="None" DataKeyNames="CvePS,PS,Grupo,Orden">
-                <Columns>
+                    <Columns>
-                    <asp:TemplateField Visible="false">
+                        <asp:TemplateField Visible="false">
-                        <HeaderTemplate>
+                            <HeaderTemplate>
-                            <asp:CheckBox ID="ChkAllFaltante" runat="server"/>
+                                <asp:CheckBox ID="ChkAllFaltante" runat="server" />
-                        </HeaderTemplate>
+                            </HeaderTemplate>
-                        <ItemTemplate>
+                            <ItemTemplate>
-                            <asp:CheckBox ID="ChkPSFaltante"  runat="server" />
+                                <asp:CheckBox ID="ChkPSFaltante" runat="server" />
-                        </ItemTemplate>
+                            </ItemTemplate>
-                    </asp:TemplateField>
+                        </asp:TemplateField>                        
+                        <asp:BoundField HeaderText="Proveedor" DataField="NombreComercial" ItemStyle-HorizontalAlign="Left" Visible="false" />
+                        <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
+                        <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
+                        <asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen" />
+                        <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
+                        <asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
+                        <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" DataFormatString="{0:d}" />                        
+                        <asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                        <asp:BoundField HeaderText="U. Medida" DataField="Abreviatura" ItemStyle-HorizontalAlign="Left" />
 
-                    <asp:BoundField HeaderText="Código Barras" DataField="CodigoBarras" ItemStyle-HorizontalAlign="Left" />
+                             <asp:BoundField HeaderText="Buen Estado" DataField="BuenEstado" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
-                    <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="Vendible" DataField="MalEstado" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
-                    <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
+                                <asp:BoundField HeaderText="No vendible" DataField="NoVendible" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
-                    <asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen"/>
+
-                    <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
+                        <asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
-                    <asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
+                        <asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
-                    <asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" DataFormatString="{0:d}" />
+                        <asp:BoundField HeaderText="Costo" DataField="Costo" DataFormatString="{0:#,##0.00}" ItemStyle-HorizontalAlign="Right" />
-                    <asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />                    
+                    </Columns>
-                    <asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
+                </asp:GridView>
-                    <asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
-                    <asp:BoundField HeaderText="Costo" DataField="Costo" DataFormatString="{0:#,##0.00}" ItemStyle-HorizontalAlign="Right" />
-                </Columns>
-            </asp:GridView>
 
 
-    </div>
+            </div>
+
         </ContentTemplate>
     </asp:UpdatePanel>
     

Inventarios/RepAnomalias.aspx.vb

@@ -83,6 +83,18 @@ Partial Class Inventarios_RepAnomalias
         Dim Inventario As New ClsInventarios
         Dim dt As DataTable = Nothing
 
+
+        If UsuarioActual.CveEmpresa.Contiene(119, 158) Then
+            GvF.Columns(2).Visible = True 'proveedor
+            GvS.Columns(2).Visible = True 'proveedor
+            GvC.Columns(2).Visible = True 'proveedor
+            GvF.Columns(16).Visible = False 'costo
+            GvS.Columns(16).Visible = False 'costo
+            GvC.Columns(16).Visible = False 'costo
+            GvGrupos.Columns(1).Visible = True 'proveedor
+            GvGrupos.Columns(15).Visible = False 'costo
+        End If
+
         If Inventario.GetInventarioFisico(CveInventarioFisico, UsuarioActual.CveEmpresa, -1, -1) Then
             lbTitulo.Text = Inventario.InventarioFisico
             lbObservaciones.Text = Inventario.Observaciones
@@ -190,12 +202,10 @@ Partial Class Inventarios_RepAnomalias
 
             End If
 
-
         End If
         Inventario.Dispose()
 
 
-
         If DdlVista.SelectedValue.ToEntero = 1 Then
 
             DVNormal.Visible = True
@@ -207,26 +217,24 @@ Partial Class Inventarios_RepAnomalias
             ImgExcelProdcutosCoinciden.Visible = True
             LnkDescarExcelGrupos.Visible = False
 
-
             If Not String.IsNullOrWhiteSpace(UsuarioActual.Empresa.Funcionalidad(147)) Then GvS.Columns(8).HeaderText = UsuarioActual.Empresa.Funcionalidad(147)
             If Not String.IsNullOrWhiteSpace(UsuarioActual.Empresa.Funcionalidad(147)) Then GvF.Columns(8).HeaderText = UsuarioActual.Empresa.Funcionalidad(147)
             If Not String.IsNullOrWhiteSpace(UsuarioActual.Empresa.Funcionalidad(147)) Then GvC.Columns(8).HeaderText = UsuarioActual.Empresa.Funcionalidad(147)
 
             GvS.DataSource = dt.FiltraParametros("Diferencia < 0")
             Dim DtS As DataTable = dt.FiltraParametros("Diferencia < 0")
-            GvS.DataBind()
             BanderaSerieLoteCad(GvS, DtS)
+            GvS.DataBind()
 
             GvF.DataSource = dt.FiltraParametros("Diferencia > 0")
             Dim DtF As DataTable = dt.FiltraParametros("Diferencia > 0")
-            GvF.DataBind()
             BanderaSerieLoteCad(GvF, DtF)
+            GvF.DataBind()
 
             Dim DtC As DataTable = dt.FiltraParametros("Diferencia = 0")
             GvC.DataSource = DtC
-            GvC.DataBind()
             BanderaSerieLoteCad(GvC, DtC)
-
+            GvC.DataBind()
 
             If (GvF.Rows.Count > 0) Then
                 GvF.UseAccessibleHeader = True
@@ -263,6 +271,40 @@ Partial Class Inventarios_RepAnomalias
             DVNormal.Visible = False
             DVGrupos.Visible = True
 
+            If DdlGPO.SelectedValue.ToEntero = 2 Then
+                GvGrupos.Columns(4).Visible = False
+                GvGrupos.Columns(5).Visible = False
+                GvGrupos.Columns(6).Visible = False
+                GvGrupos.Columns(7).Visible = False
+            Else
+                GvGrupos.Columns(4).Visible = True
+                GvGrupos.Columns(5).Visible = True
+                GvGrupos.Columns(6).Visible = True
+                GvGrupos.Columns(7).Visible = True
+            End If
+
+            If DdlGPO.SelectedValue.ToEntero = 2 Then
+                LtlGrupos1.Visible = False
+                LtlGrupos2.Visible = False
+                LtlGrupos3.Visible = False
+
+                LblGrupos1.Visible = False
+                LblGrupos2.Visible = False
+                LblGrupos3.Visible = False
+
+            Else
+
+                LtlGrupos1.Visible = True
+                LtlGrupos2.Visible = True
+                LtlGrupos3.Visible = True
+
+                LblGrupos1.Visible = True
+                LblGrupos2.Visible = True
+                LblGrupos3.Visible = True
+
+            End If
+
+            UpGeneral.Update()
 
             LnkPDF.Visible = False
             ImgExcel.Visible = False
@@ -270,18 +312,17 @@ Partial Class Inventarios_RepAnomalias
             ImgExcelProdcutosCoinciden.Visible = False
             LnkDescarExcelGrupos.Visible = True
 
-            GvGrupos.DataSource = dt
+            GvGrupos.DataSource = dt.FiltraParametros("CvePS > 0")
             GvGrupos.DataBind()
 
             LtlGrupos1.Text = dt.FiltraParametros("Orden = 1  and CvePS > 0").Rows.Count.ToString
             LtlGrupos2.Text = dt.FiltraParametros("Orden = 2  and CvePS > 0").Rows.Count.ToString
             LtlGrupos3.Text = dt.FiltraParametros("Orden = 3  and CvePS > 0").Rows.Count.ToString
 
-            PSIguales()
+            If DdlGPO.SelectedValue.ToEntero = 1 Then
-
+                PSIguales()
+            End If
         End If
-
-
         UpGeneral.Update()
         UPAcciones.Update()
 
@@ -419,22 +460,47 @@ Partial Class Inventarios_RepAnomalias
     End Function
 
     Private Sub ImgExcel_Click(sender As Object, e As EventArgs) Handles ImgExcel.Click
-        GvF.ExportToExcel("Reporte de Inventario Fisico - Productos que Faltan " & Now.ToShortDateString)
+
+
+        Dim GvTemp As GridView = GvF
+
+        For Each GvRow As GridViewRow In GvTemp.Rows
+            GvRow.BackColor = Drawing.ColorTranslator.FromHtml("#white")
+        Next
+
+        'GvF.ExportToExcel("Reporte de Inventario Fisico - Productos que Faltan " & Now.ToShortDateString)
+        GvTemp.ExportToExcel("Reporte de Inventario Fisico - Productos que Faltan " & Now.ToShortDateString)
     End Sub
 
 
     Private Sub ImgExcel2_Click(sender As Object, e As EventArgs) Handles ImgExcel2.Click
-        GvS.ExportToExcel("Reporte de Inventario Fisico - Productos que Sobran " & Now.ToShortDateString)
+        Dim GvTemp As GridView = GvS
+
+        For Each GvRow As GridViewRow In GvTemp.Rows
+            GvRow.BackColor = Drawing.ColorTranslator.FromHtml("white")
+        Next
+
+        'GvS.ExportToExcel("Reporte de Inventario Fisico - Productos que Sobran " & Now.ToShortDateString)
+        GvTemp.ExportToExcel("Reporte de Inventario Fisico - Productos que Sobran " & Now.ToShortDateString)
     End Sub
 
 
     Private Sub ImgExcelProdcutosCoinciden_Click(sender As Object, e As EventArgs) Handles ImgExcelProdcutosCoinciden.Click
-        GvC.ExportToExcel("Reporte de Inventario Fisico - Productos Coincidentes " & Now.ToShortDateString)
+        Dim GvTemp As GridView = GvC
+
+        For Each GvRow As GridViewRow In GvTemp.Rows
+            GvRow.BackColor = Drawing.ColorTranslator.FromHtml("white")
+        Next
+        'GvC.ExportToExcel("Reporte de Inventario Fisico - Productos Coincidentes " & Now.ToShortDateString)
+        GvTemp.ExportToExcel("Reporte de Inventario Fisico - Productos Coincidentes " & Now.ToShortDateString)
     End Sub
 
 
     Private Sub LnkDescarExcelGrupos_Click(sender As Object, e As EventArgs) Handles LnkDescarExcelGrupos.Click
-        GvGrupos.ExportToExcel("Reporte de Inventario Fisico" & Now.ToShortDateString)
+        GvGrupos.ExportToExcelGembox("Reporte de Inventario Fisico" & Now.ToShortDateString, UsuarioActual, "", "", "Inventario:" & lbTitulo.Text, "", 1)
+    End Sub
+
+    Public Overrides Sub VerifyRenderingInServerForm(ByVal control As Control)
     End Sub
 
 #End Region

Inventarios/TraspasoAlmacen.aspx.vb

@@ -1178,25 +1178,28 @@ Partial Class Inventarios_TraspasoAlmacen
         If Not ErrorMovInv Then
 
             If ChkEmitirTimbrado.Checked Then
+
                 Dim ObjGral As New ClsGenerales(ObjInventario.IniciaTransacSQL)
                 Dim CveSubProyectoTimbre As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltraParametros($"CveAlmacen = {DdlAlmacenOrigen.SelectedValue}").Rows(0)("CveSubProyecto").ToString.ToEntero
 
-                CveTimbre = ObjGral.AddGralTimbre("Tra", "-1", -1, "", MinFecha, -1, CveMovimientoSalida, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 0, -1, ChkEmitirCartaPorte.Checked, CveSubProyectoTimbre, -1, -1, DdlChofer.SelectedValue.ToEntero, DdlUnidadCamion.SelectedValue.ToEntero, TxtFechaEntrega.Text.ToDateTime)
+                Dim CveEntregaAlmacen As Integer = ObjGral.AddInvEntregaAlmacenRuta(CveSubProyectoTimbre, CveMovimientoSalida, -1, -1, DdlChofer.SelectedValue.ToEntero, DdlUnidadCamion.SelectedValue.ToEntero, TxtFechaEntrega.Text.ToDate, "T", -1)
 
-                If CveTimbre > 0 Then
+                If CveEntregaAlmacen > 0 Then
-                    SerieInsertadaTimbre = ObjGral.SerieInsertada
+                    CveTimbre = ObjGral.AddGralTimbre("Tra", "-1", -1, "", MinFecha, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 0, -1, ChkEmitirCartaPorte.Checked, CveEntregaAlmacen, CveSubProyectoTimbre)
-                    FolioInsertadoTimbre = ObjGral.FolioInsertado
+
+                    If CveTimbre > 0 Then
+                        SerieInsertadaTimbre = ObjGral.SerieInsertada
+                        FolioInsertadoTimbre = ObjGral.FolioInsertado
+                    Else
+                        ErrorMovInv = True
+                    End If
                 Else
                     ErrorMovInv = True
                 End If
 
             End If
-
-
         End If
 
-
-
         If Not ErrorMovInv Then
             DtTraslado = DtMovimientos.Copy
 
@@ -1218,7 +1221,7 @@ Partial Class Inventarios_TraspasoAlmacen
 
             If ChkEmitirTimbrado.Checked Then
                 CveMovimientoTimbrado = CveMovimientoSalida
-                Timbrar(CveTimbre, CveMovimientoTimbrado)
+                'Timbrar(CveTimbre, CveMovimientoTimbrado)
             End If
 
             Alert(MensajeAlert.ToString, TipoMensaje.MsgInformacion, "")
@@ -2150,7 +2153,7 @@ Partial Class Inventarios_TraspasoAlmacen
             Dim FolioVirtualEntrada As Integer = 0
             If RealizarMovimientoVirtual Then
 
-                Dim CveAlmacenVirtual As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=DdlAlmacenRecepcion.SelectedValue.ToEntero).FiltroPrimeroValor("CveAlmacenVirtual", "").ToEntero()
+                Dim CveAlmacenVirtual As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CveAlmacenEntrada).FiltroPrimeroValor("CveAlmacenVirtual", "").ToEntero()
 
                 If CveAlmacenVirtual > 0 Then
 
@@ -3499,7 +3502,7 @@ Partial Class Timbres
     Public Property MsgError As StringBuilder
     Public Property MensajeAlert As StringBuilder
 
-    Private Property CvePaqueteriaGuia As Integer
+
     Private Property CveMovimiento As Integer
     Private Property UsuarioActual As Usuario
     Private Property AplicaCP As Boolean
@@ -3996,7 +3999,7 @@ Partial Class Timbres
             Respuesta = True
 
             Dim objGrales As New ClsGenerales
-            If Not objGrales.UpdateGralTimbre(CveTimbre, "-1", "-1", -1, ObjTimbrado.UUID, Now, CvePaqueteriaGuia, CveMovimiento, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, UsuarioActual.Empresa.CvePAC, -1, New Date(1900, 1, 1), AplicaCP, -1, -1, -1, -1, -1) Then
+            If Not objGrales.UpdateGralTimbre(CveTimbre, "-1", "-1", -1, ObjTimbrado.UUID, Now, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, UsuarioActual.Empresa.CvePAC, -1, New Date(1900, 1, 1), AplicaCP, "-1") Then
                 GuardaLogAD($"Error no se actualizo registro de timbre {CveTimbre} ")
             End If
             objGrales.Dispose()
@@ -4068,15 +4071,13 @@ Partial Class Timbres
 
         If CveTimbre > 0 Then
 
-            If ObjGrales.GetGralTimbre(CveTimbre, "-1", "-1", -1, FI, FF, 0, UsuarioActual.CveEmpresa, -1, -1) Then
+            If ObjGrales.GetGralTimbre(CveTimbre, "-1", "-1", -1, FI, FF, 0, UsuarioActual.CveEmpresa, -1) Then
 
 
                 If ObjGrales.DtResultados.Rows.Count = 1 Then
 
 
                     CveMovimiento = ObjGrales.DtResultados.Rows(0)("CveMovimientoAlmacen").ToString.ToEntero
-                    CvePaqueteriaGuia = ObjGrales.DtResultados.Rows(0)("Folio").ToString.ToEntero
-
                     FechaEntrega = ObjGrales.DtResultados.Rows(0)("FechaEntrega").ToString.ToDate
 
                     Serie = ObjGrales.DtResultados.Rows(0)("Serie").ToString

Ventas/CatImpuestosLocales.aspx

@@ -155,6 +155,7 @@
                                         <asp:ListItem Value="5" Text="Impuesto Local Traslado"></asp:ListItem>
                                         <asp:ListItem Value="3" Text="Deducciones"></asp:ListItem>
                                         <asp:ListItem Value="4" Text="Fondo de Garantía"></asp:ListItem>
+                                        <asp:ListItem Value="5" Text="Devoluciones"></asp:ListItem>
                                     </asp:DropDownList>
                                     <label for="<%= DdlCuentasContables.ClientID.ToString()%>">Tipo Impuesto:</label>
                                 </div>

Ventas/Clientes.aspx

@@ -5040,7 +5040,7 @@
                                     </div>
                                 </div>
 
-                                <div class="row ">
+                                <div class="row " runat="server" id="DVDireccionCliente1" visible="false"  >
                                     <div class="col-md-6">
 
                                          <div class="form-group form-md-line-input input-iconright">
@@ -5063,7 +5063,7 @@
 
 
                                 <div class="row ">
-                                    <div class="col-md-6">
+                                    <div class="col-md-6" runat="server" id="DVDireccionCliente2" visible="false">
                                        <div class="form-group form-md-line-input input-iconright">
                                             <asp:TextBox ID="TxtEnvioColonia" runat="server" CssClass="form-control" CausesValidation="true"></asp:TextBox>
                                             <asp:RequiredFieldValidator ID="RequiredFieldValidator11" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtEnvioColonia" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Colonia''</b> es necesario, por favor ingréselo." ValidationGroup="GrpObligatorio"></asp:RequiredFieldValidator>
@@ -5073,7 +5073,6 @@
                                     </div>
                                     <div class="col-md-6">
 
-
                                          <div class="form-group form-md-line-input input-iconright">
                                             <asp:TextBox ID="TxtEnvioCP" runat="server" Width="100%" CssClass="form-control" CausesValidation="true" TextMode="Number"  onblur="DirclienteValidaCodigoPostal()" onkeypress="if(event.key === 'Enter'){return false;}"></asp:TextBox>
                                             <asp:RequiredFieldValidator ID="RequiredFieldValidator14" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtEnvioCP" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Código Postal''</b> es necesario, por favor ingréselo." ValidationGroup="GrpObligatorio"></asp:RequiredFieldValidator>

Ventas/Clientes.aspx.vb

@@ -911,6 +911,8 @@ Partial Class Clientes
             End If
 
             LtlTareaNueva.Text = String.Format("<a class=""caption-subject bold font-green"" onclick=""OpenModalNewTareaUserControl(1,-1,{{CveCliente:{0}}});""> <i class=""fa fa-plus""'></i> Tarea</a>", CveCliente)
+
+            MostrarTxtDireccionesClienteEnvio()
         End If
 
         'EN SERIO SE OCUPA EN CADA POSTBACK ??? IPP 7 SEPTIEMNRE 2017
@@ -921,6 +923,16 @@ Partial Class Clientes
     End Sub
 
 #Region "  PERMISOS PAGINAS  "
+
+    Private Sub MostrarTxtDireccionesClienteEnvio()
+
+        If UsuarioActual.CveEmpresa.Contiene(72, 80, 146) Then
+            DVDireccionCliente1.Visible = True
+            DVDireccionCliente2.Visible = True
+        End If
+
+    End Sub
+
     Private Function PermiteGuardar() As Boolean
         Return UsuarioActual.TienePermisoProceso(192)
     End Function