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

App_Code/ClsInventarios.vb

@@ -153,6 +153,8 @@ Public Class ClsInventarios
         End Get
     End Property
 
+    Public Property CveAlmacenAgregado As Integer = -1
+
 #End Region
 
     Sub New(Optional TransaccionCompartida As SqlTransaction = Nothing)
@@ -376,6 +378,7 @@ Public Class ClsInventarios
 
     Public Function AddAlmacen(Almacen As String, CveTipoAlmacen As Integer, Modalidad As Integer, CveUsuario As Integer, CveEmpresa As Integer, Inventariable As Byte, CveSubProyecto As Integer, Optional Orden As Integer = -1, Optional CveCuenta As Integer = -1, Optional CveUsuarioAutoriza As Integer = -1, Optional CveAlmacenVirtual As Integer = -1) As Boolean
         Dim Retorno As Boolean = False
+        CveAlmacenAgregado = -1
 
         DataAdapter("PA_Inv_AlmacenesAdd")
 
@@ -391,10 +394,12 @@ Public Class ClsInventarios
             .Add("@CveCuenta", SqlDbType.Int).Value = CveCuenta
             .Add("@CveUsuarioAutoriza", SqlDbType.Int).Value = CveUsuarioAutoriza
             .Add("@CveAlmacenVirtual", SqlDbType.Int).Value = CveAlmacenVirtual
+            .Add("@CveAlmacenAgregado", SqlDbType.Int).Direction = ParameterDirection.Output
         End With
 
         Try
             SqlAdapter.Fill(Data)
+            CveAlmacenAgregado = SqlAdapter.SelectCommand.Parameters("@CveAlmacenAgregado").Value.ToString.ToEntero
             Retorno = True
         Catch Ex1 As SqlException
             If Ex1.Message.Contains("Número: 2627;") Then

App_Code/ClsNominas.vb

@@ -2848,13 +2848,14 @@ Public Class ClsNominas
         End Try
         Return retorno
     End Function
-    Public Function GetTablasNomina(CveEmpresa As Integer) As Boolean
+    Public Function GetTablasNomina(CveEmpresa As Integer, Ejercicio As Integer) As Boolean
         Dim retorno As Boolean = False
         Try
             DTSet = New DataSet()
             DataAdapter("PA_Nom_Tablas", CommandType.StoredProcedure)
             With SqlAdapter.SelectCommand.Parameters
                 .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+                .Add("@Ejercicio", SqlDbType.Int).Value = Ejercicio
             End With
 
 
@@ -2869,6 +2870,29 @@ Public Class ClsNominas
         End Try
         Return retorno
     End Function
+    Public Function GetFistablasValues(CveEmpresa As Integer, CveTabla As Integer, Ejercicio As Integer) As Boolean
+        Dim retorno As Boolean = False
+        Try
+            DTSet = New DataSet()
+            DataAdapter("PA_Nom_FistablasValues", CommandType.StoredProcedure)
+            With SqlAdapter.SelectCommand.Parameters
+                .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+                .Add("@CveTabla", SqlDbType.Int).Value = CveTabla
+                .Add("@Ejercicio", SqlDbType.Int).Value = Ejercicio
+            End With
+
+
+            SqlAdapter.Fill(Data)
+            retorno = True
+        Catch sqEx As SqlException
+            retorno = False
+            OnError("Ocurrió un error al obtener las tablas de nómina.", sqEx, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        Catch ex As Exception
+            retorno = False
+            OnError("Ocurrió un error al obtener las tablas de nómina.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+        Return retorno
+    End Function
 #Region "Prorrateo"
 
     Public Function ProrrateosubproyectoGET(CveEmpresa As Integer) As Boolean

App_Code/ClsPaginas.vb

@@ -5846,6 +5846,11 @@ Public Class ClsPaginas
                     params.Add(New ReportParameter("Tipo", TipoDocumento))
                     params.Add(New ReportParameter("Ref", TipoDocumentoRef))
                     params.Add(New ReportParameter("AplicaPagare", AplicaPagare))
+
+                    If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
+                        params.Add(New ReportParameter("Documentacion", Vta.Cliente.Documentacion))
+                    End If
+
                     RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)
                     RutaFormatoDefault = String.Format("Empresas\Grales\Formatos\{0}.rdlc", NombreArchivo)
 
@@ -5946,6 +5951,11 @@ Public Class ClsPaginas
                     params.Add(New ReportParameter("Ref", TipoDocumentoRef))
                     params.Add(New ReportParameter("AplicaPagare", AplicaPagare))
                     params.Add(New ReportParameter("CveAlmacenTraspasoOrigen", Vta.CveAlmacenTraspasoOrigen.ToString))
+
+                    If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
+                        params.Add(New ReportParameter("Documentacion", Vta.Cliente.Documentacion))
+                    End If
+
                     RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)
                     RutaFormatoDefault = String.Format("Empresas\Grales\Formatos\{0}.rdlc", NombreArchivo)
                 Case "Pd2"
@@ -6257,7 +6267,7 @@ Public Class ClsPaginas
             Dim paramsArray As New JArray()
             For Each rds As ReportDataSource In DataSource
                 Dim Nombre As String = rds.Name
-                If RutaReporte.Contains("Factura.mrt") OrElse RutaReporte.Contains("Remision.mrt") OrElse RutaReporte.Contains("Cotizacion.mrt") OrElse RutaReporte.Contains("NotaDevolucion.mrt") Then
+                If RutaReporte.Contains("Factura.mrt") OrElse RutaReporte.Contains("Remision.mrt") OrElse RutaReporte.Contains("Cotizacion.mrt") OrElse RutaReporte.Contains("NotaDevolucion.mrt") OrElse RutaReporte.Contains("Pedido.mrt") Then
                     Select Case rds.Name
                         Case "DsOC"
                             Nombre = "DtDetalle"
@@ -9461,6 +9471,8 @@ Public Class ClsPaginas
             PaginaDict.Add("/Ventas/CatMedicos.aspx".ToUpper(), 1343)
             PaginaDict.Add("/Ventas/CatProcedimientos.aspx".ToUpper(), 1344)
             PaginaDict.Add("/Ventas/CatProcedimientoDetalle.aspx".ToUpper(), 1344)
+            PaginaDict.Add("/Ventas/CatEspecialidadesSubEspecialidades.aspx".ToUpper(), 1346)
+
 
 
 

App_Code/ClsVentas.vb

@@ -6005,7 +6005,8 @@ Public Class ClsVentas
 
 
     Public Function AddMedico(Medico As String, CedulaProfesional As String, FechaNacimiento As Date, Notas As String, DiasAtencion As String, Horario As String, Lugar As String, Estatus As Boolean, CveUsuario As Integer,
-                              CveEmpresa As Integer, Telefono As String, Mail As String, CveMedicoEspecialidad As Integer, Celular As String, Consultorio As String) As Boolean
+                              CveEmpresa As Integer, Telefono As String, Mail As String, CveMedicoEspecialidad As Integer, Celular As String, Consultorio As String, Optional CveMedicoSubEspecialidad As Integer = -1,
+                              Optional Torre As String = "-1") As Boolean
 
         Dim Retorno As Boolean = False
         DataAdapter("PA_Vta_MedicosAdd")
@@ -6026,6 +6027,8 @@ Public Class ClsVentas
             .Add("@CveMedicoEspecialidad", SqlDbType.Int).Value = CveMedicoEspecialidad
             .Add("@Celular", SqlDbType.VarChar).Value = Celular
             .Add("@Consultorio", SqlDbType.VarChar).Value = Consultorio
+            .Add("@CveMedicoSubEspecialidad", SqlDbType.Int).Value = CveMedicoSubEspecialidad
+            .Add("@Torre", SqlDbType.VarChar).Value = Torre
 
 
         End With
@@ -6040,7 +6043,8 @@ Public Class ClsVentas
     End Function
 
     Public Function UpdateMedico(CveMedico As Integer, Medico As String, CedulaProfesional As String, FechaNacimiento As Date, Notas As String, DiasAtencion As String, Horario As String, Lugar As String, Estatus As Boolean, CveUsuario As Integer,
-                                 CveEmpresa As Integer, Telefono As String, Mail As String, CveMedicoEspecialidad As Integer, Celular As String, Consultorio As String) As Boolean
+                                 CveEmpresa As Integer, Telefono As String, Mail As String, CveMedicoEspecialidad As Integer, Celular As String, Consultorio As String, Optional CveMedicoSubEspecialidad As Integer = -1,
+                                 Optional Torre As String = "-1") As Boolean
 
         Dim Retorno As Boolean = False
         DataAdapter("PA_Vta_MedicosUpdate")
@@ -6061,6 +6065,9 @@ Public Class ClsVentas
             .Add("@CveMedicoEspecialidad", SqlDbType.Int).Value = CveMedicoEspecialidad
             .Add("@Celular", SqlDbType.VarChar).Value = Celular
             .Add("@Consultorio", SqlDbType.VarChar).Value = Consultorio
+            .Add("@CveMedicoSubEspecialidad", SqlDbType.Int).Value = CveMedicoSubEspecialidad
+            .Add("@Torre", SqlDbType.VarChar).Value = Torre
+
 
         End With
         Try
@@ -6093,7 +6100,7 @@ Public Class ClsVentas
 
 #End Region
 
-#Region "ESPECIALIDADES"
+#Region "E S P E C I A L I D A D E S"
 
     Public Function GetMedicosEspecialidades(CveMedicoEspecialidad As Integer, CveEmpresa As Integer, Estatus As Integer) As Boolean
 
@@ -6182,6 +6189,101 @@ Public Class ClsVentas
 
 #End Region
 
