diff --git a/App_Code/CFDITimbre.vb b/App_Code/CFDITimbre.vb
index 995faf073..b0e2013b4 100644
--- a/App_Code/CFDITimbre.vb
+++ b/App_Code/CFDITimbre.vb
@@ -433,7 +433,7 @@ End Class
 Public Class CFDINominaHorasExtras
     Public Property Dias As String
     Public Property TipoHoras As String
-    Public Property HorasExtra As Decimal
+    Public Property HorasExtra As Integer
     Public Property ImportePagado As Double
 End Class
 
diff --git a/App_Code/LogicNominas.vb b/App_Code/LogicNominas.vb
index 8f686d079..f6fb9490b 100644
--- a/App_Code/LogicNominas.vb
+++ b/App_Code/LogicNominas.vb
@@ -346,8 +346,8 @@ Public Class LogicNominas
                     'Obtengo el desglose de horas extras
                     Dim dr As DataRow = DtHorasExtras.FiltroPrimero("")
                     If dr IsNot Nothing Then
-                        If dr("HorasDobles").ToString().ToDouble > 0 And Row("CveSistema").ToString().ToEntero() = 12 Then ObjHorasExtras.Add(New CFDINominaHorasExtras With {.Dias = dr("DiasHorasDobles").ToString().ToEntero().ToString(), .TipoHoras = "01", .HorasExtra = dr("HorasDobles").ToString().ToDecimal(), .ImportePagado = Row("Importe").ToString().ToDecimal})
-                        If dr("HorasTriples").ToString().ToDouble > 0 And Row("CveSistema").ToString().ToEntero() = 13 Then ObjHorasExtras.Add(New CFDINominaHorasExtras With {.Dias = dr("DiasHorasTriples").ToString().ToEntero().ToString(), .TipoHoras = "02", .HorasExtra = dr("HorasTriples").ToString().ToDecimal(), .ImportePagado = Row("Importe").ToString().ToDecimal})
+                        If dr("HorasDobles").ToString().ToDouble > 0 And Row("CveSistema").ToString().ToEntero() = 12 Then ObjHorasExtras.Add(New CFDINominaHorasExtras With {.Dias = dr("DiasHorasDobles").ToString().ToEntero().ToString(), .TipoHoras = "01", .HorasExtra = dr("HorasDobles").ToString().ToEntero(), .ImportePagado = Row("Importe").ToString().ToDecimal})
+                        If dr("HorasTriples").ToString().ToDouble > 0 And Row("CveSistema").ToString().ToEntero() = 13 Then ObjHorasExtras.Add(New CFDINominaHorasExtras With {.Dias = dr("DiasHorasTriples").ToString().ToEntero().ToString(), .TipoHoras = "02", .HorasExtra = dr("HorasTriples").ToString().ToEntero(), .ImportePagado = Row("Importe").ToString().ToDecimal})
 
                     End If
                 End If