diff --git a/App_Code/CFDITimbre.vb b/App_Code/CFDITimbre.vb
index b0e2013b4..995faf073 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 Integer
+ Public Property HorasExtra As Decimal
Public Property ImportePagado As Double
End Class
diff --git a/App_Code/LogicNominas.vb b/App_Code/LogicNominas.vb
index adb1dce73..8f686d079 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 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 Then ObjHorasExtras.Add(New CFDINominaHorasExtras With {.Dias = dr("DiasHorasTriples").ToString().ToEntero().ToString(), .TipoHoras = "02", .HorasExtra = dr("HorasTriples").ToString().ToEntero(), .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().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})
End If
End If
diff --git a/RH/ListaAsistencias.aspx b/Nomina/ListaAsistencias.aspx
similarity index 100%
rename from RH/ListaAsistencias.aspx
rename to Nomina/ListaAsistencias.aspx
diff --git a/RH/ListaAsistencias.aspx.vb b/Nomina/ListaAsistencias.aspx.vb
similarity index 100%
rename from RH/ListaAsistencias.aspx.vb
rename to Nomina/ListaAsistencias.aspx.vb
diff --git a/Nomina/Nomina.aspx b/Nomina/Nomina.aspx
index 62edb17f8..42f536c76 100644
--- a/Nomina/Nomina.aspx
+++ b/Nomina/Nomina.aspx
@@ -645,7 +645,7 @@