+
+
+
+#Region "S U B  E S P E C I A L I D A D E S"
+
+    Public Function GetMedicosSubEspecialidades(CveMedicoSubEspecialidad As Integer, CveEmpresa As Integer, Estatus As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Vta_MedicosSubEspecialidadesGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveMedicoSubEspecialidad", SqlDbType.Int).Value = CveMedicoSubEspecialidad
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@Estatus", SqlDbType.Int).Value = Estatus
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener las SubEspecialidades.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+
+    End Function
+
+
+
+
+    Public Function AddMedicoSubEspecialidad(CveMedicoEspecialidad As Integer, SubEspecialidad As String, Estatus As Boolean, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Vta_MedicosSubEspecialidadesAdd")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveMedicoEspecialidad", SqlDbType.Int).Value = CveMedicoEspecialidad
+            .Add("@SubEspecialidad", SqlDbType.VarChar).Value = SubEspecialidad
+            .Add("@Estatus", SqlDbType.Bit).Value = Estatus
+            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al guardar la SubEspecialidad.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+        Return Retorno
+
+    End Function
+
+    Public Function UpdateMedicoSubEspecialidad(CveMedicoSubEspecialidad As Integer, CveMedicoEspecialidad As Integer, SubEspecialidad As String, Estatus As Boolean, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Vta_MedicosSubEspecialidadesUpdate")
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveMedicoSubEspecialidad", SqlDbType.Int).Value = CveMedicoSubEspecialidad
+            .Add("@CveMedicoEspecialidad", SqlDbType.Int).Value = CveMedicoEspecialidad
+            .Add("@SubEspecialidad", SqlDbType.VarChar).Value = SubEspecialidad
+            .Add("@Estatus", SqlDbType.Bit).Value = Estatus
+            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .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 SubEspecialidad.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+        Return Retorno
+
+    End Function
+
+    Public Function RemoveMedicoSubEspecialidad(CveMedicoSubEspecialidad As Integer, CveEmpresa As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Vta_MedicosSubEspecialidadesRemove")
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveMedicoSubEspecialidad", SqlDbType.Int).Value = CveMedicoSubEspecialidad
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al eliminar la SubEspecialidad.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+        Return Retorno
+
+    End Function
+
+#End Region
+
+
 #Region "PRODEDIMIENTOS"
 
     Public Function GetProcedimientos(CveProcedimiento As Integer, CveEmpresa As Integer, Estatus As Integer) As Boolean

App_Code/Modelos.vb

@@ -7959,6 +7959,7 @@ Namespace Modelos
         Public Property ImprimeNombreSucursal As Integer
         Public Property CobranzaCorreo As String
         Public Property UsaProductoAlterno As Boolean = False
+        Public Property Documentacion As String = ""
     End Class
 
     <Serializable>

Compras/PopUpVerFactura.aspx.vb

@@ -2240,6 +2240,26 @@ Partial Class PopUpVerFactura
                 DtMercancias.Columns.Add(New DataColumn("CveMaterialPeligroso", GetType(String)))
                 DtMercancias.Columns.Add(New DataColumn("Embalaje", GetType(String)))
 
+                DtMercancias.Columns.Add(New DataColumn("SectorCOFEPRIS", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("NombreIngredienteActivo", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("NomQuimico", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("DenominacionGenerica", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("DenominacionDistintiva", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("Fabricante", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("FormaFarmaceutica", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("CondicionesTransporte", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("RegistroSanitarioAutorizacion", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("PermisoImportacion", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("FolioImportacionVUCEM", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("NumCAS", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("RazonSocialEmpImportacion", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("NumRegistroPlagCOFEPRIS", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("DatosFabricante", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("DatosFormulador", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("DatosMaquilador", GetType(String)))
+                DtMercancias.Columns.Add(New DataColumn("UsoAutorizado", GetType(String)))
+
+
                 Dim DtOperadores As New DataTable()
                 DtOperadores.Columns.Add(New DataColumn("RFC", GetType(String)))
                 DtOperadores.Columns.Add(New DataColumn("NumLicencia", GetType(String)))
@@ -2424,6 +2444,25 @@ Partial Class PopUpVerFactura
                         Row("CveMaterialPeligroso") = ValorXML(node, "CveMaterialPeligroso", "")
                         Row("Embalaje") = ValorXML(node, "Embalaje", "")
 
+                        Row("SectorCOFEPRIS") = ValorXML(node, "SectorCOFEPRIS", "")
+                        Row("NombreIngredienteActivo") = ValorXML(node, "NombreIngredienteActivo", "")
+                        Row("NomQuimico") = ValorXML(node, "NomQuimico", "")
+                        Row("DenominacionGenerica") = ValorXML(node, "DenominacionGenerica", "")
+                        Row("DenominacionDistintiva") = ValorXML(node, "DenominacionDistintiva", "")
+                        Row("Fabricante") = ValorXML(node, "Fabricante", "")
+                        Row("FormaFarmaceutica") = ValorXML(node, "FormaFarmaceutica", "")
+                        Row("CondicionesTransporte") = ValorXML(node, "CondicionesTransporte", "")
+                        Row("RegistroSanitarioAutorizacion") = ValorXML(node, "RegistroSanitarioAutorizacion", "")
+                        Row("PermisoImportacion") = ValorXML(node, "PermisoImportacion", "")
+                        Row("FolioImportacionVUCEM") = ValorXML(node, "FolioImportacionVUCEM", "")
+                        Row("NumCAS") = ValorXML(node, "NumCAS", "")
+                        Row("RazonSocialEmpImportacion") = ValorXML(node, "RazonSocialEmpImportacion", "")
+                        Row("NumRegistroPlagCOFEPRIS") = ValorXML(node, "NumRegistroPlagCOFEPRIS", "")
+                        Row("DatosFabricante") = ValorXML(node, "DatosFabricante", "")
+                        Row("DatosFormulador") = ValorXML(node, "DatosFormulador", "")
+                        Row("DatosMaquilador") = ValorXML(node, "DatosMaquilador", "")
+                        Row("UsoAutorizado") = ValorXML(node, "UsoAutorizado", "")
+
                         DtMercancias.Rows.Add(Row)
                     Next
 
@@ -3043,6 +3082,7 @@ Partial Class PopUpVerFactura
                 Vta.Cliente.CodigoRegimenFiscal = dtVentas(0)("CodigoRegimenFiscal").ToString
                 Vta.Cliente.RegimenFiscal = dtVentas(0)("RegimenFiscal").ToString
                 Vta.Cliente.UsaProductoAlterno = CBool(dtVentas(0)("UsaProductoAlterno"))
+                Vta.Cliente.Documentacion = dtVentas(0)("Documentacion").ToString
 
                 Vta.RefDocto = dtVentas(0)("Ref").ToString
                 Vta.CveVenta = dtVentas(0)("CveVenta").ToString.ToEntero
@@ -3719,7 +3759,7 @@ Partial Class PopUpVerFactura
                     If CveConcepto = 33 Then ConceptoFormato = "ENTRADA MANUAL"
 
                     'IMPRESION ESPECIAL SALIDA DE COMPUPROVEEDORES y VSH
-                    If UsuarioActual.CveEmpresa.Contiene(72, 80, 119, 4, 145, 146) Then
+                    If UsuarioActual.CveEmpresa.Contiene(72, 80, 119, 4, 145, 146, 186) Then
                         params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
                         params.Add(New ReportParameter("Concepto", ConceptoFormato))
                         params.Add(New ReportParameter("Almacen", Almacen))
@@ -3741,6 +3781,12 @@ Partial Class PopUpVerFactura
 
                         params.Add(New ReportParameter("Observaciones", Observaciones))
 
+                        If UsuarioActual.CveEmpresa.Contiene(186) Then
+                            params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Usuario))
+                            params.Add(New ReportParameter("NombreProveedor", If(CveCompra > 0, dr("RazonSocial").ToString, "")))
+                        End If
+
+
                         If UsuarioActual.CveEmpresa.Contiene(72, 80) Then
                             params.Add(New ReportParameter("NombreProveedor", If(CveCompra > 0, dr("RazonSocial").ToString, "")))
                             params.Add(New ReportParameter("DireccionProveedor", If(CveCompra > 0, dr("Direccion").ToString, "")))
@@ -3908,7 +3954,7 @@ Partial Class PopUpVerFactura
                     If Archivo.Exists Then
 
                         'IMPRESION ESPECIAL SALIDA DE COMPUPROVEEDORES y VSH
-                        If UsuarioActual.CveEmpresa.Contiene(1, 72, 80, 119, 4, 145, 146) Then
+                        If UsuarioActual.CveEmpresa.Contiene(1, 72, 80, 119, 4, 145, 146, 186) Then
                             Dim CiudadSucursal As String = ""
                             Dim DomicilioSucursal As String = ""
                             Dim DomicilioCliente As String = String.Format("{0} #{1}, {2}, Col. {3}, CP:  {4}, {5}, {6}", DtMovimientos(0)("SucClienteDireccion").ToString, DtMovimientos(0)("SucClienteNoExt").ToString, DtMovimientos(0)("SucClienteNoInt").ToString, DtMovimientos(0)("SucClienteColonia"), DtMovimientos(0)("SucClienteCP").ToString, DtMovimientos(0)("SucClienteCiudad"), DtMovimientos(0)("SucClientePais").ToString)
@@ -3922,6 +3968,9 @@ Partial Class PopUpVerFactura
                                 DomicilioSucursal = DomicilioCliente
                             End If
 
+                            If UsuarioActual.CveEmpresa.Contiene(186) Then
+                                params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Usuario))
+                            End If
 
                             If UsuarioActual.CveEmpresa.Contiene(72, 80, 146) Then
 
@@ -4388,7 +4437,7 @@ Partial Class PopUpVerFactura
                     Observaciones = ObservacionesSolicitud
                 End If
 
-                If UsuarioActual.CveEmpresa = 119 Then
+                If UsuarioActual.CveEmpresa.Contiene(119, 186) Then
                     If CalleOrigen.Length > 0 Then
                         SBDireccionO.AppendFormat("{0}", CalleOrigen)
                         If NoExtOrigen.Length > 0 Then SBDireccionO.AppendFormat(", No.Ext: {0}", NoExtOrigen)
@@ -4448,7 +4497,7 @@ Partial Class PopUpVerFactura
                         params.Add(New ReportParameter("Factura", DtMovimientos(0)("SerieFolio").ToString))
                     End If
 
-                    If UsuarioActual.CveEmpresa = 72 Or UsuarioActual.CveEmpresa = 119 Then
+                    If UsuarioActual.CveEmpresa.Contiene(72, 119, 186) Then
                         params.Add(New ReportParameter("FechaImpresion", NowADS().ToString("dd/MM/yyyy")))
                         params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
                         params.Add(New ReportParameter("AlmacenOrigen", Almacen))
@@ -4499,7 +4548,7 @@ Partial Class PopUpVerFactura
                     params.Add(New ReportParameter("FacturadoA", DtMovimientos(0)("Nombre").ToString))
                     params.Add(New ReportParameter("Factura", DtMovimientos(0)("SerieFolio").ToString))
 
-                    If UsuarioActual.CveEmpresa = 72 Or UsuarioActual.CveEmpresa = 119 Then
+                    If UsuarioActual.CveEmpresa.Contiene(72, 119, 186) Then
                         params.Add(New ReportParameter("FechaImpresion", NowADS().ToString("dd/MM/yyyy")))
                         params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
                         params.Add(New ReportParameter("AlmacenOrigen", Almacen))

Empresas/186/Formatos/EtiquetaDeRecepcion.rdlc

@@ -0,0 +1,256 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report xmlns:rd="http://schemas.microsoft.com/SQLServer/reporting/reportdesigner" xmlns:cl="http://schemas.microsoft.com/sqlserver/reporting/2010/01/componentdefinition" xmlns="http://schemas.microsoft.com/sqlserver/reporting/2010/01/reportdefinition">
+  <AutoRefresh>0</AutoRefresh>
+  <ReportSections>
+    <ReportSection>
+      <Body>
+        <ReportItems>
+          <Textbox Name="PS">
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>=Parameters!PS.Value</Value>
+                    <Style>
+                      <FontSize>8pt</FontSize>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>PS</rd:DefaultName>
+            <Top>0.14111cm</Top>
+            <Left>2.48778cm</Left>
+            <Height>1.1761cm</Height>
+            <Width>6.93443cm</Width>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
+          <Textbox Name="Lote">
+            <CanGrow>true</CanGrow>
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>=Parameters!Lote.Value</Value>
+                    <Style>
+                      <FontSize>8pt</FontSize>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>Lote</rd:DefaultName>
+            <Top>1.36307cm</Top>
+            <Left>3.92323cm</Left>
+            <Height>0.30367cm</Height>
+            <Width>3.91148cm</Width>
+            <ZIndex>1</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
+          <Textbox Name="FechaCad">
+            <CanGrow>true</CanGrow>
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>=Parameters!FechaCad.Value</Value>
+                    <Style>
+                      <FontSize>8pt</FontSize>
+                      <FontWeight>Bold</FontWeight>
+                      <Format>d/MM/yy</Format>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>FechaCad</rd:DefaultName>
+            <Top>1.75846cm</Top>
+            <Left>5.45111cm</Left>
+            <Height>0.2878cm</Height>
+            <Width>2.3836cm</Width>
+            <ZIndex>2</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
+          <Image Name="qr">
+            <Source>Database</Source>
+            <Value>=Parameters!QR.Value</Value>
+            <MIMEType>image/bmp</MIMEType>
+            <Sizing>FitProportional</Sizing>
+            <Top>0.03175cm</Top>
+            <Height>2.31083cm</Height>
+            <Width>2.42605cm</Width>
+            <ZIndex>3</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+            </Style>
+          </Image>
+          <Textbox Name="Textbox1">
+            <CanGrow>true</CanGrow>
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>LOTE:</Value>
+                    <Style>
+                      <FontSize>8pt</FontSize>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>Textbox1</rd:DefaultName>
+            <Top>1.36307cm</Top>
+            <Left>2.52094cm</Left>
+            <Height>0.30367cm</Height>
+            <Width>1.2259cm</Width>
+            <ZIndex>4</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
+          <Textbox Name="Textbox2">
+            <CanGrow>true</CanGrow>
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>F. ELABORACIÓN:</Value>
+                    <Style>
+                      <FontSize>8pt</FontSize>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>Textbox1</rd:DefaultName>
+            <Top>1.75846cm</Top>
+            <Left>2.52094cm</Left>
+            <Height>0.2878cm</Height>
+            <Width>2.82222cm</Width>
+            <ZIndex>5</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
+          <Image Name="Logo">
+            <Source>Embedded</Source>
+            <Value>Logo</Value>
+            <Sizing>FitProportional</Sizing>
+            <Top>1.5468cm</Top>
+            <Left>8.2016cm</Left>
+            <Height>0.74287cm</Height>
+            <Width>1.52823cm</Width>
+            <ZIndex>6</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+            </Style>
+          </Image>
+        </ReportItems>
+        <Height>0.92351in</Height>
+        <Style>
+          <Border>
+            <Style>None</Style>
+          </Border>
+        </Style>
+      </Body>
+      <Width>3.83898in</Width>
+      <Page>
+        <PageHeight>2.5cm</PageHeight>
+        <PageWidth>10cm</PageWidth>
+        <LeftMargin>0.02cm</LeftMargin>
+        <RightMargin>0.02cm</RightMargin>
+        <TopMargin>0.02cm</TopMargin>
+        <BottomMargin>0.02cm</BottomMargin>
+        <Style />
+      </Page>
+    </ReportSection>
+  </ReportSections>
+  <ReportParameters>
+    <ReportParameter Name="QR">
+      <DataType>String</DataType>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="PS">
+      <DataType>String</DataType>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="Lote">
+      <DataType>String</DataType>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="FechaCad">
+      <DataType>String</DataType>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+  </ReportParameters>
+  <EmbeddedImages>
+    <EmbeddedImage Name="Logo">
+      <MIMEType>image/png</MIMEType>
+      <ImageData>iVBORw0KGgoAAAANSUhEUgAAAS4AAAC3CAYAAACsXrN8AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAACxIAAAsSAdLdfvwAAB0CSURBVHhe7Z3djyXHWcaHG4S4sYU0s0qi4AjHIEXIu5sYLJDWWisXsGtHtjeeGaMIsUKQSNx4d7O7xt4Zz1o2/oDYWWMbGzlCi1AswwUziYlswOvdoAiZD6EVDmCHC+8fkItxUOByqae63jPVdd7qrj5d/XFmnp/0aqarq6urq6ueft/qOucsEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCJlH7rlh48bVxbXjK4trW6tLa1dWFtcvrO47d9jtJoSQcbG8uHHACNW11aX169O2dtFlI4SQcWA9raX17WnB8mxx/bzLTggh/XH0wc0Dd3118zDs6KnN40dObp6H3ferz7+lilVgd3/lr56WY3w7enLzgpZ+5NTmvXI+VwVCCJlmIk4nN09UCcmvPbj5KXfIAuazNKGasobzXb5Q+vVA3cI6EEL2CBj4oSiION3z4OaNLlstqcK1srR+wh3SCtQNdfS9PtSbQkbILkQGvHhTGPjYdrtnpniLqItVyTp8wwjvTIQMf7HtdhFC5hHxqiTEauJNpYAlEKpQlW3bZe8ceF7wwETE6IkRMidgsIoHksOrqsMI09VAqMpmxM1l7ZWwHYo3oDuhLdaauayEkKGwE9rGs+rb0/jCFy/eunLT4++XxAq2b/3HQ4lWCITr/p9/crqOXKpByDCIYCFEyh0K1oHzQSjx1y5EXVo/ATGAYN31u68/3Hd9qpgSLWtrV9xuQkgfTEKhAQRLwLljk+FIx363OTja6v7lTz522e0mhHSNFYyeQ8KQFGGCJzgWr2v5lidPh8J1751/
+siYeo8tGCGmLm1C+iJAGSw+O3f7sUTuPFfFy+kK8PbcZZSxel9T3i59+8u77f/GZ7658fONphLaybwxtSsiuwXgF5Td2+x7932N3vniT2z0I8E6aeClDe10QJF9k8ZbR/VtCvFh6X4S0AB5BSbTEBn5Th8HdJEQd0uvSzh0TLiCeWZPrI4R4xITLhDqPuiy9Y72SGUKqIbyumGBWCRcQj5LiRcgMYAAtf+L8h75orSytfXTXb7/+pcmiyh7FQLwRt9mIvr2uqvPVCZeAa51FpAnZs0CQMPCwuNOfnJcJZQDhspPKPXgH4oW0Ecq+vC60S5VIpgoXQDkoz20SQmKIaKWKkXhC4oW55KzkEMc+vK46obFi37CNZjmGkD1HG5HAAIOANRG+OlBWrpCpS68rpZ6zilDONiBk15FrgKAMCKANJRuUd3n/Q4dhbjO7l5S7PCG13dp4TxQvQhS6GNQSdooXFvN2Lh08c/6dA2e23zl49rrYm7c9/DSEz2XJRm6vq4mgNJnf0sgRMhOya5B5KrfZCRjc1gMz5/EH+qWDZy/4guXb3/zyI3/msmUjp0A3ES3QVrgguGi/rsJdQuaKLud+QiCS4oV99Tf+9AFNsHwzoWN2DyPH9YYCnEJb4QJ9PGQIGT1NvYacvPr5p57WxMq3tz97Nnu42MbrEq9nlpAth3CBnF4jIXPH0E9viJImVr5h/stlz8osXhfyQzBmES2QS7jArOJJyNwzdOe/vP/0AU2sfLu8/0wnnkVTr6WtaOF4iKXbbE3u8giZC8YSbrxz8MxVTbCsHTh7zWXrhFSvq61ogTZLIWIwZCR7jhwT1DnA5LsmXm9+7uEf/sUdjx1y2TohZeCjjXJ4pl0IF2DISPYMY3pSY9BBRP/88OOPXjp45iIMc1+nH3j11j4GZZWAi2jlEPiurgV1Y8hI9gRj8bYgoFXCgPS2IVodr37+qZPfue2RD4vQ9Mw2hPPy/gdvxDlziRbIOTEfgjZC
+W7pNQnYfMiDd5iCIIKV4fciL+nYxMC/vP308DFFhf/+53//P3/rKN7+US7RAl8IFui6fkEEZ+ukswtm0DqlCl0oxtzYtWmJ/e9vDL7usWehaWLqaQyNkFAz5ZK4LDesIj/+vlxc+9eHXF2YqK+ZtiV06eDbrbx720e70usiuBAM/p9eSioR7Oc4tHtt/vPCTr/3gpYXrsA9eWmg8YGsXv2ZeitGHqNDrIrsSDPguJ7o1RGhynvft5245JKIl5nYlU7f49dLBM1sua2v6fGDQ6yK7jr47ddvQMMYHLy4caCtcENI3bn/k+5powfzvBWtLn54QBBLt7jYJmW/E83GbnZIzNNTAwHz72U//s4iWEbILblcS0haPH3vxJsxllUTrwNmPnj/ytW/kFNs+hQv15rousmvo60ncRWgo2JDLeI24FgxQeF6YoHe7kxAv0G1aEDbCwxIvC3WXc9gMLel73VxX7U9I7/QRJooo5B6k8FZEsFzSTNhyEssQAXabreg7RM9Zd0IGpcvBA6HCQGkrLCEiWDnCLNStaTnWw8twTX0LF+jhnPDocA4sG8Ecoxjexl40ltLWiABwfGhNQV20cppEGOGxTaYf8JAIj9cM7YI2q6qXdlxT2x0PLQiLNu/x3y8sHP7gpYUtzBHNuh5Knu45Q5OcggUgPrOGyW2OFQYRrgz1rgDX44tVzDCIqvoF7q92XNOHBfq2Vk5q/0E7hcduG0sltT18g8Br9dPyNrXe+1snQABCEcDckP9WzogXOlkj7ODIGBrmFizxBFsLT0sRGEK4Yg+rDMBr0AZLzCAAsbaLCRfO0YSrxrRyUvsRPBTt+NSH8SzCJRZ6R1qeprY7hEsbePC2fOGCuV1RjLgdx2LPf7jw8btzCALAAEP9cgoWkHJzeYJtvMohhGtlae3elU9sbK8urV/Hr5Cv7tvI0Q4xz6bOIF7awy0mXE28HVyXVgYstT/FxDg15GojXDDfw9T2N7VdIlzKwIHH
+ZYRoW0SrzuOCYPki981n7jjqds2ECAu8gtwhTRfhq3hv+OuSktC83a5Z3XfuMAQrMHglbcB1Q1C0gZJimhcVEy5YqmhUiWlqu8c8ttR5rrbC5Qu7tr+p7V7hAvC6/uXCz3z70nM3v1E3xwVh84Vrlo/ZgC4FC0CsUH5TgUlhlrIHEa7F9fOKcF1fXtxo095VAoGHHvoDBjrmbrQ8sLDdqoQr9ZMLMdGBpbQ76qQdC0sV+5hwId23qrqKUIfHiGnHSLuH1mt/64y6UCUllAk9LiNkjQZB14IFUO4sXlETxJtzm7Xgmru63hjLNz/xiiZcLcNFDBJt8IRtgbaPDdAwb5VwweruY1WYCEsZwHV1SAHjJ/VYtIGWt06otWNqx+1ck0O4wA9eWDgBAXv/Jf2tD9LNfvuWUhaGQkQw0LsULICyIRJus1OanCu1bdsi3iDO94Xli19e3bf+o7JwrTV++RKgDZzYYEPbaPnDtqgTjboHBDw87TixFOFCnbRjxdqUEUMT9rp5vTA/rJe+NRi1wpXBKzBidbzskf3Ej37zzEu/B8HKOdekgVCsL9ESUtusS+HCQ8FeuzkHHg5+fRAWYlJ++ZPnr97/C09dvOeGjTZeaMyzqWpzLX/YFnXCVeeFVIWlsBTRiXmSYin3D3m0Y2PEwu4qtPyd9a1RUDd4cngr4RwYbOuPDj7gdncG6t33HJKQIl5dCBfOiQeCtZprbxraRogJTNW5tfxhW8TK9S0muGh3Lb9vKf2i7oVDylxbU+Hqqj13B5On7s1PXDOhQuVTt+0A04QLk/9udyeEXsYQoA5VHmUu4fJDQfxtMo+XoQ5dDbRYub7FRLcuTITV9b8U8UtZmoHr0o6N0VV7zj8QqdWldbuOx7PoW5K2nRvzW4Fwpb6RaYzMm3UdgqYgdYkJSZt2rQoFm5BBuGIDvG14niJcsX5UFybC6oRLC9m0cuvancKVi9XFteOBaBW275zaODmEwH2E6Dwm8Wf9
+CFEdGMzwOMYgWoJ4Q6F4IR3t6jaTgVilhoIpoJyYsDZAGzhNPs+nERvAoYX3OsVTgtW1nbbwVPPk6u4hhSsXTYXLDpYMg6RLRAjGJFqCL1L4Pnt8z9d3fumRq9++/dz3sG0zVSDHwzvCfcggNBMy3duYh9OmXByrlRkaPCOflDARVle38JoQFmp1qvsIUlPh4uR8DKzZMUIVhorbXc5zdQkGdtO5nb5BKDf5jcbA8HuNLtsE8R4lFOxKkDMJV+xjMTDsmyWMTRWuMFysm1AXq7pm9KMwvywZCdPrpj2aChfKC/NCRKsI88N2n3ABTM4bsboK0bKT9DUrp8cqXBAEDOwxixYw4nReEy0x8byskLhQsI+XC2g3nMttzkpKeIYBiWtMvU8x4dIGtoi6tkYsJmRVwqWVI/1fO3/VNTURrpi3WOfVacfsTuFqSqa5kKxgYMMrcZujBr8MpAmW2LduP/d+F6FgCpkeSlVel28QEuSt8yBjwqWFUlJ/rQ6xelUJlyY20s+wBCLc17QsGNLF4M1VvVCoKh9ox6BccuTUX99tPYEBBpaGDaPmRLSAJla+vXXbQ++6rL2TSbjQJ7RBXWVV540JFwQvTJNQSvOuNO8JViUG2sJT8X5R53Bf1XVo+ZtYyqcatONy3NP5BgJhwrGPjp7aum7t5NZ2H2FMDFufAc8/C+8cOLOtCZZY7h+ZbULmaQB4RKnzTLDYuWPCBbRwTRMICGmsnCrh0vILWnlV966NcOE6U5wE7VgKlxUqES1nR05u1U0YtgbLJrCMwl8+gfmseRMtgAl4TbDE8CO0LmvvdDB/ifuF66kKf3zTPOcq4Up9c4g5tabCpc3X+cKEawv3Q6hjzCpcOGeKaAHt+L0tXAgNQ9ESy/A2Kgo+32hs8p1g7/3xT73c5du1rrm8/8Eb417XmavY77L2TgfC5QNRqgshtYdglXBp4qIZ2rSpcGlzaOGaNE2QYw/TWYSrSgg1tDIoXJpowY6c
+2noFnT5mONa3VNHRvoEV9t3nfva0yzKX4Lca//LQ+e8Z7+p/IFh/99mH/u+1Ox57Y0jRArhX7t8uwb2vErCwb1QJF6jz5nAu0FS4tMn8cK2ddh2x9Xgx4cL5YbE5uCbzt9rxe1u4gBGoq4pw1c7JhMIFjykUt9DwAuDNZz/zuiZc//j1j11DGShr7MsfQmQRaSje9s0orttck0vqHZzf/dsHsbd84UCNCY5QFy6KkMTKibV3ijeliRGuSyMmXD7anF2sPI3wWBiFC4MLQuWLVlvhwPG2zJObJTcc6ZeevfmiJlz4Pi8MfCuERuAmgndquG+BSKFov+q1ZnJNQ8zf9SxcEO6UgVYnXHXhorR1E+HCMbG8vmnhJMRHI0W4NBFuEi6Gx8IoXF2AyX0RwlB0YqEi5r1clhIY7ChjImQjEjPrUSUu24Cw2XobAetzLq9n4QIpAw33TsvnEwsXJUwEsXK0vhEL21JNezClCFdMhFPDRe1YClcX2CUNRrRMGPrDu05sHnLJE/zJefzFB7TdriQ0McN2nx4NrjFVtHwKb3TzuBZadsEcC1csXPQfcE2EKyYyqdakzBBNhFPDxfA4WN/3dO+Agfnrp791K/66pE6xQgYxESFzC2pzi8NEeFqKJOqFclDnqjCzLS2FC/cO852hVZEy0FKEK+ap+G3VRLhQby1vqmntmCpcbcLF8DgYhatrmoRTOYEYWC8M4uDEDP8jrUoo7A/mvrhw0XiCVzDv5n8poohNTjG03iPm9Dpqo5bClTowfbT8YR1ShAuEnoofJoImwqXla2KaYKe2TyxMTbnn2nEUrj7AoOwzjIsBwYFwxSb/sRjWiNW1cP4N4oX6Q7S68o6swENcM7aTCK3bnIXYwKyqo5Z/VuEKPZXwWlKFK+a9NTHNQ0oVLoDjw3wp4WJ4DIzC1Re5PZVcWI/HCBdE45U/uGcrFC3YuxcW/6kvr9EKaaY3kFaknSjPCIRCGzilt8UeqUISyxcS
+Ck740Eg9n/amEN5cDPTTMD8svCdNhEtbKpISLobHwChcfWFDNzMg3eYosd/iqgjXv7/w0//qsvQC2koErI3YZxCumKeCQR+KCLa1NUuw8BpShQsgr1hIrJwwryYaYdgZonlIocfXRLhmDRe1YyhcfWLDoZ48l1moWKoR8zA6BQIGT3XWEBXClyG0jS1LwMBGu2AQQQRi+TTPJiY4TUkVLq1udYNfm8wPQ7smwoX7oOWtCxe1YyhcfQPhyjmPkxtMzAfCdbWr79FPxc7NYV7OtF0TIWo5MS/EwsVU07zsPoUrJhihuIVoohQuRG0iXED7OFFduBjmh1G4hmCs812C8bAOYIX/a88cWnNJo8DOxxkBSw3/MgkXmHUpgRZSgj6FKxai1T0AUo5rKlyxh0AYgvpo+SlcQyAhUIYwpjMyzA91BuqV8gYyo3DhPsXmr2IGTyJWvz6FSxMXLXwNiU3Q15UNi4F21PJXzbdp+SlcQ5HhVX2njFm4hKo3kB3UH4NOW0ipGUSuSlRjgtOUWDn+dWveYt3EvKBN0Pui0VS4QOwBEHuIa3kpXEMy5vmueRAuAK/VtqMLv1cW1y/gV53wQynLH9t4t+rXnWYEnggELBQEDEhMNKe8fME9x/GhNSVWjt+ntP2pD0y5Tt/8FzUoJ9wPqyJ2TGwcaHlH+8DfM4x1vmtehEtAG973K89/A4JVtjV0dEJITsY63zVvwgUgUtPCtQ5viBCSmzHOd82jcOE3NClchPQIvv7GiNf37dfhnNy6hnkbt2sQMPc2dB2asrK0dm8oWpjzcrtnpk7Etf14GEm6ZuJh46+2PzZ9YJeEmP0xDx33DG9T6+6d1C92HqnXWOdgyUgwHe2ifPmgtZNbdQvzsoAObs6Hb4A1Vvb6Mi4n6I3lzzz15eWfe+LfbNi4uJ6l/nJPtEGOgS37XZLFLtdw6ZpBFJDPioOy31rwDbrApNtv65XjBdy70rHG7BdaRoTH3Pctm8f0O5dU
+wqsX5whJHHQQ11F2Op7pVPL0REcKLfa0TAVlhOfE8gK3ey6FCwO4bbuESNtogxxpst8lWTzhumLvYWBSR7kH1ss26RAr/yfzkGYLdKA8pOM4lyQPH1dH+xsKk76EbZdtArwp2R97QHp9g8JF4thOK50p6FASHoSGQSoDIdkQSjghNIPlrdI5C5t0VOR3/84FEIPQa8zBpG3MPfFDtJIAGHPJFrQd0urasLiP5Xa35ULA7PHl3/hEPqTjOJdkhKv4wRdfWH1PEPfbJVvs2je3T9sPtHoRMgU6KzoeBoftiB3NLfgiuNuEqwtvC/jt43ukoQC4ZEsb4QKFeDnPy+sLyIc0X7jc8VOhrNzrMH0idFJHxZOM1YuQwfE658TmNVTEINU8hxz47eN7QPjf3+eSLb4ooJ1987027x5MCQTSsA95XFKlcLnNSgqvdOc6RBz9OoGqehEyOOigZnBhotYMiGI9mfMkrqBzF/vG+9Ek0FWIKLgBbAe7/evC7eL/nd/ldNktIlya+aJTJRBIC/NH0my5brOSiZfoJv4hrMXx5farqhcho8J6LYEXIQYBc9lGhYhW6DHkZKcdJm/urhSCXkqLhIq2PSE2O+aFfn0L1+T+ujrsCHD5/lK4yNzgew+qKa/nhwSihYHXpWgBuX6cZzLvZNujeIEi2zazY0e4ZpvjAnI/cgkXxEryGrMi6t9zvx0pXGQukCdvnXUtEqkUA6ufj0rJteN/00476+2ckPv7hbbCJXNRYbnIh7SScDkxxT10SRZXV3iHNl3eVMas9OKBwkXGAgaD7ZBeqCLIQKszf8AMAc6PuvZZD7l2/O8LCv4P9wuzCheE2B6749mVhAPbSPevfyKm5hiIlA35PYGVekqYCIHC8WKTuhrvyxZoCOtFyCD4czFFJy2/ApfOW2f+gOmLYhAVa9aGOL9cu9ss6uOJf7gf1LWnXEdxbXoeCEnoUZr0KeGyYhcL88UrlDDRhbc+OF7yi8hV1Qvm
+n5+QzvCe4J7tvEkKhS1mXYZm4hFi0PuGNBlQQyDX7jan0Pa3ES7zUNmCV6S1tdk/JVwAeXGMCFjxd+f+igcWPrAEnNOW68JFrV6+hecnJDuxTojB5bK4EEV/oygW6/RtsOc14U0x0Itf2na7CCF7nTqPC9hwQs1XPMFze1sQLDzhtTk3QgiZCgURGrhdJRCSwbMSAYMXBm8op2jZkHAOBQveoPVeE+ptQ7cK71HC4roQuCqf1MdtTrZjJvcw5dzY7/6dQq5Na4eqfQDp2F9VPiElbIe18yCbv+OSegd1gKeVUwi7BvWd8kTNtiboGJiliXLkMw+CMJ/MgfnhukZVPjmH25xsx0zEIlYm6mjq6hbWFobtUOCsMGG/ubbovvBtaNguztA2VQJKiGXIpx06KDy/eRItW2dPtMLB5w86DM5SXm/OEAPUZbNUCZJPVT4p223KxH1hrh6uvkWa84K0MgvR2rm2ct3L0wSeOOG6klbcl8rD/6U27eYzpmQXUTz5+u8odlAHc2rzgA1pMcAC78K+SHBv4AQM4mIg7gx0tLU2QKsEyacqn5TrNkuYdPXtI9DK9K9TBM72FSc4/rX6wmXL8a5LE67i3hd5/frg/7rrJ2RC351lKLHMgQxoiJJLiqINTmCOLZYieO2uiYdGVT45n9ssYdIbCZfkD8/jzY1OhMgTJ2sQNxFqb990fiOKLomQ5miDYFbQYdExbed0T2oB2xj48ypaoAhvi0FnB3xwjT5uwE4JiSYUWppGVb7Y+YBJn0m4wvwT0dGFy36DCP6XsrT8YJLPiLhWJ0Jq0QbBLECQIEzoiEWH3flGVqzYxn5/bmReMddRmrB2VvqWByD73OYE2x4m3W93LU2jKl/sfMCk9yJc3v/2Gye0/EDO6RtC6nl+qJGe0QZBEyBGNoSo8D52Gxhg/uS1tSD0kXS3OUETCi1Noypf7HzApPciXNg2bSOfi/SFrCRcAPvUh8Ae6kekBXWDpQp5M+hP
+VO81MNBExHyPQQai25ygCYWWpiH5tK8Uip0PmPTehMs+yDCpjzI9EbOZI6D/TPIq10bIFHWDJYZ4Wrsh/GuLNmnvDd5S+IM8Nt1rd008NHbylX80A+dAOswllTDpMwlXWB/Ji/0uSRcz1x6eVQoX0MohJMosHtNeFS37csGIhi9GRVtMD/SJQBlvTNrXhtQymL2QSBMPDRwjxyOvPXfJ45v++TFg9jUSronwGPGVY6ywODHGfpvREBMcbLv00j57DSjXlOH3H9NeSd4ZIRZ0PK1DV7FXw0MZuDHz21EGqJYPg9Rls4h4xKxUblkQovl8zL5GwgVBmZrDc4Z0X3BQpttXFi5PZP19+N9LV2z+1veRAUDHi3V4DRuWmE7pNvcUxYA2nkEgSKEXJhTekPG8XH6bzxMIoYlwWS8r+PbS2PkFk6eRcAG5VpRtz2OuAdu+aIGYcAGvnqV9ONekXDGUr7QNISpNhMsNxOgA2UvA40S7pXqeXXioTc7fhq7OARHs6xrILiTlSWef9HtwXosQMlJShGuvzmsRQkZKnXAxRCSEjI4q4bLzEN7rb0IIGQVVwgVPa6++RSSEjJiYcDFEJISMlphwhaubCSFkNGhrubQ0QggZDaFIcUKeEDJ6QuHihDwhZPRgYal8uNX/nxBCRo1M0HOFPCFkboBwcfkDIWSuOHbgD9+979ALr3H5AyFkLlhdWruyurR+fXXf+o9X920wTCSEjJ+VpbV7rXAtrb+3vLjBt4mEkPGDpRDHDnztabdJCCHjp+pD1oQQMjrCxaeEEDJ66G0RQuYKeluEkLmD3hYhZK7gKnlCyFzg1mtdxZqt+2954r1jd754k9tFCCHjAyvijWBtu4Wmztamfn2YEEJGw8rS+omyaBXmdhNCyPjwPtZD4SKEzA9GqOz8ltjK4voFt4sQQsbJPTds3GhDxsX186uLa/yWU0IIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQ
+QgghhBBCyJ5lYeH/Aev8eE4+mU6OAAAAAElFTkSuQmCC</ImageData>
+    </EmbeddedImage>
+  </EmbeddedImages>
+  <rd:ReportUnitType>Cm</rd:ReportUnitType>
+  <rd:ReportID>272c4b43-6177-44f5-8699-9e315e3ec44e</rd:ReportID>
+</Report>

Empresas/Grales/Formatos/CartaPorteTimbrado.rdlc

@@ -109,6 +109,78 @@
           <DataField>Embalaje</DataField>
           <rd:TypeName>System.String</rd:TypeName>
         </Field>
+        <Field Name="SectorCOFEPRIS">
+          <DataField>SectorCOFEPRIS</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="NombreIngredienteActivo">
+          <DataField>NombreIngredienteActivo</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="NomQuimico">
+          <DataField>NomQuimico</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="DenominacionGenerica">
+          <DataField>DenominacionGenerica</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="DenominacionDistintiva">
+          <DataField>DenominacionDistintiva</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="Fabricante">
+          <DataField>Fabricante</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="FormaFarmaceutica">
+          <DataField>FormaFarmaceutica</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="CondicionesTransporte">
+          <DataField>CondicionesTransporte</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="RegistroSanitarioAutorizacion">
+          <DataField>RegistroSanitarioAutorizacion</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="PermisoImportacion">
+          <DataField>PermisoImportacion</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="FolioImportacionVUCEM">
+          <DataField>FolioImportacionVUCEM</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="NumCAS">
+          <DataField>NumCAS</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="RazonSocialEmpImportacion">
+          <DataField>RazonSocialEmpImportacion</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="NumRegistroPlagCOFEPRIS">
+          <DataField>NumRegistroPlagCOFEPRIS</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="DatosFabricante">
+          <DataField>DatosFabricante</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="DatosFormulador">
+          <DataField>DatosFormulador</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="DatosMaquilador">
+          <DataField>DatosMaquilador</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="UsoAutorizado">
+          <DataField>UsoAutorizado</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
       </Fields>
       <rd:DataSetInfo>
         <rd:DataSetName>DataSet</rd:DataSetName>
@@ -226,10 +298,10 @@
                   <Width>2.51991cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>8.15613cm</Width>
+                  <Width>8.04092cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>2.5cm</Width>
+                  <Width>2.60983cm</Width>
                 </TablixColumn>
                 <TablixColumn>
                   <Width>1.90464cm</Width>
@@ -511,7 +583,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>DESCRIPCIÓN</Value>
+                                <Value>Descripción</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -631,7 +703,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>PESO(KG)</Value>
+                                <Value>Peso(kg)</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -725,7 +797,7 @@
             <Top>6.39415cm</Top>
             <Left>0.38395cm</Left>
             <Height>1.12062cm</Height>
-            <Width>19.16442cm</Width>
+            <Width>19.15904cm</Width>
             <Style>
               <Border>
                 <Color>#4f81bd</Color>
@@ -847,7 +919,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>MERCANCIAS</Value>
+                    <Value>Mercancias</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -890,7 +962,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>DISTANCIA</Value>
+                                <Value>Distancia</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -1261,7 +1333,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>NOMBRE</Value>
+                                <Value>Nombre</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -1301,7 +1373,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>FECHA</Value>
+                                <Value>Fecha</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -1341,7 +1413,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>DIRECCIÓN</Value>
+                                <Value>Dirección</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -1450,7 +1522,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>REMITENTES Y DESTINATARIOS</Value>
+                    <Value>Remitentes Y Destinatarios</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -1646,7 +1718,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>LICENCIA</Value>
+                                <Value>Licencia</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -1686,7 +1758,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>NOMBRE OPERADOR</Value>
+                                <Value>Nombre Operador</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -1795,7 +1867,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>OPERADORES</Value>
+                    <Value>Operadores</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -1914,7 +1986,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>Versión CFDI:               Versión Carte Porte:</Value>
+                    <Value>Versión CFDI:</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>8pt</FontSize>
@@ -1935,15 +2007,7 @@
                     </Style>
                   </TextRun>
                   <TextRun>
-                    <Value xml:space="preserve">                                               </Value>
+                    <Value xml:space="preserve"> </Value>
-                    <Style>
-                      <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>6pt</FontSize>
-                      <FontWeight>Normal</FontWeight>
-                    </Style>
-                  </TextRun>
-                  <TextRun>
-                    <Value>=Parameters!CartaPorteVersion.Value</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>6pt</FontSize>
@@ -1956,9 +2020,9 @@
             </Paragraphs>
             <rd:DefaultName>Textbox45</rd:DefaultName>
             <Top>6.89767in</Top>
-            <Left>3.53738cm</Left>
+            <Left>3.68814cm</Left>
             <Height>2.89306cm</Height>
-            <Width>12.88876cm</Width>
+            <Width>12.51434cm</Width>
             <ZIndex>7</ZIndex>
             <Style>
               <Border>
@@ -1974,10 +2038,10 @@
             <Source>External</Source>
             <Value>=Parameters!QR.Value</Value>
             <Sizing>FitProportional</Sizing>
-            <Top>6.96712in</Top>
+            <Top>6.97962in</Top>
             <Left>0.18258in</Left>
-            <Height>1.08483in</Height>
+            <Height>1.2in</Height>
-            <Width>1.14232in</Width>
+            <Width>1.2in</Width>
             <ZIndex>8</ZIndex>
             <Style>
               <Border>
@@ -2207,7 +2271,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>TRANSPORTE</Value>
+                    <Value>Transporte</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -2418,7 +2482,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>DATOS DEL CLIENTE</Value>
+                    <Value>Datos Del Cliente</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -2460,7 +2524,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>CANTIDAD</Value>
+                                <Value>Cant.</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -2494,7 +2558,7 @@
             <TablixBody>
               <TablixColumns>
                 <TablixColumn>
-                  <Width>3.03118cm</Width>
+                  <Width>2.65924cm</Width>
                 </TablixColumn>
                 <TablixColumn>
                   <Width>8.93664cm</Width>
@@ -2701,7 +2765,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>UNIDAD DE MEDIDA</Value>
+                                <Value>Unidad De Medida</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -2741,7 +2805,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>DESCRIPCIÓN</Value>
+                                <Value>Descripción</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -2821,7 +2885,7 @@
                           <Paragraph>
                             <TextRuns>
                               <TextRun>
-                                <Value>IMPORTE</Value>
+                                <Value>Importe</Value>
                                 <Style>
                                   <FontFamily>Myriad Pro</FontFamily>
                                   <FontSize>8pt</FontSize>
@@ -2915,7 +2979,7 @@
             <Top>13.75012cm</Top>
             <Left>0.33883cm</Left>
             <Height>1.12062cm</Height>
-            <Width>19.20418cm</Width>
+            <Width>18.83224cm</Width>
             <ZIndex>13</ZIndex>
             <Style>
               <Border>
@@ -2930,7 +2994,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>CONCEPTOS</Value>
+                    <Value>Conceptos</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -3006,7 +3070,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>SUBTOTAL:</Value>
+                    <Value>SubTotal:</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -3086,7 +3150,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>DESCUENTOS:</Value>
+                    <Value>Descuentos:</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -3163,7 +3227,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>TOTAL:</Value>
+                    <Value>Total:</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -3488,7 +3552,7 @@
                               <Paragraph>
                                 <TextRuns>
                                   <TextRun>
-                                    <Value>RELACIÓN</Value>
+                                    <Value>Relación</Value>
                                     <Style>
                                       <FontFamily>Myriad Pro</FontFamily>
                                       <FontSize>8pt</FontSize>
@@ -3813,7 +3877,7 @@
                   <Paragraph>
                     <TextRuns>
                       <TextRun>
-                        <Value>FOLIOS RELACIONADOS</Value>
+                        <Value>Folios Relacionados</Value>
                         <Style>
                           <FontFamily>Myriad Pro</FontFamily>
                           <FontSize>9pt</FontSize>
@@ -3863,9 +3927,9 @@
             <Value>=Parameters!QRCCP.Value</Value>
             <Sizing>FitProportional</Sizing>
             <Top>6.97962in</Top>
-            <Left>6.52254in</Left>
+            <Left>6.46004in</Left>
-            <Height>1.05705in</Height>
+            <Height>1.2in</Height>
-            <Width>1.14232in</Width>
+            <Width>1.2in</Width>
             <ZIndex>25</ZIndex>
             <Style>
               <Border>
@@ -3909,13 +3973,13 @@
             </Style>
           </Textbox>
         </ReportItems>
-        <Height>8.09222in</Height>
+        <Height>8.29014in</Height>
         <Style />
       </Body>
       <Width>7.72749in</Width>
       <Page>
         <PageHeader>
-          <Height>3.02245cm</Height>
+          <Height>2.58148cm</Height>
           <PrintOnFirstPage>true</PrintOnFirstPage>
           <ReportItems>
             <Textbox Name="Textbox2">
@@ -3938,7 +4002,7 @@
                 </Paragraph>
               </Paragraphs>
               <rd:DefaultName>Textbox2</rd:DefaultName>
-              <Top>0.38703cm</Top>
+              <Top>0.06953cm</Top>
               <Left>4.85476cm</Left>
               <Height>0.78571cm</Height>
               <Width>9.73471cm</Width>
@@ -4044,7 +4108,7 @@
                 </Paragraph>
               </Paragraphs>
               <rd:DefaultName>Textbox3</rd:DefaultName>
-              <Top>1.13cm</Top>
+              <Top>0.8125cm</Top>
               <Left>4.85476cm</Left>
               <Height>1.76898cm</Height>
               <Width>9.74971cm</Width>
@@ -4061,9 +4125,10 @@
               <Source>External</Source>
               <Value>=Parameters!LogoPath.Value</Value>
               <Sizing>FitProportional</Sizing>
-              <Left>0.16845in</Left>
+              <Top>0.06953cm</Top>
-              <Height>0.46171in</Height>
+              <Left>0.18258in</Left>
-              <Width>1.23522in</Width>
+              <Height>0.85754in</Height>
+              <Width>1.2in</Width>
               <ZIndex>2</ZIndex>
               <Style>
                 <Border>
@@ -4077,7 +4142,7 @@
                 <Paragraph>
                   <TextRuns>
                     <TextRun>
-                      <Value>CARTA PORTE - TRASLADO</Value>
+                      <Value>Carta Porte - Traslado</Value>
                       <Style>
                         <FontFamily>Myriad Pro</FontFamily>
                         <FontSize>9pt</FontSize>
@@ -4091,7 +4156,7 @@
                 </Paragraph>
               </Paragraphs>
               <rd:DefaultName>Textbox3</rd:DefaultName>
-              <Top>0.38703cm</Top>
+              <Top>0.06953cm</Top>
               <Left>5.81924in</Left>
               <Height>0.5cm</Height>
               <Width>1.83161in</Width>
@@ -4130,7 +4195,7 @@
                 </Paragraph>
               </Paragraphs>
               <rd:DefaultName>Textbox3</rd:DefaultName>
-              <Top>0.3607in</Top>
+              <Top>0.2357in</Top>
               <Left>5.81924in</Left>
               <Height>0.60856cm</Height>
               <Width>1.83161in</Width>
@@ -4146,6 +4211,65 @@
                 <PaddingBottom>2pt</PaddingBottom>
               </Style>
             </Textbox>
+            <Textbox Name="Textbox54">
+              <CanGrow>true</CanGrow>
+              <KeepTogether>true</KeepTogether>
+              <Paragraphs>
+                <Paragraph>
+                  <TextRuns>
+                    <TextRun>
+                      <Value>Versión Carte Porte</Value>
+                      <Style>
+                        <FontFamily>Myriad Pro</FontFamily>
+                        <FontSize>8pt</FontSize>
+                        <FontWeight>Bold</FontWeight>
+                      </Style>
+                    </TextRun>
+                  </TextRuns>
+                  <Style>
+                    <TextAlign>Right</TextAlign>
+                  </Style>
+                </Paragraph>
+                <Paragraph>
+                  <TextRuns>
+                    <TextRun>
+                      <Value xml:space="preserve"> </Value>
+                      <Style>
+                        <FontFamily>Myriad Pro</FontFamily>
+                        <FontSize>6pt</FontSize>
+                        <FontWeight>Normal</FontWeight>
+                      </Style>
+                    </TextRun>
+                    <TextRun>
+                      <Value>=Parameters!CartaPorteVersion.Value</Value>
+                      <Style>
+                        <FontFamily>Myriad Pro</FontFamily>
+                        <FontSize>7pt</FontSize>
+                        <FontWeight>Normal</FontWeight>
+                      </Style>
+                    </TextRun>
+                  </TextRuns>
+                  <Style>
+                    <TextAlign>Right</TextAlign>
+                  </Style>
+                </Paragraph>
+              </Paragraphs>
+              <rd:DefaultName>Textbox54</rd:DefaultName>
+              <Top>1.38363cm</Top>
+              <Left>14.9272cm</Left>
+              <Height>1.14493cm</Height>
+              <Width>4.50596cm</Width>
+              <ZIndex>5</ZIndex>
+              <Style>
+                <Border>
+                  <Style>None</Style>
+                </Border>
+                <PaddingLeft>2pt</PaddingLeft>
+                <PaddingRight>2pt</PaddingRight>
+                <PaddingTop>2pt</PaddingTop>
+                <PaddingBottom>2pt</PaddingBottom>
+              </Style>
+            </Textbox>
           </ReportItems>
           <Style>
             <Border>

Inventarios/EntradasSalidas.aspx.vb

@@ -5552,7 +5552,7 @@ Partial Class Inventarios_EntradasSalidas
                             End If
                             Dim tCveMovtoEntrada As Integer = If(tOrigen > 0, CveMovimientoVirtual, -1)
                             Dim tCveMovtoSalida As Integer = If(tOrigen > 0, -1, CveMovimientoVirtual)
-                            If Not ContabilizaMovimientoAlmacen(ObjConta, TxtFecha.Text.Replace(",", "").ToDate, "Virtual", "ES/GV", tCveMovtoSalida, tCveMovtoEntrada, DtPSVirtual.SUM("TotalCargo"), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, True, dttCosto, tCveSubProyecto) > 0 Then
+                            If Not ContabilizaMovimientoAlmacen(ObjConta, TxtFecha.Text.Replace(",", "").ToDate, "Virtual", "ES/GV", tCveMovtoSalida, tCveMovtoEntrada, dttCosto.SUMD("Total"), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, True, dttCosto, tCveSubProyecto) > 0 Then
                                 ErrorMovInv = True
                             End If
                         End If

Inventarios/RecepcionAlmacen.aspx.vb

@@ -3675,7 +3675,7 @@ Partial Class Inventarios_RecepcionAlmacen
                     Msg.AppendFormat("<br/>La Orden de Compra se dividió en los siguientes productos:<br/>{0}", MensajeOC)
                 End If
                 If UsuarioActual.CveEmpresa.Contiene(1, 119, 186) Then
-                    Msg.AppendFormat("<br/><a class=""Texto"" target='_blank' href=""/Compras/PopUpVerFactura.aspx?P={0}"">Imprimir Etiqueta Individual</a> ", Encripta(String.Format("OP=Etiqueta&CveMovimiento={0}&Modalidad={1}", CveMovimiento, "Individual")))
+                    Msg.AppendFormat("<br/><a class=""Texto"" target='_blank' href=""/Compras/PopUpVerFactura.aspx?P={0}"">Imprimir Etiqueta Individual</a> ", Encripta(String.Format("OP=Etiqueta&CveMovimiento={0}&Modalidad={1}", CveMovimiento, "Cantidad")))
                     'Msg.AppendFormat("<br/><a class=""Texto"" target='_blank' href=""/Compras/PopUpVerFactura.aspx?P={0}"">Imprimir Etiqueta Por Caja</a> ", Encripta(String.Format("OP=Etiqueta&CveMovimiento={0}&Modalidad={1}", CveMovimiento, "Caja")))
 
                 End If

Nomina/Nomina.aspx

@@ -149,6 +149,14 @@
             padding-top: 2px;
             padding-bottom: 2px;
         }
+        #ModalConceptos table.table > tbody > tr > td,
+        #ModalConceptos table.table > tbody > tr > th,
+        #ModalConceptos table.table > thead > tr > td,
+        #ModalConceptos table.table > thead > tr > th {
+            font-size: 11px;
+            padding-top: 2px;
+            padding-bottom: 2px; 
+        }
 
         .GvConceptos.table > tbody > tr.ConceptosTotales td {
             border-top: 1px solid #E87E04;
@@ -323,7 +331,7 @@
                         <div class="row">
                             <label class="col-md-1 compoonenlabel" style="max-width: 65px;">Ejercicio: </label>
                             <div class="col-md-1">
-                                <asp:DropDownList ID="DdlEjercicios" runat="server" OnSelectedIndexChanged="DdlEjercicios_SelectedIndexChanged" AutoPostBack="true"  Style="width: 100% !important;" CssClass="select2me" DataValueField="Ejercicio" DataTextField="Ejercicio"></asp:DropDownList>
+                                <asp:DropDownList ID="DdlEjercicios" runat="server" OnSelectedIndexChanged="DdlEjercicios_SelectedIndexChanged" AutoPostBack="true" Style="width: 100% !important;" CssClass="select2me" DataValueField="Ejercicio" DataTextField="Ejercicio"></asp:DropDownList>
                             </div>
 
                             <label class="col-md-1 compoonenlabel" style="max-width: 100px;">Tipo Período:</label>
@@ -2862,6 +2870,28 @@
                                 <ContentTemplate>
                                     <asp:UpdatePanel ID="upDatosVacaEmpre" runat="server" UpdateMode="Conditional">
                                         <ContentTemplate>
+                                            <div class="portlet solid  grey-cascade portlet-filter">
+                                                <div class="portlet-title portlet-filterT smalltitle">
+                                                    <div class="titlefiltros  caption">
+                                                        <div class="row">
+                                                            <label class="col-md-1">Ejercicio: </label>
+                                                            <div class="col-md-1">
+                                                                <asp:TextBox ID="TxtEjercicioFiltroVacaciones" CssClass="form-control input-sm " runat="server"></asp:TextBox>
+                                                            </div>
+                                                            <div class="col-md-1">
+                                                                <asp:LinkButton ID="LnkConsultartablasVacaciones" OnClick="LnkConsultartablasVacaciones_Click" runat="server" Text="Consultar" class="btn btn-primary" />
+
+                                                            </div>
+
+                                                        </div>
+                                                    </div>
+                                                    <div class="tools">
+                                                        <%--<a href="javascript:;" class="expand" data-original-title="" title=""></a>--%>
+                                                    </div>
+                                                </div>
+                                                <div class="portlet-body" style="display: none">
+                                                </div>
+                                            </div>
                                             <div class="portlet light  xspadding bordered" id="pnlVacEmpresa">
                                                 <div class="portlet-title">
                                                     <div class="caption ">
@@ -2924,65 +2954,43 @@
                                                 </div>
                                                 <div class="portlet-body">
 
-            <div class="portlet solid  grey-cascade portlet-filter">
+                                                    <div style="width: 340px">
-                <div class="portlet-title portlet-filterT smalltitle">
+                                                        <asp:GridView ID="GVVacacionesEmpresas" runat="server" GridLines="None" CssClass="table table-hover table-striped Widthall ScrollAD" AutoGenerateColumns="False"
-                    <div class="titlefiltros  caption">
+                                                            DataKeyNames="CveEmpresa,Inicio,Fin,DiasVacaciones,Ejercicio">
-                        <div class="row">
+                                                            <Columns>
-                            <label class="col-md-1">Ejercicio: </label>
+                                                                <asp:TemplateField HeaderText="Ejercicio" ItemStyle-HorizontalAlign="Center">
-                            <div class="col-md-1">
+                                                                    <ItemTemplate>
-                                  <asp:TextBox ID="TxtEjercicioFiltroVacaciones" CssClass="form-control input-sm " runat="server"></asp:TextBox>
+                                                                        <asp:Label ID="lblEjercicio" runat="server" Text='<%# Eval("Ejercicio")%>'> </asp:Label>
-                            </div>
+                                                                    </ItemTemplate>
-                            <div class="col-md-1">
+                                                                </asp:TemplateField>
-                                <asp:LinkButton ID="LnkConsultartablasVacaciones" OnClick="LnkConsultartablasVacaciones_Click" runat="server" Text="Consultar" class="btn btn-primary" />
+                                                                <asp:TemplateField HeaderText="Inicio" ItemStyle-HorizontalAlign="right">
-
+                                                                    <ItemTemplate>
-                            </div>
+                                                                        <asp:Label ID="lblinicio" runat="server" Text='<%# Eval("Inicio")%>'> </asp:Label>
-
+                                                                    </ItemTemplate>
-                        </div>
+                                                                </asp:TemplateField>
-                    </div>
+                                                                <asp:TemplateField HeaderText="Fin" ItemStyle-HorizontalAlign="right">
-                    <div class="tools">
+                                                                    <ItemTemplate>
-                        <%--<a href="javascript:;" class="expand" data-original-title="" title=""></a>--%>
+                                                                        <asp:Label ID="lblfin" runat="server" Text='<%# Eval("Fin")%>'> </asp:Label>
-                    </div>
+                                                                    </ItemTemplate>
-                </div>
+                                                                </asp:TemplateField>
-                <div class="portlet-body" style="display: none">
+                                                                <asp:TemplateField HeaderText="Dias Vacaciones" ItemStyle-HorizontalAlign="right">
-                </div>
+                                                                    <ItemTemplate>
-            </div>
+                                                                        <asp:Label ID="Label5" runat="server" Text='<%# Eval("DiasVacaciones")%>'> </asp:Label>
-                                                <div style="width:340px">
+                                                                    </ItemTemplate>
-                                                    <asp:GridView ID="GVVacacionesEmpresas" runat="server" GridLines="None" CssClass="table table-hover table-striped Widthall ScrollAD" AutoGenerateColumns="False"
+                                                                </asp:TemplateField>
-                                                        DataKeyNames="CveEmpresa,Inicio,Fin,DiasVacaciones,Ejercicio">
+                                                                <%--<asp:TemplateField Visible="false">
-                                                        <Columns>
-                                                            <asp:TemplateField HeaderText="Ejercicio" ItemStyle-HorizontalAlign="Center">
-                                                                <ItemTemplate  >
-                                                                    <asp:Label ID="lblEjercicio" runat="server" Text='<%# Eval("Ejercicio")%>'> </asp:Label>
-                                                                </ItemTemplate>
-                                                            </asp:TemplateField>
-                                                            <asp:TemplateField HeaderText="Inicio" ItemStyle-HorizontalAlign="right">
-                                                                <ItemTemplate>
-                                                                    <asp:Label ID="lblinicio" runat="server" Text='<%# Eval("Inicio")%>'> </asp:Label>
-                                                                </ItemTemplate>
-                                                            </asp:TemplateField>
-                                                            <asp:TemplateField HeaderText="Fin" ItemStyle-HorizontalAlign="right">
-                                                                <ItemTemplate>
-                                                                    <asp:Label ID="lblfin" runat="server" Text='<%# Eval("Fin")%>'> </asp:Label>
-                                                                </ItemTemplate>
-                                                            </asp:TemplateField>
-                                                            <asp:TemplateField HeaderText="Dias Vacaciones" ItemStyle-HorizontalAlign="right">
-                                                                <ItemTemplate>
-                                                                    <asp:Label ID="Label5" runat="server" Text='<%# Eval("DiasVacaciones")%>'> </asp:Label>
-                                                                </ItemTemplate>
-                                                            </asp:TemplateField>
-                                                            <%--<asp:TemplateField Visible="false">
                                                                 <ItemTemplate>
                                                                     <asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarVaca_Click" CssClass="btn btn-circle btn-sm btn-xs green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
                                                                 </ItemTemplate>
                                                             </asp:TemplateField>--%>
-                                                            <asp:TemplateField>
+                                                                <asp:TemplateField>
-                                                                <ItemTemplate>
+                                                                    <ItemTemplate>
-                                                                    <asp:LinkButton ID="LnkEliminarVaca" runat="server" OnClick="LnkEliminarVaca_Click" CssClass="btn btn-circle btn-sm btn-xs red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el VacacionesEmpresas?" data-btn-ok-label="si" />
+                                                                        <asp:LinkButton ID="LnkEliminarVaca" runat="server" OnClick="LnkEliminarVaca_Click" CssClass="btn btn-circle btn-sm btn-xs red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el VacacionesEmpresas?" data-btn-ok-label="si" />
-                                                                </ItemTemplate>
+                                                                    </ItemTemplate>
-                                                            </asp:TemplateField>
+                                                                </asp:TemplateField>
-                                                        </Columns>
+                                                            </Columns>
-                                                    </asp:GridView>
+                                                        </asp:GridView>
-                                                </div>
+                                                    </div>
                                                 </div>
                                             </div>
                                         </ContentTemplate>
@@ -2991,24 +2999,25 @@
                             </ajax:TabPanel>
                             <ajax:TabPanel ID="TTFactorDesctInfonavit" runat="server" HeaderText="Factor descuento Infonavit">
                                 <ContentTemplate>
-                                                <div style="width:440px">
+                                    <div style="width: 440px">
-                                    <asp:GridView ID="GVFactorDesctInfonavit" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                        <asp:GridView ID="GVFactorDesctInfonavit" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
-                                                        <Columns>
+                                            <Columns>
-                                                            <asp:TemplateField HeaderText="Fecha Inicio" ItemStyle-HorizontalAlign="Center">
+                                                <asp:TemplateField HeaderText="Fecha Inicio" ItemStyle-HorizontalAlign="Center">
-                                                                <ItemTemplate  >
+                                                    <ItemTemplate>
-                                                                    <asp:Label ID="lblFechaInicio" runat="server" Text='<%# Eval("Fecha Inicio","{0:dd/MM/yyyy}")%>'> </asp:Label>
+                                                        <asp:Label ID="lblFechaInicio" runat="server" Text='<%# Eval("Fecha Inicio","{0:dd/MM/yyyy}")%>'> </asp:Label>
-                                                                </ItemTemplate>
+                                                    </ItemTemplate>
-                                                            </asp:TemplateField>
+                                                </asp:TemplateField>
-                                                            <asp:TemplateField HeaderText="Factor Descuento" ItemStyle-HorizontalAlign="right">
+                                                <asp:TemplateField HeaderText="Factor Descuento" ItemStyle-HorizontalAlign="right">
-                                                                <ItemTemplate>
+                                                    <ItemTemplate>
-                                                                    <asp:Label ID="lblFactorDescuento" runat="server" Text='<%# Eval("Factor Descuento")%>'> </asp:Label>
+                                                        <asp:Label ID="lblFactorDescuento" runat="server" Text='<%# Eval("Factor Descuento")%>'> </asp:Label>
-                                                                </ItemTemplate>
+                                                    </ItemTemplate>
-                                                            </asp:TemplateField>
+                                                </asp:TemplateField>
-                                                        </Columns>
+                                            </Columns>
-                                    </asp:GridView>
+                                        </asp:GridView>
-                                                </div>
+                                    </div>
                                 </ContentTemplate>
                             </ajax:TabPanel>
+
                             <ajax:TabPanel ID="TTFactorSDI" runat="server" HeaderText="Factor SD" Visible="false">
                                 <ContentTemplate>
                                     <asp:GridView ID="GVFactorSDI" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
@@ -3027,7 +3036,30 @@
                             </ajax:TabPanel>
                             <ajax:TabPanel ID="TTSalariosMinimos" runat="server" HeaderText="Salarios Minimos">
                                 <ContentTemplate>
-                                    <asp:GridView ID="GVSalariosMinimos" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
+                                    <asp:GridView ID="GVSalariosMinimos" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                        <Columns>
+                                            <asp:TemplateField HeaderText="Vigencia" ItemStyle-HorizontalAlign="Center">
+                                                <ItemTemplate>
+                                                    <asp:Label ID="lblVigencia" runat="server" Text='<%# Eval("Vigencia") %>'> </asp:Label>
+                                                </ItemTemplate>
+                                            </asp:TemplateField>
+                                            <asp:TemplateField HeaderText="Zona A" ItemStyle-HorizontalAlign="right">
+                                                <ItemTemplate>
+                                                    <asp:Label ID="lblZonaA" runat="server" Text='<%# Eval("Zona A","{0:N2}")%>'> </asp:Label>
+                                                </ItemTemplate>
+                                            </asp:TemplateField>
+                                            <asp:TemplateField HeaderText="Zona B" ItemStyle-HorizontalAlign="right">
+                                                <ItemTemplate>
+                                                    <asp:Label ID="lblZonaB" runat="server" Text='<%# Eval("Zona B","{0:N2}")%>'> </asp:Label>
+                                                </ItemTemplate>
+                                            </asp:TemplateField>
+                                            <asp:TemplateField HeaderText="Zona C" ItemStyle-HorizontalAlign="right">
+                                                <ItemTemplate>
+                                                    <asp:Label ID="lblZonaC" runat="server" Text='<%# Eval("Zona C","{0:N2}")%>'> </asp:Label>
+                                                </ItemTemplate>
+                                            </asp:TemplateField>
+                                        </Columns>
+                                    </asp:GridView>
                                 </ContentTemplate>
                             </ajax:TabPanel>
                             <ajax:TabPanel ID="TTIMMSRiesgot" runat="server" HeaderText="Riesgo de trabajo">
@@ -3090,14 +3122,44 @@
                                             </div>
                                         </div>
                                         <div class="portlet-body  ">
-                                            <asp:GridView ID="GVIMMSRiesgot" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
+                                            <div style="width: 440px">
+                                                <asp:GridView ID="GVIMMSRiesgot" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                                    <Columns>
+                                                        <asp:TemplateField HeaderText="Fecha Inicio" ItemStyle-HorizontalAlign="Center">
+                                                            <ItemTemplate>
+                                                                <asp:Label ID="lblFechaInicio" runat="server" Text='<%# Eval("Fecha Inicio") %>'> </asp:Label>
+                                                            </ItemTemplate>
+                                                        </asp:TemplateField>
+                                                        <asp:TemplateField HeaderText="Riesgo de Trabajo" ItemStyle-HorizontalAlign="right">
+                                                            <ItemTemplate>
+                                                                <asp:Label ID="lblRiesgodeTrabajo" runat="server" Text='<%# Eval("Riesgo de trabajo","{0:N2}")%>'> </asp:Label>
+                                                            </ItemTemplate>
+                                                        </asp:TemplateField>
+                                                    </Columns>
+                                                </asp:GridView>
+                                            </div>
                                         </div>
                                     </div>
                                 </ContentTemplate>
                             </ajax:TabPanel>
                             <ajax:TabPanel ID="TTInfonavitSegViv" runat="server" HeaderText="Infonavit seguro de vivienda">
                                 <ContentTemplate>
-                                    <asp:GridView ID="GVInfonavitSegViv" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
+                                    <div style="width: 440px">
+                                        <asp:GridView ID="GVInfonavitSegViv" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                            <Columns>
+                                                <asp:TemplateField HeaderText="Fecha Inicio" ItemStyle-HorizontalAlign="Center">
+                                                    <ItemTemplate>
+                                                        <asp:Label ID="lblFechaInicio" runat="server" Text='<%# Eval("Fecha Inicio") %>'> </asp:Label>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+                                                <asp:TemplateField HeaderText="Cuota" ItemStyle-HorizontalAlign="right">
+                                                    <ItemTemplate>
+                                                        <asp:Label ID="lblCuota" runat="server" Text='<%# Eval("Cuota")%>'> </asp:Label>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+                                            </Columns>
+                                        </asp:GridView>
+                                    </div>
                                 </ContentTemplate>
                             </ajax:TabPanel>
                             <ajax:TabPanel ID="TTVigISRAnual" runat="server" HeaderText="ISR Anual" Visible="false">
@@ -3107,6 +3169,28 @@
                             <ajax:TabPanel ID="TTVigISRMensual" runat="server" HeaderText="ISR ">
                                 <ContentTemplate>
 
+                                    <div class="portlet solid  grey-cascade portlet-filter">
+                                        <div class="portlet-title portlet-filterT smalltitle">
+                                            <div class="titlefiltros  caption">
+                                                <div class="row">
+                                                    <label class="col-md-1">Ejercicio: </label>
+                                                    <div class="col-md-1">
+                                                        <asp:TextBox ID="Txtejerciciotablasisr" CssClass="form-control input-sm " runat="server"></asp:TextBox>
+                                                    </div>
+                                                    <div class="col-md-1">
+                                                        <asp:LinkButton ID="LnkconsultartablasISR" OnClick="LnkconsultartablasISR_Click" runat="server" Text="Consultar" class="btn btn-primary" />
+
+                                                    </div>
+
+                                                </div>
+                                            </div>
+                                            <div class="tools">
+                                                <%--<a href="javascript:;" class="expand" data-original-title="" title=""></a>--%>
+                                            </div>
+                                        </div>
+                                        <div class="portlet-body" style="display: none">
+                                        </div>
+                                    </div>
                                     <div class="portlet light  xspadding bordered">
                                         <div class="portlet-title">
                                             <div class="caption ">
@@ -3118,8 +3202,31 @@
                                                 <a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
                                             </div>
                                         </div>
-                                        <div class="portlet-body  ">
+                                        <div class="portlet-body">
-                                            <asp:GridView ID="GVVigISRMensual" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
+                                            <asp:GridView ID="GVVigISRMensual" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                                <Columns>
+                                                    <asp:TemplateField HeaderText="Ejercicio" ItemStyle-HorizontalAlign="center">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblEjercicio" runat="server" Text='<%# Eval("Ejercicio")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Limite Inferior" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblLimiteinferior" runat="server" Text='<%# Eval("Limite inferior") %>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Cuota Fija" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblCuota" runat="server" Text='<%# Eval("Cuota fija")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Porcentaje" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblPorcentaje" runat="server" Text='<%# Eval("Porcentaje")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                </Columns>
+                                            </asp:GridView>
                                         </div>
                                     </div>
                                     <div class="portlet light  xspadding bordered">
@@ -3134,10 +3241,32 @@
                                             </div>
                                         </div>
                                         <div class="portlet-body  ">
-                                            <asp:GridView ID="GVVigISRSemanal" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
+                                            <asp:GridView ID="GVVigISRSemanal" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                                <Columns>
+                                                    <asp:TemplateField HeaderText="Ejercicio" ItemStyle-HorizontalAlign="center">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblEjercicio" runat="server" Text='<%# Eval("Ejercicio")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Limite Inferior" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblLimiteinferior" runat="server" Text='<%# Eval("Limite inferior") %>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Cuota Fija" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblCuota" runat="server" Text='<%# Eval("Cuota fija")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Porcentaje" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblPorcentaje" runat="server" Text='<%# Eval("Porcentaje")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                </Columns>
+                                            </asp:GridView>
                                         </div>
                                     </div>
-
                                     <div class="portlet light  xspadding bordered">
                                         <div class="portlet-title">
                                             <div class="caption ">
@@ -3150,10 +3279,32 @@
                                             </div>
                                         </div>
                                         <div class="portlet-body  ">
-                                            <asp:GridView ID="GVVigISRDecenal" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
+                                            <asp:GridView ID="GVVigISRDecenal" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                                <Columns>
+                                                    <asp:TemplateField HeaderText="Ejercicio" ItemStyle-HorizontalAlign="center">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblEjercicio" runat="server" Text='<%# Eval("Ejercicio")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Limite Inferior" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblLimiteinferior" runat="server" Text='<%# Eval("Limite inferior") %>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Cuota Fija" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblCuota" runat="server" Text='<%# Eval("Cuota fija")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Porcentaje" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblPorcentaje" runat="server" Text='<%# Eval("Porcentaje")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                </Columns>
+                                            </asp:GridView>
                                         </div>
                                     </div>
-
                                     <div class="portlet light  xspadding bordered">
                                         <div class="portlet-title">
                                             <div class="caption ">
@@ -3166,7 +3317,30 @@
                                             </div>
                                         </div>
                                         <div class="portlet-body  ">
-                                            <asp:GridView ID="GVVigISRQuincenal" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
+                                            <asp:GridView ID="GVVigISRQuincenal" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                                <Columns>
+                                                    <asp:TemplateField HeaderText="Ejercicio" ItemStyle-HorizontalAlign="center">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblEjercicio" runat="server" Text='<%# Eval("Ejercicio")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Limite Inferior" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblLimiteinferior" runat="server" Text='<%# Eval("Limite inferior") %>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Cuota Fija" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblCuota" runat="server" Text='<%# Eval("Cuota fija")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Porcentaje" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblPorcentaje" runat="server" Text='<%# Eval("Porcentaje")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                </Columns>
+                                            </asp:GridView>
                                         </div>
                                     </div>
                                     <div class="portlet light  xspadding bordered">
@@ -3181,7 +3355,30 @@
                                             </div>
                                         </div>
                                         <div class="portlet-body  ">
-                                            <asp:GridView ID="GVVigISRAnual" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
+                                            <asp:GridView ID="GVVigISRAnual" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                                <Columns>
+                                                    <asp:TemplateField HeaderText="Ejercicio" ItemStyle-HorizontalAlign="center">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblEjercicio" runat="server" Text='<%# Eval("Ejercicio")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Limite Inferior" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblLimiteinferior" runat="server" Text='<%# Eval("Limite inferior") %>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Cuota Fija" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblCuota" runat="server" Text='<%# Eval("Cuota fija")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Porcentaje" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblPorcentaje" runat="server" Text='<%# Eval("Porcentaje")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                </Columns>
+                                            </asp:GridView>
                                         </div>
                                     </div>
                                 </ContentTemplate>
@@ -3193,7 +3390,62 @@
                             </ajax:TabPanel>
                             <ajax:TabPanel ID="TTVigSubEmpMensual" runat="server" HeaderText="Subsidio Mensual">
                                 <ContentTemplate>
-                                    <asp:GridView ID="GVVigSubEmpMensual" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None"></asp:GridView>
+
+                                    <div class="portlet solid  grey-cascade portlet-filter">
+                                        <div class="portlet-title portlet-filterT smalltitle">
+                                            <div class="titlefiltros  caption">
+                                                <div class="row">
+                                                    <label class="col-md-1">Ejercicio: </label>
+                                                    <div class="col-md-1">
+                                                        <asp:TextBox ID="TxtejerciciotablasSubsidio" CssClass="form-control input-sm " runat="server"></asp:TextBox>
+                                                    </div>
+                                                    <div class="col-md-1">
+                                                        <asp:LinkButton ID="LnkconsultartablasSubsidio" OnClick="LnkconsultartablasSubsidio_Click" runat="server" Text="Consultar" class="btn btn-primary" />
+
+                                                    </div>
+
+                                                </div>
+                                            </div>
+                                            <div class="tools">
+                                                <%--<a href="javascript:;" class="expand" data-original-title="" title=""></a>--%>
+                                            </div>
+                                        </div>
+                                        <div class="portlet-body" style="display: none">
+                                        </div>
+                                    </div>
+                                    <div class="portlet light  xspadding bordered">
+                                        <div class="portlet-title">
+                                            <div class="caption ">
+                                                <i class="fa fa-bookmark font-yellow-gold"></i>
+                                                <span class="caption-subject bold uppercase font-yellow-gold">Subsidio Mensual</span>
+                                            </div>
+                                            <div class="tools">
+                                                <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
+                                                <a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
+                                            </div>
+                                        </div>
+                                        <div class="portlet-body">
+                                            <asp:GridView ID="GVVigSubEmpMensual" runat="server" CssClass="table table-striped table-hover mysmallbtn Widthall GvNominas" GridLines="None" AutoGenerateColumns="false">
+                                                <Columns>
+                                                    <asp:TemplateField HeaderText="Ejercicio" ItemStyle-HorizontalAlign="center">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblEjercicio" runat="server" Text='<%# Eval("Ejercicio") %>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Limite Inferior" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblLimiteinferior" runat="server" Text='<%# Eval("Limiteinferior","{0:N2}") %>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                    <asp:TemplateField HeaderText="Subsidio al empleo" ItemStyle-HorizontalAlign="right">
+                                                        <ItemTemplate>
+                                                            <asp:Label ID="lblCuota" runat="server" Text='<%# Eval("Cuotafija","{0:N2}")%>'> </asp:Label>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
+                                                </Columns>
+                                            </asp:GridView>
+                                        </div>
+                                    </div>
                                 </ContentTemplate>
                             </ajax:TabPanel>
                             <ajax:TabPanel ID="TTUma" runat="server" HeaderText="UMA">
@@ -4764,7 +5016,7 @@
                                 Numero:
                             </div>
                             <div class="col-xs-4">
-                                <asp:TextBox ID="TxtNumeroCM"  Text="1" runat="server" CssClass=" form-control input-sm" CausesValidation="true" MaxLength="70" ValidationGroup="GrpGuardar" Width="100%"></asp:TextBox>
+                                <asp:TextBox ID="TxtNumeroCM" Text="1" runat="server" CssClass=" form-control input-sm" CausesValidation="true" MaxLength="70" ValidationGroup="GrpGuardar" Width="100%"></asp:TextBox>
                             </div>
                             <div class="col-xs-2" style="text-align: left; padding-top: 10px;">
                                 Fecha Inicio:

Nomina/Nomina.aspx.cs

@@ -309,6 +309,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
 
         if (!IsPostBack)
         {
+            TxtEjercicioFiltroVacaciones.Text = "2023";
+            TxtejerciciotablasSubsidio.Text = DateTime.Now.Year.ToString();
             enviarCorreoEnTimbrado = (UsuarioActual.CveEmpresa == 141 ? true : true);
             LnkCargaNetos.Visible = (UsuarioActual.Empresa.Funcionalidad(267) == "1") || (UsuarioActual.CveRol == 1);
             if (UsuarioActual.CveEmpresa == 141) { ddlfiniquito.SelectedValueExist("2"); }
@@ -5407,26 +5409,44 @@ public partial class Nomina_Nomina2 : ClsPaginas
 
     }
 
-    public void loadtablas()
+    protected void LnkconsultartablasSubsidio_Click(object sender, EventArgs e)
+    {
+
+        using (ClsNominas objnom = new ClsNominas())
+        {
+            if (objnom.GetFistablasValues(UsuarioActual.CveEmpresa, 2, TxtejerciciotablasSubsidio.Text.Trim().ToEntero()))
+            {
+                GVVigSubEmpMensual.DataSource = objnom.DtResultados;
+                GVVigSubEmpMensual.DataBind();
+            }
+            UpModalTablas.Update();
+        } 
+    }
+    protected void LnkconsultartablasISR_Click(object sender, EventArgs e)
+    {
+        
+        loadtablas(Txtejerciciotablasisr.Text.Trim().ToEntero());
+    }
+    public void loadtablas(int Ejercicio =-1)
     {
         CargaVacacionesEmpresas();
         using (ClsNominas objnom = new ClsNominas())
         {
-            if (objnom.GetTablasNomina(UsuarioActual.CveEmpresa) && objnom.DTSetResultados.Tables.Count > 1)
+            if (objnom.GetTablasNomina(UsuarioActual.CveEmpresa, Ejercicio) && objnom.DTSetResultados.Tables.Count > 1)
             {
                 GVFactorDesctInfonavit.DataSource = objnom.DTSetResultados.Tables[0];
                 GVSalariosMinimos.DataSource = objnom.DTSetResultados.Tables[1];
                 GVIMMSRiesgot.DataSource = objnom.DTSetResultados.Tables[2];
                 GVInfonavitSegViv.DataSource = objnom.DTSetResultados.Tables[3];
                 GVVigISRMensual.DataSource = objnom.DTSetResultados.Tables[4];
-                GVVigSubEmpMensual.DataSource = objnom.DTSetResultados.Tables[5];
                 GVVigISRSemanal.DataSource = objnom.DTSetResultados.Tables[7];
                 GVVigISRDecenal.DataSource = objnom.DTSetResultados.Tables[8];
                 GVVigISRQuincenal.DataSource = objnom.DTSetResultados.Tables[9];
                 GVVigISRAnual.DataSource = objnom.DTSetResultados.Tables[10];
-
+            }
-
+            if (objnom.GetFistablasValues(UsuarioActual.CveEmpresa,2, TxtejerciciotablasSubsidio.Text.Trim().ToEntero()) )
-
+            {
+                GVVigSubEmpMensual.DataSource = objnom.DtResultados;
             }
             if (objnom.RH_TablasValoresGet(UsuarioActual.CveEmpresa, 1))
             {
@@ -5486,7 +5506,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
     }
     protected void LnkVerTablas_Click(object sender, EventArgs e)
     {
-        loadtablas();
+        Txtejerciciotablasisr.Text = DateTime.Now.Year.ToString();
+        loadtablas(Txtejerciciotablasisr.Text.Trim().ToEntero());
         RegistraScript("$('#ModalTablas').modal();");
     }
     protected void LnkVerCalculoISR_Click(object sender, EventArgs e)
@@ -5507,7 +5528,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
         DataTable dtquin = null;
         using (ClsNominas objnom = new ClsNominas())
         {
-            if (objnom.GetTablasNomina(UsuarioActual.CveEmpresa) && objnom.DTSetResultados.Tables.Count > 1)
+            if (objnom.GetTablasNomina(UsuarioActual.CveEmpresa, DateTime.Now.Year ) && objnom.DTSetResultados.Tables.Count > 1)
             {
                 //GVFactorDesctInfonavit.DataSource = objnom.DTSetResultados.Tables[0];
                 //GVSalariosMinimos.DataSource = objnom.DTSetResultados.Tables[1];
@@ -10938,4 +10959,5 @@ public partial class Nomina_Nomina2 : ClsPaginas
         }
     }
 
+
 }

Ventas/CatEspecialidadesSubEspecialidades.aspx

@@ -0,0 +1,269 @@
+<%@ Page Title="Catálogo De Especialidades" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CatEspecialidadesSubEspecialidades.aspx.vb" Inherits="Ventas_CatEspecialidadesSubEspecialidades" %>
+<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+    <link href="/Metronic/assets/global/plugins/datatables/plugins/bootstrap/dataTables.bootstrap.css" rel="stylesheet" />
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+    
+
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
+    Catálogo De Especialidades
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+
+    <asp:UpdatePanel runat="server" ID="UpAgregar" UpdateMode="Always">
+        <ContentTemplate>          
+            <li>
+                <asp:LinkButton runat="server" ID="LnkAgregarEspecialidad" OnClick="LnkAgregarEspecialidad_Click" data-toggle="tooltip" data-placement="left" title="Agregar Medico" Text="<i class='fa fa-plus'></i> Agregar Especialidad"></asp:LinkButton>
+            </li>
+            <li>
+                <asp:LinkButton runat="server" ID="LnkAgregarSubEspecialidad" OnClick="LnkAgregarSubEspecialidad_Click" data-toggle="tooltip" data-placement="left" title="Agregar Medico" Text="<i class='fa fa-plus'></i> Agregar Sub Especialidad"></asp:LinkButton>
+            </li>
+             <li>
+                <asp:LinkButton ID="LnkExportar" runat="server" Visible="false"><i class="fa fa-file-excel-o"></i>  Excel</asp:LinkButton>
+            </li>             
+        </ContentTemplate>
+         <Triggers>
+            <asp:PostBackTrigger ControlID="LnkExportar" />
+        </Triggers>
+    </asp:UpdatePanel>
+
+</asp:Content>
+<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
+    
+    <asp:UpdatePanel runat="server" ID="UpGeneral" UpdateMode="Conditional">
+        <ContentTemplate>
+            <ajax:TabContainer runat="server" ID="Tabs">
+
+
+                <ajax:TabPanel ID="TabEspeciliadad" runat="server" HeaderText="Especialidades" ClientIDMode="Static">
+                    <ContentTemplate>
+
+                        <asp:UpdatePanel ID="UpEspecialidad" runat="server" UpdateMode="Conditional">
+                            <ContentTemplate>
+
+                                <div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right; margin-right: 5px;" align="left">
+                                    <input type="text" id="TxtBusqueda3" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda3','{0}')", GvEspecialidad.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                                    <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda3','{0}')", GvEspecialidad.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                                </div>
+                                <div class="row">
+                                    <div class="col-md-12">
+
+                                        <asp:GridView ID="GvEspecialidad" runat="server" AutoGenerateColumns="False"
+                                            DataKeyNames="CveMedicoEspecialidad,Especialidad,Estatus"
+                                            EmptyDataText="No se encontraron Medicos Registrados" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
+                                            <Columns>
+                                                <asp:TemplateField HeaderText="Especialidad" ItemStyle-HorizontalAlign="Left">
+                                                    <ItemTemplate>
+                                                        <asp:Literal ID="LtlEspecialidad" runat="server" Text='<%# Eval("Especialidad") %>'></asp:Literal>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+                                                <asp:TemplateField HeaderText="Estatus" ItemStyle-HorizontalAlign="Center">
+                                                    <ItemTemplate>
+                                                        <asp:Literal ID="LtlEstatus" runat="server" Text='<%# Eval("EstatusStr") %>'></asp:Literal>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+                                                <asp:TemplateField HeaderText="Fecha Ing." ItemStyle-HorizontalAlign="Center">
+                                                    <ItemTemplate>
+                                                        <asp:Literal ID="LtlFechaIng" runat="server" Text='<%# Eval("FechaIng", "{0:d}") %>'></asp:Literal>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+                                                <asp:TemplateField HeaderText="Usuario" ItemStyle-HorizontalAlign="Center">
+                                                    <ItemTemplate>
+                                                        <asp:Literal ID="LtlUsuario" runat="server" Text='<%# Eval("Usuario") %>'></asp:Literal>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+                                                <asp:TemplateField ItemStyle-HorizontalAlign="center" HeaderText="Opciones" ItemStyle-Width="100px">
+                                                    <ItemTemplate>
+                                                        <asp:LinkButton ID="LnkEditarEspecialidad" runat="server" AlternateText="Editar" OnClick="LnkEditarEspecialidad_Click" CausesValidation="False" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
+                                                        <asp:LinkButton ID="LnkEliminarEspecialidad" OnClick="LnkEliminarEspecialidad_Click" runat="server" Visible="true" AlternateText="Reasignar" CausesValidation="False" CssClass="btn btn-circle btn-sm red" Text="<i title='Reasignar' class='icon-trash' title='Eliminar' ></i>" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+
+                                            </Columns>
+                                        </asp:GridView>
+
+                                    </div>
+                                </div>
+
+
+                            </ContentTemplate>
+                        </asp:UpdatePanel>
+
+                    </ContentTemplate>
+                </ajax:TabPanel>
+
+                <ajax:TabPanel ID="TabSubEspecialidad" runat="server" HeaderText="SubEspecialidades" ClientIDMode="Static">
+                    <ContentTemplate>
+
+                        <asp:UpdatePanel ID="UpSubEspecialidad" runat="server" UpdateMode="Conditional">
+                            <ContentTemplate>
+
+                                <div class="row" style="margin-left: 0px; margin-top: 5px; 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}')", GvSubEspecialidad.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                                    <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvSubEspecialidad.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                                </div>
+                                <div class="row">
+                                    <div class="col-md-12">
+
+                                        <asp:GridView ID="GvSubEspecialidad" runat="server" AutoGenerateColumns="False"
+                                            DataKeyNames="CveMedicoSubEspecialidad,CveMedicoEspecialidad,SubEspecialidad,Estatus"
+                                            EmptyDataText="No se encontraron Medicos Registrados" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
+                                            <Columns>
+                                                <asp:TemplateField HeaderText="Sub Especialidad" ItemStyle-HorizontalAlign="Left">
+                                                    <ItemTemplate>
+                                                        <asp:Literal ID="LtlSubEspecialidad" runat="server" Text='<%# Eval("SubEspecialidad") %>'></asp:Literal>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+                                                 <asp:TemplateField HeaderText="Especialidad" ItemStyle-HorizontalAlign="Left">
+                                                    <ItemTemplate>
+                                                        <asp:Literal ID="LtlEspecialidad" runat="server" Text='<%# Eval("Especialidad") %>'></asp:Literal>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+                                                <asp:TemplateField HeaderText="Estatus" ItemStyle-HorizontalAlign="Center">
+                                                    <ItemTemplate>
+                                                        <asp:Literal ID="LtlEstatus" runat="server" Text='<%# Eval("EstatusStr") %>'></asp:Literal>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+                                                <asp:TemplateField HeaderText="Fecha Ing." ItemStyle-HorizontalAlign="Center">
+                                                    <ItemTemplate>
+                                                        <asp:Literal ID="LtlFechaIng" runat="server" Text='<%# Eval("FechaIng", "{0:d}") %>'></asp:Literal>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+                                                <asp:TemplateField HeaderText="Usuario" ItemStyle-HorizontalAlign="Center">
+                                                    <ItemTemplate>
+                                                        <asp:Literal ID="LtlUsuario" runat="server" Text='<%# Eval("Usuario") %>'></asp:Literal>
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+                                                <asp:TemplateField ItemStyle-HorizontalAlign="center" HeaderText="Opciones" ItemStyle-Width="100px">
+                                                    <ItemTemplate>
+                                                        <asp:LinkButton ID="LnkEditarSubEspecialidad" runat="server" AlternateText="Editar" OnClick="LnkEditarSubEspecialidad_Click" CausesValidation="False" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
+                                                        <asp:LinkButton ID="LnkEliminarSubEspecialidad" OnClick="LnkEliminarSubEspecialidad_Click" runat="server" Visible="true" AlternateText="Reasignar" CausesValidation="False" CssClass="btn btn-circle btn-sm red" Text="<i title='Reasignar' class='icon-trash' title='Eliminar' ></i>" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />
+                                                    </ItemTemplate>
+                                                </asp:TemplateField>
+
+
+                                            </Columns>
+                                        </asp:GridView>
+
+                                    </div>
+                                </div>
+
+
+                            </ContentTemplate>
+                        </asp:UpdatePanel>
+
+                    </ContentTemplate>
+                </ajax:TabPanel>
+
+            </ajax:TabContainer>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+
+     <div id="DVAgregarEspecialidad" class="modal ADS fade" role="dialog">
+        <div class="modal-dialog" style="width: 450px;">
+            <asp:UpdatePanel runat="server" class="modal-content" ID="UpModalEspecialidad" UpdateMode="Conditional">
+                <ContentTemplate>
+                    <div class="modal-header ">
+                        <button type="button" class="close" data-dismiss="modal">×</button>
+                        <h4 class="modal-title">
+                            <asp:Literal ID="Literal2" runat="server">Agregar Especialidad</asp:Literal></h4>
+                    </div>
+                    <div class="modal-body">
+                        <div class="row">
+                            <div class="col-md-12">
+
+                                <div class="form-group form-md-line-input input-iconright">
+                                    <asp:TextBox ID="TxtEspecialidad" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
+                                    <asp:RequiredFieldValidator ID="RfvTxtEspecialidad" runat="server" ControlToValidate="TxtEspecialidad" CssClass="help-block errorimput"
+                                        ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Especialidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarEspecialidad"></asp:RequiredFieldValidator>
+                                    <label for="<%= TxtEspecialidad.ClientID.ToString()%>">Especialidad:</label>
+                                </div>
+                            </div>
+                        </div>
+                        <div class="form-group form-md-line-input input-iconright" id="DVEstatusEspecialidad" runat="server" visible="false">
+                            <asp:CheckBox ID="ChkEstatusEspecialidad" CssClass="form-control make-switchsd" data-size="small" runat="server" Style="margin-top: 7px"></asp:CheckBox>
+                            <label for="<%= ChkEstatusEspecialidad.ClientID.ToString()%>">Activo:</label>
+                        </div>
+
+                    </div>
+
+                    <div class="modal-footer">
+                        <asp:Button ID="BtnAgergarEspecialidad" OnClick="BtnAgergarEspecialidad_Click" runat="server" class="btn btn-success" Text="Guardar" ValidationGroup="GrpGuardarEspecialidad" />
+                        <button id="Button2" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
+                    </div>                    
+                </ContentTemplate>
+            </asp:UpdatePanel>
+        </div>
+    </div>
+
+
+    <div id="DVAgregarSubEspecialidad" class="modal ADS fade" role="dialog">
+        <div class="modal-dialog" style="width: 450px;">
+            <asp:UpdatePanel runat="server" class="modal-content" ID="UpModalSubEspecialidad" UpdateMode="Conditional">
+                <ContentTemplate>
+                    <div class="modal-header ">
+                        <button type="button" class="close" data-dismiss="modal">×</button>
+                        <h4 class="modal-title">
+                            <asp:Literal ID="Literal1" runat="server">Agregar Sub Especialidad</asp:Literal></h4>
+                    </div>
+                    <div class="modal-body">
+                        <div class="row">
+                               <div class="col-md-12">
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <asp:DropDownList ID="DdlEspecialidad" CssClass="form-control select2me" runat="server" DataTextField="Especialidad" DataValueField="CveMedicoEspecialidad" Width="100%" CausesValidation="true" ></asp:DropDownList>
+                                            <asp:RequiredFieldValidator ID="RfvDdlEspecialidad" runat="server" ControlToValidate="DdlEspecialidad" CssClass="help-block errorimput" InitialValue="-1"
+                                        ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Especialidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarSubEspecialidad"></asp:RequiredFieldValidator>
+                                            <label for="<%= DdlEspecialidad.ClientID.ToString()%>">Especialidad:</label>
+                                        </div>
+                                    </div>
+
+                            <div class="col-md-12">
+
+                                <div class="form-group form-md-line-input input-iconright">
+                                    <asp:TextBox ID="TxtSubEspecialidad" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
+                                    <asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server" ControlToValidate="TxtSubEspecialidad" CssClass="help-block errorimput"
+                                        ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Sub Especialidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarSubEspecialidad"></asp:RequiredFieldValidator>
+                                    <label for="<%= TxtSubEspecialidad.ClientID.ToString()%>">Sub Especialidad:</label>
+                                </div>
+                            </div>
+                        </div>
+                        <div class="form-group form-md-line-input input-iconright" id="DVEstatusSubEspecialidad" runat="server" visible="false">
+                            <asp:CheckBox ID="ChkEstatusSubEspecialidad" CssClass="form-control make-switchsd" data-size="small" runat="server" Style="margin-top: 7px"></asp:CheckBox>
+                            <label for="<%= ChkEstatusSubEspecialidad.ClientID.ToString()%>">Activo:</label>
+                        </div>
+
+                    </div>
+
+                    <div class="modal-footer">
+                        <asp:Button ID="BtnAgergarSubEspecialidad" OnClick="BtnAgergarSubEspecialidad_Click" runat="server" class="btn btn-success" Text="Guardar" ValidationGroup="GrpGuardarSubEspecialidad" />
+                        <button id="Button3" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
+                    </div>                    
+                </ContentTemplate>
+            </asp:UpdatePanel>
+        </div>
+    </div>
+
+
+ 
+
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
+
+
+  
+</asp:Content>

Ventas/CatEspecialidadesSubEspecialidades.aspx.vb

@@ -0,0 +1,291 @@
+Option Explicit On
+Option Strict On
+
+Imports Extensiones
+Imports Microsoft.Extensions.Primitives
+
+Partial Class Ventas_CatEspecialidadesSubEspecialidades
+    Inherits ClsPaginas
+
+
+    Public Property CveMedicoEspecialidad As Integer
+        Get
+            If ViewState("CveMedicoEspecialidad") Is Nothing Then
+                ViewState("CveMedicoEspecialidad") = -1
+            End If
+            Return ViewState("CveMedicoEspecialidad").ToString.ToEntero
+        End Get
+        Set(value As Integer)
+            ViewState("CveMedicoEspecialidad") = value
+        End Set
+    End Property
+
+    Public Property CveMedicoSubEspecialidad As Integer
+        Get
+            If ViewState("CveMedicoSubEspecialidad") Is Nothing Then
+                ViewState("CveMedicoSubEspecialidad") = -1
+            End If
+            Return ViewState("CveMedicoSubEspecialidad").ToString.ToEntero
+        End Get
+        Set(value As Integer)
+            ViewState("CveMedicoSubEspecialidad") = value
+        End Set
+    End Property
+
+
+    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
+        If Not Page.IsPostBack Then
+            CargaEspecialidad()
+            CargaSubEspecialidad()
+        End If
+    End Sub
+
+#Region "EXCEL"
+
+    Private Sub LnkExportar_Click(sender As Object, e As EventArgs) Handles LnkExportar.Click
+
+
+        If Tabs.ActiveTabIndex = 0 Then
+            GvEspecialidad.Columns(4).Visible = False
+            Dim SbFiltros As New StringBuilder()
+
+            GvEspecialidad.ExportToExcelGembox("CatEspecialidades", UsuarioActual, "Catálogo de Especialidades", DatoTituloExtra:=$"", DatosFiltros:=SbFiltros.ToString())
+            GvEspecialidad.Columns(4).Visible = True
+        ElseIf Tabs.ActiveTabIndex = 1 Then
+            GvEspecialidad.Columns(5).Visible = False
+            Dim SbFiltros As New StringBuilder()
+
+            GvEspecialidad.ExportToExcelGembox("CatSubEspecialidades", UsuarioActual, "Catálogo De Sub Especialidades", DatoTituloExtra:=$"", DatosFiltros:=SbFiltros.ToString())
+            GvEspecialidad.Columns(5).Visible = True
+        End If
+
+
+    End Sub
+
+    Public Overrides Sub VerifyRenderingInServerForm(ByVal control As Control)
+    End Sub
+
+#End Region
+
+
+
+
+#Region "Especialidad"
+
+
+    Protected Sub LnkAgregarEspecialidad_Click(sender As Object, e As EventArgs)
+        CveMedicoEspecialidad = -1
+        DVEstatusEspecialidad.Visible = False
+        LimpiarModalEspecialdiad()
+        RegistraScript("$('#DVAgregarEspecialidad').modal();")
+
+    End Sub
+
+    Protected Sub BtnAgergarEspecialidad_Click(sender As Object, e As EventArgs)
+
+        Dim ObjVentas As New ClsVentas
+        Dim ProcesoOK As Boolean = True
+
+        If CveMedicoEspecialidad > 0 Then
+            If Not ObjVentas.UpdateMedicoEspecialidad(CveMedicoEspecialidad, TxtEspecialidad.Text.Trim, ChkEstatusEspecialidad.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+                ProcesoOK = False
+            End If
+        Else
+            If Not ObjVentas.AddMedicoEspecialidad(TxtEspecialidad.Text.Trim, True, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+                ProcesoOK = False
+            End If
+        End If
+
+        ObjVentas.Dispose()
+
+        If ProcesoOK Then
+            CargaEspecialidad()
+            Alert($"Especialidad {If(CveMedicoEspecialidad > 0, "actualizada", "agregada")} correctamente.")
+            RegistraScript("$('#DVAgregarEspecialidad').modal('hide');")
+        End If
+
+    End Sub
+
+    Sub LimpiarModalEspecialdiad()
+        TxtEspecialidad.Text = ""
+        ChkEstatusEspecialidad.Checked = True
+        UpModalEspecialidad.Update()
+    End Sub
+    Sub CargaEspecialidad()
+        Dim ObjVentas As New ClsVentas
+
+        If ObjVentas.GetMedicosEspecialidades(-1, UsuarioActual.CveEmpresa, -1) Then
+            GvEspecialidad.DataSource = ObjVentas.DtResultados
+            DdlEspecialidad.DataSource = ObjVentas.DtResultados
+        Else
+            GvEspecialidad.DataSource = Nothing
+        End If
+
+        ObjVentas.Dispose()
+
+        GvEspecialidad.DataBind()
+
+        DdlEspecialidad.DataBind()
+        DdlEspecialidad.Items.Insert(0, New ListItem("Seleccione uno", "-1"))
+
+
+        UpEspecialidad.Update()
+
+    End Sub
+
+    Protected Sub LnkEditarEspecialidad_Click(sender As Object, e As EventArgs)
+
+        Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
+
+
+        CveMedicoEspecialidad = GvRow.DataKey("CveMedicoEspecialidad").ToEntero
+        TxtEspecialidad.Text = GvRow.DataKey("Especialidad")
+        ChkEstatusEspecialidad.Checked = Boolean.Parse(GvRow.DataKey("Estatus").ToString)
+        DVEstatusEspecialidad.Visible = True
+        UpModalEspecialidad.Update()
+
+        RegistraScript("$('#DVAgregarEspecialidad').modal();")
+
+
+
+    End Sub
+
+    Protected Sub LnkEliminarEspecialidad_Click(sender As Object, e As EventArgs)
+
+        Dim ProcesoOK As Boolean = True
+
+        Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
+
+        Dim CveMedicoEspecialidadEliminar As Integer = GvRow.DataKey("CveMedicoEspecialidad").ToEntero
+
+        Dim ObjVentas As New ClsVentas
+
+        If Not ObjVentas.RemoveMedicoEspecialidad(CveMedicoEspecialidadEliminar, UsuarioActual.CveEmpresa) Then
+            ProcesoOK = False
+        End If
+
+        ObjVentas.Dispose()
+
+        If ProcesoOK Then
+            CargaEspecialidad()
+            Alert("Especialidad eliminada correctamente")
+        End If
+
+
+    End Sub
+#End Region
+
+
+
+#Region "SubEspecialidad"
+
+
+    Protected Sub LnkAgregarSubEspecialidad_Click(sender As Object, e As EventArgs)
+        CveMedicoSubEspecialidad = -1
+        DVEstatusSubEspecialidad.Visible = False
+        LimpiarModalSubEspecialdiad()
+        RegistraScript("$('#DVAgregarSubEspecialidad').modal();")
+
+    End Sub
+
+    Protected Sub BtnAgergarSubEspecialidad_Click(sender As Object, e As EventArgs)
+
+        Dim ObjVentas As New ClsVentas
+        Dim ProcesoOK As Boolean = True
+
+        If CveMedicoSubEspecialidad > 0 Then
+            If Not ObjVentas.UpdateMedicoSubEspecialidad(CveMedicoSubEspecialidad, DdlEspecialidad.SelectedValue.ToEntero, TxtSubEspecialidad.Text.Trim, ChkEstatusSubEspecialidad.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+                ProcesoOK = False
+            End If
+        Else
+            If Not ObjVentas.AddMedicoSubEspecialidad(DdlEspecialidad.SelectedValue.ToEntero, TxtSubEspecialidad.Text.Trim, True, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+                ProcesoOK = False
+            End If
+        End If
+
+        ObjVentas.Dispose()
+
+        If ProcesoOK Then
+            CargaSubEspecialidad()
+            Alert($"SubEspecialidad {If(CveMedicoSubEspecialidad > 0, "actualizada", "agregada")} correctamente.")
+            RegistraScript("$('#DVAgregarSubEspecialidad').modal('hide');")
+        End If
+
+    End Sub
+
+    Sub LimpiarModalSubEspecialdiad()
+        DdlEspecialidad.SelectedValueExist(-1)
+        TxtSubEspecialidad.Text = ""
+        ChkEstatusSubEspecialidad.Checked = True
+        UpModalSubEspecialidad.Update()
+    End Sub
+    Sub CargaSubEspecialidad()
+        Dim ObjVentas As New ClsVentas
+
+        If ObjVentas.GetMedicosSubEspecialidades(-1, UsuarioActual.CveEmpresa, -1) Then
+            GvSubEspecialidad.DataSource = ObjVentas.DtResultados
+        Else
+            GvSubEspecialidad.DataSource = Nothing
+        End If
+
+        ObjVentas.Dispose()
+
+        GvSubEspecialidad.DataBind()
+
+        UpSubEspecialidad.Update()
+
+    End Sub
+
+    Protected Sub LnkEditarSubEspecialidad_Click(sender As Object, e As EventArgs)
+
+        Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
+
+
+        CveMedicoSubEspecialidad = GvRow.DataKey("CveMedicoSubEspecialidad").ToEntero
+        Dim CveMedicoEspecialidad = GvRow.DataKey("CveMedicoEspecialidad").ToEntero
+
+        DdlEspecialidad.SelectedValueExist(CveMedicoEspecialidad)
+        TxtSubEspecialidad.Text = GvRow.DataKey("SubEspecialidad")
+        ChkEstatusSubEspecialidad.Checked = Boolean.Parse(GvRow.DataKey("Estatus").ToString)
+        DVEstatusSubEspecialidad.Visible = True
+        UpModalSubEspecialidad.Update()
+
+        RegistraScript("$('#DVAgregarSubEspecialidad').modal();")
+
+
+
+    End Sub
+
+    Protected Sub LnkEliminarSubEspecialidad_Click(sender As Object, e As EventArgs)
+
+        Dim ProcesoOK As Boolean = True
+
+        Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
+
+        Dim CveMedicoSubEspecialidadEliminar As Integer = GvRow.DataKey("CveMedicoSubEspecialidad").ToEntero
+
+        Dim ObjVentas As New ClsVentas
+
+        If Not ObjVentas.RemoveMedicoSubEspecialidad(CveMedicoSubEspecialidadEliminar, UsuarioActual.CveEmpresa) Then
+            ProcesoOK = False
+        End If
+
+        ObjVentas.Dispose()
+
+        If ProcesoOK Then
+            CargaSubEspecialidad()
+            Alert("Sub Especialidad eliminada correctamente")
+        End If
+
+
+    End Sub
+#End Region
+
+
+
+
+
+
+
+
+End Class

Ventas/CatMedicos.aspx

@@ -20,7 +20,7 @@
                 <asp:LinkButton runat="server" ID="LnkAgregarMedico" OnClick="LnkAgregarMedico_Click" data-toggle="tooltip" data-placement="left" title="Agregar Medico" Text="<i class='fa fa-plus'></i> Agregar Medico"></asp:LinkButton>
             </li>
             <li>
-                <asp:LinkButton runat="server" ID="LnkAgregarEspecialidad" OnClick="LnkAgregarEspecialidad_Click" data-toggle="tooltip" data-placement="left" title="Agregar Medico" Text="<i class='fa fa-plus'></i> Agregar Especialidad"></asp:LinkButton>
+                <asp:LinkButton runat="server" ID="LnkAgregarEspecialidad" Visible="false" OnClick="LnkAgregarEspecialidad_Click" data-toggle="tooltip" data-placement="left" title="Agregar Medico" Text="<i class='fa fa-plus'></i> Agregar Especialidad"></asp:LinkButton>
             </li>
 
              <li>
@@ -225,7 +225,7 @@
                             <div class="col-md-12">
 
                                 <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False"
-                                    DataKeyNames="CveMedico, Medico, CedulaProfesional, FechaNacimiento, Notas, DiasAtencion, Horario, Lugar, Estatus, CveUsuario, FechaIng, CveEmpresa,Telefono, Mail, CveMedicoEspecialidad, Celular, Consultorio"
+                                    DataKeyNames="CveMedico,Medico,CedulaProfesional,FechaNacimiento,Notas,DiasAtencion,Horario,Lugar,Estatus,CveUsuario,FechaIng,CveEmpresa,Telefono,Mail,CveMedicoEspecialidad,CveMedicoSubEspecialidad,Celular,Consultorio,Torre"
                                     EmptyDataText="No se encontraron Medicos Registrados" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
                                     <Columns>
                                         <asp:TemplateField HeaderText="Médico" ItemStyle-HorizontalAlign="Left">
@@ -311,7 +311,7 @@
         </ajax:TabPanel>
 
 
-              <ajax:TabPanel ID="TabEspeciliadad" runat="server" HeaderText="Especialidades" ClientIDMode="Static">        
+              <ajax:TabPanel ID="TabEspeciliadad" runat="server" HeaderText="Especialidades" ClientIDMode="Static" Visible="false">        
             <ContentTemplate>
 
                 <asp:UpdatePanel ID="UpEspecialidad" runat="server" UpdateMode="Conditional">
@@ -471,12 +471,25 @@
                                             <label for="<%= TxtMail.ClientID.ToString()%>">Correo:</label>
                                         </div>
                                     </div>
+                                    <div class="col-md-6">
+                                       
+                                    </div>                                    
+                                </div>
+
+                                
+                                <div class="row">
                                     <div class="col-md-6">
                                         <div class="form-group form-md-line-input input-iconright">
-                                            <asp:DropDownList ID="DdlEspecialidad" CssClass="form-control select2me" runat="server" DataTextField="Especialidad" DataValueField="CveMedicoEspecialidad"></asp:DropDownList>
+                                            <asp:DropDownList ID="DdlEspecialidad" CssClass="form-control select2me" runat="server" DataTextField="Especialidad" Width="100%" DataValueField="CveMedicoEspecialidad" AutoPostBack="true" OnSelectedIndexChanged="DdlEspecialidad_SelectedIndexChanged"></asp:DropDownList>
                                             <label for="<%= DdlEspecialidad.ClientID.ToString()%>">Especialidad:</label>
                                         </div>
                                     </div>
+                                    <div class="col-md-6">                                   
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <asp:DropDownList ID="DdlSubEspecialidad" CssClass="form-control select2me" runat="server" DataTextField="SubEspecialidad" Width="100%"  DataValueField="CveMedicoSubEspecialidad"></asp:DropDownList>
+                                            <label for="<%= DdlEspecialidad.ClientID.ToString()%>">Sub Especialidad:</label>
+                                        </div>
+                                    </div>
                                 </div>
 
 
@@ -512,12 +525,18 @@
                                             <label for="<%= TxtLugar.ClientID.ToString()%>">Hospital:</label>
                                         </div>
                                     </div>
-                                    <div class="col-md-6">
+                                    <div class="col-md-3">
                                         <div class="form-group form-md-line-input input-iconright">
                                             <asp:TextBox ID="TxtConsultorio" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
                                             <label for="<%= TxtConsultorio.ClientID.ToString()%>">Consultorio:</label>
                                         </div>
                                     </div>
+                                    <div class="col-md-3">
+                                         <div class="form-group form-md-line-input input-iconright">
+                                            <asp:TextBox ID="TxtTorre" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
+                                            <label for="<%= TxtTorre.ClientID.ToString()%>">Torre:</label>
+                                        </div>
+                                    </div>
                                 </div>
 
 
@@ -560,7 +579,7 @@
                                     <asp:TextBox ID="TxtEspecialidad" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
                                     <asp:RequiredFieldValidator ID="RfvTxtEspecialidad" runat="server" ControlToValidate="TxtEspecialidad" CssClass="help-block errorimput"
                                         ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Especialidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarEspecialidad"></asp:RequiredFieldValidator>
-                                    <label for="<%= TxtMedico.ClientID.ToString()%>">Especialidad:</label>
+                                    <label for="<%= TxtEspecialidad.ClientID.ToString()%>">Especialidad:</label>
                                 </div>
                             </div>
                         </div>

Ventas/CatMedicos.aspx.vb

@@ -42,6 +42,7 @@ Partial Class Ventas_CatMedicos
             CargaCombos()
             CargaDatos()
             CargaEspecialidad()
+            CargaSubEspecialidad(-1)
             BtnConsultar_Click(Nothing, Nothing)
         End If
     End Sub
@@ -80,12 +81,12 @@ Partial Class Ventas_CatMedicos
 
         If CveMedico > 0 Then
             If ObjVentas.UpdateMedico(CveMedico, TxtMedico.Text.Trim, TxtCedulaProfecional.Text.Trim, TxtFechaNacimiento.Text.ToDate, TxtNotas.Text.Trim, TxtDiasAtencion.Text.Trim, TxtHorario.Text.Trim, TxtLugar.Text.Trim, ChkEstatus.Checked,
-                                      UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, Telefono, TxtMail.Text, DdlEspecialidad.SelectedValue.ToEntero, Celular, TxtConsultorio.Text.Trim) Then
+                                      UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, Telefono, TxtMail.Text, DdlEspecialidad.SelectedValue.ToEntero, Celular, TxtConsultorio.Text.Trim, DdlSubEspecialidad.SelectedValue.ToEntero, TxtTorre.Text.Trim) Then
                 ProcesoOK = True
             End If
         Else
             If ObjVentas.AddMedico(TxtMedico.Text.Trim, TxtCedulaProfecional.Text.Trim, TxtFechaNacimiento.Text.ToDate, TxtNotas.Text.Trim, TxtDiasAtencion.Text.Trim, TxtHorario.Text.Trim, TxtLugar.Text.Trim, ChkEstatus.Checked, UsuarioActual.CveUsuario,
-                                   UsuarioActual.CveEmpresa, Telefono, TxtMail.Text, DdlEspecialidad.SelectedValue.ToEntero, Celular, TxtConsultorio.Text.Trim) Then
+                                   UsuarioActual.CveEmpresa, Telefono, TxtMail.Text, DdlEspecialidad.SelectedValue.ToEntero, Celular, TxtConsultorio.Text.Trim, DdlSubEspecialidad.SelectedValue.ToEntero, TxtTorre.Text.Trim) Then
                 ProcesoOK = True
             End If
         End If
@@ -144,7 +145,7 @@ Partial Class Ventas_CatMedicos
     Public Sub LnkAgregarMedico_Click(sender As Object, e As EventArgs)
 
         LbAgregar.Text = "Agregar"
-        LtlTituloModal.Text = "Agregar Medico"
+        LtlTituloModal.Text = "Agregar Médico"
 
         TxtMedico.Text = ""
         TxtCedulaProfecional.Text = ""
@@ -158,6 +159,8 @@ Partial Class Ventas_CatMedicos
         TxtTelefono.Text = ""
         TxtCelular.Text = ""
         DdlEspecialidad.SelectedValueExist(-1)
+        DdlSubEspecialidad.SelectedValueExist(-1)
+        TxtTorre.Text = ""
 
         DVEstatus.Visible = False
         ChkEstatus.Checked = True
@@ -189,10 +192,13 @@ Partial Class Ventas_CatMedicos
         TxtCelular.Text = GvRow.DataKey("Celular")
         DdlEspecialidad.SelectedValueExist(-1)
         DdlEspecialidad.SelectedValueExist(GvRow.DataKey("CveMedicoEspecialidad").ToEntero)
+        CargaSubEspecialidad(GvRow.DataKey("CveMedicoEspecialidad").ToEntero)
+        DdlSubEspecialidad.SelectedValueExist(GvRow.DataKey("CveMedicoSubEspecialidad").ToEntero)
+        TxtTorre.Text = GvRow.DataKey("Torre")
 
         DVEstatus.Visible = True
         LbAgregar.Text = "Actualizar"
-        LtlTituloModal.Text = $"Actualizar Medico {TxtCedulaProfecional.Text}"
+        LtlTituloModal.Text = $"Actualizar Médico {TxtCedulaProfecional.Text}"
 
         UpModal.Update()
         RegistraScript("$('#DVAgregarMedico').modal();")
@@ -373,6 +379,7 @@ Partial Class Ventas_CatMedicos
         ChkEstatusEspecialidad.Checked = True
         UpModalEspecialidad.Update()
     End Sub
+
     Sub CargaEspecialidad()
         Dim ObjVentas As New ClsVentas
 
@@ -395,6 +402,26 @@ Partial Class Ventas_CatMedicos
 
     End Sub
 
+
+    Sub CargaSubEspecialidad(CveMedicoEspecialidad As Integer)
+        Dim ObjVentas As New ClsVentas
+
+        If ObjVentas.GetMedicosSubEspecialidades(-1, UsuarioActual.CveEmpresa, -1) Then
+            If CveMedicoEspecialidad > 0 Then
+                DdlSubEspecialidad.DataSource = ObjVentas.DtResultados.FiltraParametros($"CveMedicoEspecialidad = {CveMedicoEspecialidad}")
+            Else
+                DdlSubEspecialidad.DataSource = ObjVentas.DtResultados
+            End If
+        End If
+
+        ObjVentas.Dispose()
+
+        DdlSubEspecialidad.DataBind()
+        DdlSubEspecialidad.Items.Insert(0, New ListItem("Seleccione uno", "-1"))
+        UpModal.Update()
+
+    End Sub
+
     Protected Sub LnkEditarEspecialidad_Click(sender As Object, e As EventArgs)
 
         Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
@@ -440,6 +467,10 @@ Partial Class Ventas_CatMedicos
 
 
 
+    Protected Sub DdlEspecialidad_SelectedIndexChanged(sender As Object, e As EventArgs)
+        CargaSubEspecialidad(DdlEspecialidad.SelectedValue.ToEntero)
+    End Sub
+
 
 
 

Ventas/Clientes.aspx

@@ -735,7 +735,7 @@
                                                     <div class="col-md-10">
                                                         <div runat="server" class="form-group form-md-line-input input-iconright">
                                                             <asp:DropDownList ID="DdlPrecioLista" runat="server" CssClass="form-control select2me" Width="100%" DataTextField="PrecioLista" DataValueField="CvePrecioLista"></asp:DropDownList>
-                                                              <asp:RequiredFieldValidator    ID="RfvDdlPrecioLista" InitialValue="-1" runat="server" CssClass="help-block errorimput" ControlToValidate="DdlPrecioLista" 
+                                                              <asp:RequiredFieldValidator    ID="RfvDdlPrecioLista" Visible="false"  InitialValue="-1" runat="server" CssClass="help-block errorimput" ControlToValidate="DdlPrecioLista" 
                                                                 ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Lista de Precio''</b> es necesario, por favor ingréselo." 
                                                                 ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                             <label for="<%= DdlPrecioLista.ClientID.ToString()%>">Precio Lista:</label>

Ventas/Clientes.aspx.vb

@@ -2520,6 +2520,15 @@ Partial Class Clientes
 
             Dim CvePrecioLista As Integer = DdlPrecioLista.SelectedValue.ToEntero()
 
+
+            If Not ErrorProceso Then
+                If UsuarioActual.Empresa.Funcionalidad(404) = "30" AndAlso UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso DdlAlmacenAsignado.SelectedValue.ToEntero = -1 Then 'limpiar ddl alamcen temporal que se  agrego temporalmente
+                    If Not GeneraGuardaAlmacenCliente(ObjClientes.IniciaTransacSQL) Then
+                        ErrorProceso = True
+                    End If
+                End If
+            End If
+
             If Not ErrorProceso Then
                 'VERIFICA SI ES CLIENTE NUEVO O ACTUALIZACION
                 If Me.CveCliente = -1 Then
@@ -2642,13 +2651,16 @@ Partial Class Clientes
             ObjClientes.RollBack()
             CargaPrecioLista()
             Alert("Ocurrió un error al guardar.", TipoMensaje.MsgError)
+
+            If UsuarioActual.Empresa.Funcionalidad(404) = "30" And UsuarioActual.Empresa.Funcionalidad(578) = "1" Then 'limpiar ddl alamcen temporal que se  agrego temporalmente
+                CargaDdlAlmacen()
+            End If
         Else
             ObjClientes.Commit()
 
             If CveClienteNuevo > 0 Then
                 ViewState("CveCliente") = CveClienteNuevo
             End If
-
         End If
 
         ObjClientes.Dispose()
@@ -5974,14 +5986,26 @@ Partial Class Clientes
             DdlSATPais.Items.Add(New ListItem("Guatemala", "GTM"))
         End If
 
+        CargaDdlAlmacen()
+
+    End Sub
+
+    Private Sub CargaDdlAlmacen()
+
+
 
         If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
+
+            DdlAlmacenAsignado.SelectedValue = Nothing
+            DdlAlmacenAsignado.ClearSelection()
+            DdlAlmacenAsignado.Items.Clear()
+
             divAlmacenAsignado.Visible = True
             DdlAlmacenAsignado.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
             DdlAlmacenAsignado.DataBind()
             DdlAlmacenAsignado.Items.Insert(0, New ListItem("-", "-1"))
-        End If
 
+        End If
     End Sub
 
     Protected Sub BtnCargaExcel_Click(sender As Object, e As EventArgs) Handles BtnCargaExcel.Click
@@ -10397,5 +10421,25 @@ Partial Class Clientes
 
     End Function
 
+    Private Function GeneraGuardaAlmacenCliente(ByRef transaccionSQL As SqlTransaction) As Boolean
+
+        Dim respuesta As Boolean = True
+        Dim ObjInv As New ClsInventarios(transaccionSQL)
+
+        If ObjInv.AddAlmacen(TxtNombre.Text.Trim, 1, 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, DdlSubProyecto.SelectedValue.ToEntero) Then
+
+            DdlAlmacenAsignado.Items.Add(New ListItem(TxtNombre.Text.Trim, ObjInv.CveAlmacenAgregado.ToString))
+            DdlAlmacenAsignado.SelectedValueExist(ObjInv.CveAlmacenAgregado.ToString)
+
+            GlobalDTAlmacen(UsuarioActual.CveEmpresa) = Nothing
+
+        Else
+            respuesta = False
+        End If
+
+        Return respuesta
+
+    End Function
+
 End Class
 

Ventas/ProductosServicios.aspx

@@ -1163,131 +1163,194 @@
 
 
                                                         <div class="row">
-                                                            <label class="col-md-4 truncate">ClaveSector COFEPRIS:</label>
+                                                            <label class="col-md-4 truncate">Clave Sector COFEPRIS:</label>
                                                             <div class="col-md-8">
-                                                                <asp:DropDownList ID="DdlClaveSectorCOFEPRIS" runat="server" CssStyle="width: 100%;" Width="200px"  DataTextField="SectorCOFEPRISClave" DataValueField="CveSectorCOFEPRIS" CssClass="form-control input-sm select2me"></asp:DropDownList>
+                                                                <asp:DropDownList ID="DdlClaveSectorCOFEPRIS" runat="server" CssStyle="width: 100%;" Width="200px"  DataTextField="SectorCOFEPRISClave" DataValueField="CveSectorCOFEPRIS" 
+                                                                    CssClass="form-control input-sm select2me" OnSelectedIndexChanged="DdlClaveSectorCOFEPRIS_SelectedIndexChanged" AutoPostBack="true"></asp:DropDownList>
                                                             </div>
                                                         </div>                                                        
 
-                                                          <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVNombreIngredienteActivo" >
-                                                            <label class="col-md-4 truncate">Clave Forma Farmaceutica:</label>
-                                                            <div class="col-md-8">
-                                                                <asp:DropDownList ID="DdlClaveFormaFarmaceutica" runat="server" CssStyle="width: 100%;" Width="200px" DataTextField="FormaFarmaceuticaClave" DataValueField="CveFormaFarmaceutica" CssClass="form-control input-sm select2me"></asp:DropDownList>
-                                                            </div>
-                                                        </div>
-
-                                                        <div class="row">
                                                           <label class="col-md-4 truncate">Nombre Ingrediente Activo:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtNombreIngredienteActivo" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtNombreIngredienteActivo" runat="server" ControlToValidate="TxtNombreIngredienteActivo" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nombre Ingrediente Activo''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVNomQuimico" >
                                                           <label class="col-md-4 truncate">Nom Quimico:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtNomQuimico" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtNomQuimico" runat="server" ControlToValidate="TxtNomQuimico" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nom Quimico''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVDenominacionGenerica" >
                                                           <label class="col-md-4 truncate">Denominacion Generica:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtDenominacionGenerica" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtDenominacionGenerica" runat="server" ControlToValidate="TxtDenominacionGenerica" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Denominacion Generica''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVDenominacionDistintiva" >
                                                           <label class="col-md-4 truncate">Denominacion Distintiva:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtDenominacionDistintiva" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtDenominacionDistintiva" runat="server" ControlToValidate="TxtDenominacionDistintiva" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Denominacion Distintiva''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVFabricante" >
                                                           <label class="col-md-4 truncate">Fabricante:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtFabricante" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtFabricante" runat="server" ControlToValidate="TxtFabricante" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fabricante''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                          <div class="row" runat="server" visible="false" id="DVClaveFormaFarmaceutica" >
+                                                            <label class="col-md-4 truncate">Clave Forma Farmaceutica:</label>
+                                                            <div class="col-md-8">
+                                                                <asp:DropDownList ID="DdlClaveFormaFarmaceutica" runat="server" CssStyle="width: 100%;" Width="200px" DataTextField="FormaFarmaceuticaClave" DataValueField="CveFormaFarmaceutica" CssClass="form-control input-sm select2me"></asp:DropDownList>
+                                                                <asp:RequiredFieldValidator ID="RfvDdlClaveFormaFarmaceutica" runat="server" InitialValue="-1" ControlToValidate="DdlClaveFormaFarmaceutica" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Clave Forma Farmaceutica''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+
+                                                            </div>
+                                                        </div>
+
+                                                        <div class="row" runat="server" visible="false" id="DVCondicionesTransporte" >
                                                           <label class="col-md-4 truncate">Condiciones Transporte:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtCondicionesTransporte" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtCondicionesTransporte" runat="server" ControlToValidate="TxtCondicionesTransporte" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Condiciones Transporte''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVRegistroSanitarioAutorizacion" >
                                                           <label class="col-md-4 truncate">Registro Sanitario Autorizacion:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtRegistroSanitarioAutorizacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtRegistroSanitarioAutorizacion" runat="server" ControlToValidate="TxtRegistroSanitarioAutorizacion" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Registro Sanitario Autorizacion''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
-                                                          <label class="col-md-4 truncate">Permiso Importacion:</label>
-                                                          <div class="col-md-8">
-                                                            <asp:TextBox ID="TxtPermisoImportacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
-                                                          </div>
-                                                        </div>
                                                      
-                                                        <div class="row">
-                                                          <label class="col-md-4 truncate">Folio Importacion VUCEM:</label>
-                                                          <div class="col-md-8">
-                                                            <asp:TextBox ID="TxtFolioImportacionVUCEM" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
-                                                          </div>
-                                                        </div>
 
-                                                        <div class="row">
+                                                    
+
+                                                        <div class="row" runat="server" visible="false" id="DVNumCAS" >
                                                           <label class="col-md-4 truncate">Num CAS:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtNumCAS" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtNumCAS" runat="server" ControlToValidate="TxtNumCAS" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Num CAS''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
-                                                          <label class="col-md-4 truncate">Razon Social Emp Importacion:</label>
-                                                          <div class="col-md-8">
-                                                            <asp:TextBox ID="TxtRazonSocialEmpImportacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
-                                                          </div>
-                                                        </div>
                                                        
-                                                        <div class="row">
+
+                                                        <div class="row" runat="server" visible="false" id="DVNumRegistroPlagCOFEPRIS" >
                                                           <label class="col-md-4 truncate">Num Registro Plag COFEPRIS:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtNumRegistroPlagCOFEPRIS" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtNumRegistroPlagCOFEPRIS" runat="server" ControlToValidate="TxtNumRegistroPlagCOFEPRIS" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Num Registro Plag COFEPRIS''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVDatosFabricante" >
                                                           <label class="col-md-4 truncate">Datos Fabricante:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtDatosFabricante" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtDatosFabricante" runat="server" ControlToValidate="TxtDatosFabricante" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Datos Fabricante''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVDatosFormulador" >
                                                           <label class="col-md-4 truncate">Datos Formulador:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtDatosFormulador" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtDatosFormulador" runat="server" ControlToValidate="TxtDatosFormulador" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Datos Formulador''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVDatosMaquilador" >
                                                           <label class="col-md-4 truncate">Datos Maquilador:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtDatosMaquilador" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtDatosMaquilador" runat="server" ControlToValidate="TxtDatosMaquilador" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Datos Maquilador''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
-                                                        <div class="row">
+                                                        <div class="row" runat="server" visible="false" id="DVUsoAutorizado" >
                                                           <label class="col-md-4 truncate">Uso Autorizado:</label>
                                                           <div class="col-md-8">
                                                             <asp:TextBox ID="TxtUsoAutorizado" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtUsoAutorizado" runat="server" ControlToValidate="TxtUsoAutorizado" CssClass="help-block errorimput" Display="Dynamic"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Uso Autorizado''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                           </div>
                                                         </div>
 
+
+
+
+
+                                                        <div class="row" runat="server" visible="true" id="DVPermisoImportacion" >
+                                                          <label class="col-md-4 truncate">Permiso Importacion:</label>
+                                                          <div class="col-md-8">
+                                                            <asp:TextBox ID="TxtPermisoImportacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtPermisoImportacion" runat="server" ControlToValidate="TxtPermisoImportacion" CssClass="help-block errorimput" Display="Dynamic" Visible="false"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Permiso Importacion:''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                                                          </div>
+                                                        </div>
+                                                        <div class="row" runat="server" visible="true" id="DVRazonSocialEmpImportacion" >
+                                                          <label class="col-md-4 truncate">Razon Social Emp Importacion:</label>
+                                                          <div class="col-md-8">
+                                                            <asp:TextBox ID="TxtRazonSocialEmpImportacion" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtRazonSocialEmpImportacion" runat="server" ControlToValidate="TxtRazonSocialEmpImportacion" CssClass="help-block errorimput" Display="Dynamic" Visible="false"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Razon Social Emp Importacion''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                                                          </div>
+                                                        </div>
+                                                        <div class="row" runat="server" visible="true" id="DVFolioImportacionVUCEM" >
+                                                          <label class="col-md-4 truncate">Folio Importacion VUCEM:</label>
+                                                          <div class="col-md-8">
+                                                            <asp:TextBox ID="TxtFolioImportacionVUCEM" runat="server" Width="200px" Class="form-control input-sm" MaxLength="50"></asp:TextBox>
+                                                              <asp:RequiredFieldValidator ID="RfvTxtFolioImportacionVUCEM" runat="server" ControlToValidate="TxtFolioImportacionVUCEM" CssClass="help-block errorimput" Display="Dynamic" Visible="false"
+                                                                    ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Folio Importacion VUCEM''</b> es necesario, por favor ingréselo." 
+                                                                    ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                                                          </div>
+                                                        </div>
+
+
+
                                                     </div>
                                                 </div>
                                             </ContentTemplate>

Ventas/ProductosServicios.aspx.vb

@@ -1,9 +1,11 @@
 Option Explicit On
 Option Strict On
 
+Imports System.Activities.Expressions
 Imports System.Data
 Imports System.Data.SqlClient
 Imports System.IO
+Imports ADSNetLibrary.SIGAPI.Models.RH.Response
 Imports Extensiones
 Imports ZXing
 
@@ -1664,7 +1666,9 @@ Partial Class ProductosyServicios
         End Try
 
         If Not TieneError Then
-            GuardaDatosCartPorte()
+            If Not GuardaDatosCartPorte(ObjProductosServicios.IniciaTransacSQL) Then
+                TieneError = True
+            End If
         End If
 
         If Not TieneError Then
@@ -3312,6 +3316,11 @@ Partial Class ProductosyServicios
             End If
         End If
 
+
+        If ValidaMaterialPeligrosoMensaje Then
+
+        End If
+
         ObjGrales.Dispose()
 
         If ValidaMaterialPeligrosoMensaje Then
@@ -3343,23 +3352,26 @@ Partial Class ProductosyServicios
 
         DdlClaveSectorCOFEPRIS.SelectedValueExist(-1)
         DdlClaveFormaFarmaceutica.SelectedValueExist(-1)
+        TxtDimensiones.Text = ""
+        TxtPesoKg.Text = ""
+        'TxtNombreIngredienteActivo.Text = ""
+        'TxtNomQuimico.Text = ""
+        'TxtDenominacionGenerica.Text = ""
+        'TxtDenominacionDistintiva.Text = ""
+        'TxtFabricante.Text = ""
+        'TxtCondicionesTransporte.Text = ""
+        'TxtRegistroSanitarioAutorizacion.Text = ""
+        'TxtPermisoImportacion.Text = ""
+        'TxtFolioImportacionVUCEM.Text = ""
+        'TxtNumCAS.Text = ""
+        'TxtRazonSocialEmpImportacion.Text = ""
+        'TxtNumRegistroPlagCOFEPRIS.Text = ""
+        'TxtDatosFabricante.Text = ""
+        'TxtDatosFormulador.Text = ""
+        'TxtDatosMaquilador.Text = ""
+        'TxtUsoAutorizado.Text = ""
 
-        TxtNombreIngredienteActivo.Text = ""
+        MostrarOcultarControlesCCP(LimpiarControles:=True)
-        TxtNomQuimico.Text = ""
-        TxtDenominacionGenerica.Text = ""
-        TxtDenominacionDistintiva.Text = ""
-        TxtFabricante.Text = ""
-        TxtCondicionesTransporte.Text = ""
-        TxtRegistroSanitarioAutorizacion.Text = ""
-        TxtPermisoImportacion.Text = ""
-        TxtFolioImportacionVUCEM.Text = ""
-        TxtNumCAS.Text = ""
-        TxtRazonSocialEmpImportacion.Text = ""
-        TxtNumRegistroPlagCOFEPRIS.Text = ""
-        TxtDatosFabricante.Text = ""
-        TxtDatosFormulador.Text = ""
-        TxtDatosMaquilador.Text = ""
-        TxtUsoAutorizado.Text = ""
 
         UpCartaPorte.Update()
 
@@ -3411,30 +3423,147 @@ Partial Class ProductosyServicios
             TxtDatosMaquilador.Text = ObjPS.DtResultados.Rows(0)("DatosMaquilador").ToString
             TxtUsoAutorizado.Text = ObjPS.DtResultados.Rows(0)("UsoAutorizado").ToString
 
+            MostrarOcultarControlesCCP(LimpiarControles:=False)
+
         End If
 
         UpCartaPorte.Update()
 
     End Sub
 
+    Private Sub MostrarOcultarControlesCCP(Optional LimpiarControles As Boolean = False)
+        DVClaveFormaFarmaceutica.Visible = False
+        DVNombreIngredienteActivo.Visible = False
+        DVNomQuimico.Visible = False
+        DVDenominacionGenerica.Visible = False
+        DVDenominacionDistintiva.Visible = False
+        DVFabricante.Visible = False
+        DVCondicionesTransporte.Visible = False
+        DVRegistroSanitarioAutorizacion.Visible = False
+        'DVPermisoImportacion.Visible = False '--------------
+        'DVFolioImportacionVUCEM.Visible = False '-----------
+        DVNumCAS.Visible = False
+        'DVRazonSocialEmpImportacion.Visible = False '---------
+        DVNumRegistroPlagCOFEPRIS.Visible = False
+        DVDatosFabricante.Visible = False
+        DVDatosFormulador.Visible = False
+        DVDatosMaquilador.Visible = False
+        DVUsoAutorizado.Visible = False
+
+        If LimpiarControles Then
+            DdlClaveFormaFarmaceutica.SelectedValueExist(-1)
+            TxtNombreIngredienteActivo.Text = ""
+            TxtNomQuimico.Text = ""
+            TxtDenominacionGenerica.Text = ""
+            TxtDenominacionDistintiva.Text = ""
+            TxtFabricante.Text = ""
+            TxtCondicionesTransporte.Text = ""
+            TxtRegistroSanitarioAutorizacion.Text = ""
+            TxtPermisoImportacion.Text = ""
+            TxtFolioImportacionVUCEM.Text = ""
+            TxtNumCAS.Text = ""
+            TxtRazonSocialEmpImportacion.Text = ""
+            TxtNumRegistroPlagCOFEPRIS.Text = ""
+            TxtDatosFabricante.Text = ""
+            TxtDatosFormulador.Text = ""
+            TxtDatosMaquilador.Text = ""
+            TxtUsoAutorizado.Text = ""
+        End If
+
+
+        If DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 1 Then ' 1 - Medicamento 
+            DVDenominacionGenerica.Visible = True
+            DVDenominacionDistintiva.Visible = True
+            DVFabricante.Visible = True
+            DVClaveFormaFarmaceutica.Visible = True
+            DVCondicionesTransporte.Visible = True
+            DVRegistroSanitarioAutorizacion.Visible = True
+        ElseIf DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 2 Then '2 - Precursores y químicos de uso dual 
+            DVNombreIngredienteActivo.Visible = True
+            DVNomQuimico.Visible = True
+            DVFabricante.Visible = True
+            DVClaveFormaFarmaceutica.Visible = True
+            DVCondicionesTransporte.Visible = True
+        ElseIf DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 3 Then ' 3 - Psicotrópicos y estupefacientes
+            DVDenominacionGenerica.Visible = True
+            DVDenominacionDistintiva.Visible = True
+            DVFabricante.Visible = True
+            DVClaveFormaFarmaceutica.Visible = True
+            DVCondicionesTransporte.Visible = True
+            DVRegistroSanitarioAutorizacion.Visible = True
+        ElseIf DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 4 Then ' 4 - Sustancias tóxicas
+            DVNomQuimico.Visible = True
+            DVNumCAS.Visible = True
+        ElseIf DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero = 5 Then '  5 - Plaguicidas y fertilizantes
+            DVNumRegistroPlagCOFEPRIS.Visible = True
+            DVDatosFabricante.Visible = True
+            DVDatosFormulador.Visible = True
+            DVDatosMaquilador.Visible = True
+            DVUsoAutorizado.Visible = True
+        End If
+
+
+        UpCartaPorte.Update()
+    End Sub
+
 
     Private Function GuardaDatosCartPorte(ByRef transaccionSQL As SqlTransaction) As Boolean
         Dim Respuesta As Boolean = True
+        Dim CamposStringCCP As String = ""
 
-        If DdlMaterialPeligroso.SelectedValue.ToEntero > 0 Or DdlEmbalaje.SelectedValue.ToEntero > 0 Or DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero > 0 Or DdlClaveFormaFarmaceutica.SelectedValue.ToEntero > 0 Then
+        CamposStringCCP = CamposStringCCP + TxtNombreIngredienteActivo.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtNomQuimico.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtDenominacionGenerica.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtDenominacionDistintiva.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtFabricante.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtCondicionesTransporte.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtRegistroSanitarioAutorizacion.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtPermisoImportacion.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtFolioImportacionVUCEM.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtNumCAS.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtRazonSocialEmpImportacion.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtNumRegistroPlagCOFEPRIS.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtDatosFabricante.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtDatosFormulador.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtDatosMaquilador.Text.Trim()
+        CamposStringCCP = CamposStringCCP + TxtUsoAutorizado.Text.Trim()
+
+        If CamposStringCCP.Length > 0 And (DdlMaterialPeligroso.SelectedValue.ToEntero <= 0 Or DdlEmbalaje.SelectedValue.ToEntero <= 0 Or TxtDimensiones.Text = "" Or TxtPesoKg.Text = "") Then
+            Alert("Para guardar los datos de carta porte los campos Material Peligroso, Embalaje, Peso en Kg y Dimensiones  son requeridos", TipoMensaje.MsgAdvertencia)
+            Respuesta = False
+        Else
+
+            'If DdlMaterialPeligroso.SelectedValue.ToEntero > 0 And DdlEmbalaje.SelectedValue.ToEntero > 0 And DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero > 0 And CamposStringCCP.Length > 0 Then
             Dim ObjPS As New ClsProductosServicios(transaccionSQL)
-
             If Not ObjPS.AddUpdateProductosServiciosComplementos(CvePS, TxtPesoKg.Text.ToDecimal, DdlMaterialPeligroso.SelectedValue.ToEntero, DdlEmbalaje.SelectedValue.ToEntero, TxtDimensiones.Text, DdlClaveSectorCOFEPRIS.SelectedValue.ToEntero,
                 TxtNombreIngredienteActivo.Text.Trim, TxtNomQuimico.Text.Trim, TxtDenominacionGenerica.Text.Trim, TxtDenominacionDistintiva.Text.Trim, TxtFabricante.Text.Trim, DdlClaveFormaFarmaceutica.SelectedValue.ToEntero, TxtCondicionesTransporte.Text.Trim,
                 TxtRegistroSanitarioAutorizacion.Text.Trim, TxtPermisoImportacion.Text.Trim, TxtFolioImportacionVUCEM.Text.Trim, TxtNumCAS.Text.Trim, TxtRazonSocialEmpImportacion.Text, TxtNumRegistroPlagCOFEPRIS.Text.Trim, TxtDatosFabricante.Text.Trim,
                 TxtDatosFormulador.Text.Trim, TxtDatosMaquilador.Text.Trim, TxtUsoAutorizado.Text) Then
                 Respuesta = False
             End If
+            ' End If
+
         End If
 
 
+
+
+
+
+
         Return Respuesta
 
     End Function
 
+
+
+
+    Protected Sub DdlClaveSectorCOFEPRIS_SelectedIndexChanged(sender As Object, e As EventArgs)
+
+        MostrarOcultarControlesCCP(LimpiarControles:=True)
+
+    End Sub
+
+
+
 End Class

Ventas/Ventas.aspx.vb

@@ -15635,7 +15635,7 @@ Partial Class Ventas
             'SI ES REFACTURACION NO LIMPIAR EL FOLIO FISCAL
             If NuevaFactura <> 1 Then
                 'SI ES UNA NOTA DE CREDITO NO TIMBRADA NO DEBE LIMPIAR 
-                If Not (DdlTipoComprobante.SelectedValue.ToString() = "Egs" AndAlso CveVenta > 0 AndAlso LblSeTimbro.Text = "No") Then
+                If Not (DdlTipoComprobante.SelectedValue.ToString().Contiene("Egs", "Dev") AndAlso CveVenta > 0 AndAlso LblSeTimbro.Text = "No") Then
                     HdnFolioFiscalNC.Value = "0"
                 End If
             End If