diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb
index a2a76e664..4bfc60525 100644
--- a/App_Code/ClsNominas.vb
+++ b/App_Code/ClsNominas.vb
@@ -1008,6 +1008,29 @@ Public Class ClsNominas
         Return Retorno
     End Function
 
+    Public Function GetNom_NominasDataXML(CveNomina As Integer, CvePersonal As Integer, CvePeriodo As Integer, CveNominaTipo As Integer, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Nom_NominasDataXMLGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("CveNomina", SqlDbType.Int).Value = CveNomina
+            .Add("CvePersonal", SqlDbType.Int).Value = CvePersonal
+            .Add("CvePeriodo", SqlDbType.Int).Value = CvePeriodo
+            .Add("CveNominaTipo", SqlDbType.Int).Value = CveNominaTipo
+            .Add("CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener La Nómina.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+    End Function
+
     Public Function AutorizaNom_Nominas(CvePersonal As Integer, CvePeriodo As Integer, Optional Autorizado As Boolean = True) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Nom_Nominas_Autoriza")
diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 7bfd0a318..753316592 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -4652,7 +4652,7 @@ Public Class ClsPaginas
             bdir = RutaEmpresa.Replace($"{CveEmpresa}/", "")
         End If
         RutaReporte.Replace("/", "\")
-        If Not RutaReporte.ToUpper().StartsWith(bdir.ToUpper())  Then
+        If Not RutaReporte.ToUpper().StartsWith(bdir.ToUpper()) Then
             RutaReporte = String.Format("{0}{1}", bdir, RutaReporte)
         End If
         If EsProduccion Then
@@ -6720,6 +6720,10 @@ Public Class ClsPaginas
                 DTPercepciones = Nothing
                 DTDeducciones = Nothing
             End If
+            Dim SalarioDiario As String
+            Dim SDI As String
+            Dim Departamento As String
+            Dim Puesto As String
             'DATOS DEL EMPLEADO 
             If ObjPersonal.GetPersonal(CvePersonal, CveEmpresa) Then
                 RptParametro.Add(New ReportParameter("NoEmpleado", ObjPersonal.Codigo))
@@ -6729,39 +6733,49 @@ Public Class ClsPaginas
                 RptParametro.Add(New ReportParameter("Regimen", ObjPersonal.RegimenContratacion))
                 RptParametro.Add(New ReportParameter("RiesgoPuesto", ObjPersonal.RiesgoPuesto))
                 RptParametro.Add(New ReportParameter("NSS", ObjPersonal.NumeroSS))
-                RptParametro.Add(New ReportParameter("Departamento", ObjPersonal.Departamento))
-                RptParametro.Add(New ReportParameter("Puesto", ObjPersonal.Puesto.ToString()))
+                Departamento = ObjPersonal.Departamento
+                Puesto = ObjPersonal.Puesto.ToString()
                 RptParametro.Add(New ReportParameter("FechaIngreso", ObjPersonal.FechaIngreso.ToString("dd/MM/yyyy")))
                 RptParametro.Add(New ReportParameter("Contrato", ObjPersonal.TipoContrato.ToString))
                 RptParametro.Add(New ReportParameter("Jornada", ObjPersonal.Jornada))
                 RptParametro.Add(New ReportParameter("Periodo", ObjNomina.TipoPeriodo))
-                RptParametro.Add(New ReportParameter("SalarioBase", ObjPersonal.SalarioDiario.ToString))
-                RptParametro.Add(New ReportParameter("SalarioDiarioInt", ObjPersonal.SDI.ToString))
                 RptParametro.Add(New ReportParameter("Banco", ObjPersonal.Banco))
                 RptParametro.Add(New ReportParameter("CLABE", ObjPersonal.CLABE))
-
+                SalarioDiario = ObjPersonal.SalarioDiario.ToString
+                SDI = ObjPersonal.SDI.ToString
+                If ObjNomina.GetNom_NominasDataXML(CveNomina, CvePersonal, CvePeriodo, 1, CveEmpresa) AndAlso ObjNomina.DtResultados.Rows.Count > 0 Then
+                    Dim drow As DataRow = ObjNomina.DtResultados.Rows(0)
+                    SalarioDiario = drow("SalarioDiario").ToString()
+                    SDI = drow("NomRSalarioDiarioIntegrado").ToString()
+                    Departamento = drow("NomRDepartamento").ToString()
+                    Puesto = drow("NomRPuesto").ToString()
+                End If
+                RptParametro.Add(New ReportParameter("SalarioBase", SalarioDiario))
+                RptParametro.Add(New ReportParameter("SalarioDiarioInt", SDI))
+                RptParametro.Add(New ReportParameter("Departamento", Departamento))
+                RptParametro.Add(New ReportParameter("Puesto", Puesto))
                 'DATOS NOMINA
                 If ObjNomina.GetNom_Nominas(CveNomina, CvePersonal, CvePeriodo, 1, CveEmpresa) Then
-                    RptParametro.Add(New ReportParameter("ReciboNomina", ObjNomina.Folio.ToString))
-                    RptParametro.Add(New ReportParameter("Serie", ObjNomina.Serie))
-                    RptParametro.Add(New ReportParameter("Fecha", ObjNomina.Fecha.ToString))
-                    RptParametro.Add(New ReportParameter("Periodo", ObjNomina.TipoPeriodo))
-                    RptParametro.Add(New ReportParameter("DiasPagados", ObjNomina.DiasPagados.ToString))
-                    RptParametro.Add(New ReportParameter("MetodoPago", ObjNomina.MetodoPago)) '"""PUE"" (Pago en una sola exhibición)"
-                    RptParametro.Add(New ReportParameter("FormaPago", """99"" (Por definir)"))
-                    RptParametro.Add(New ReportParameter("Cantidad", "1"))
-                    RptParametro.Add(New ReportParameter("Unidad", "ACT"))
-                    RptParametro.Add(New ReportParameter("Descripcion", "PAGO DE NÓMINA"))
-                    RptParametro.Add(New ReportParameter("Total", If(indemnizacion, ajusteindemnizacion, ObjNomina.Total - ajusteindemnizacion).ToString()))
-                    Dim CBB As New ClbNegBICFDv3_2.ClsNegCBBGenerar()
-                    cQr = CBB.GenerarCBBBytes(UsuarioActual.Empresa.RFC, ObjPersonal.RFC, ObjNomina.Total.ToString().ToDecimal(), FolioFiscal)
-                    RptParametro.Add(New ReportParameter("ImporteLetra", ObjNomina.Total.ToString.ToDouble.Texto2Letras))
-                    RptParametro.Add(New ReportParameter("Clave", "84111505"))
+                        RptParametro.Add(New ReportParameter("ReciboNomina", ObjNomina.Folio.ToString))
+                        RptParametro.Add(New ReportParameter("Serie", ObjNomina.Serie))
+                        RptParametro.Add(New ReportParameter("Fecha", ObjNomina.Fecha.ToString))
+                        RptParametro.Add(New ReportParameter("Periodo", ObjNomina.TipoPeriodo))
+                        RptParametro.Add(New ReportParameter("DiasPagados", ObjNomina.DiasPagados.ToString))
+                        RptParametro.Add(New ReportParameter("MetodoPago", ObjNomina.MetodoPago)) '"""PUE"" (Pago en una sola exhibición)"
+                        RptParametro.Add(New ReportParameter("FormaPago", """99"" (Por definir)"))
+                        RptParametro.Add(New ReportParameter("Cantidad", "1"))
+                        RptParametro.Add(New ReportParameter("Unidad", "ACT"))
+                        RptParametro.Add(New ReportParameter("Descripcion", "PAGO DE NÓMINA"))
+                        RptParametro.Add(New ReportParameter("Total", If(indemnizacion, ajusteindemnizacion, ObjNomina.Total - ajusteindemnizacion).ToString()))
+                        Dim CBB As New ClbNegBICFDv3_2.ClsNegCBBGenerar()
+                        cQr = CBB.GenerarCBBBytes(UsuarioActual.Empresa.RFC, ObjPersonal.RFC, ObjNomina.Total.ToString().ToDecimal(), FolioFiscal)
+                        RptParametro.Add(New ReportParameter("ImporteLetra", ObjNomina.Total.ToString.ToDouble.Texto2Letras))
+                        RptParametro.Add(New ReportParameter("Clave", "84111505"))
+                    Else
+                        TieneError = True
+                    End If
                 Else
                     TieneError = True
-                End If
-            Else
-                TieneError = True
             End If
             If Not TieneError Then
                 If ObjNomina.GetPeriodos(-1, CveEmpresa, -1, -1, CvePeriodo) Then
diff --git a/Nomina/Nomina.aspx.cs b/Nomina/Nomina.aspx.cs
index 71dc2ced9..4adfb243c 100644
--- a/Nomina/Nomina.aspx.cs
+++ b/Nomina/Nomina.aspx.cs
@@ -2776,8 +2776,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
         //NomAutorizado = gvrow.DataKey("NomAutorizado").ToUpper().Contiene(new string[] { "1", "TRUE" });
         SRCvePersonal = TxtCvePersonal.Text.ToEntero();
         showhideaccionesSR();
-        HypXmlSobreRecibo.Attributes.Add("onclick", string.Format("GETPDF({0},{1})", SRCvePersonal, CvePeriodoSeleccionado));
-        HyppdfSobreRecibo.Attributes.Add("onclick", string.Format("GETXML({0},{1})", SRCvePersonal, CvePeriodoSeleccionado));
+        HypXmlSobreRecibo.Attributes.Add("onclick", string.Format("GETXML({0},{1})", SRCvePersonal, CvePeriodoSeleccionado));
+        HyppdfSobreRecibo.Attributes.Add("onclick", string.Format("GETPDF({0},{1})", SRCvePersonal, CvePeriodoSeleccionado));
 
         DataRow drow = dtempleados.FiltroPrimero(string.Format("CvePersonal = {0}", SRCvePersonal));
         string Nombre = "";