diff --git a/RH/RepAusentismoLaboral.aspx b/RH/RepAusentismoLaboral.aspx
index b9ae2e293..50c844186 100644
--- a/RH/RepAusentismoLaboral.aspx
+++ b/RH/RepAusentismoLaboral.aspx
@@ -106,18 +106,18 @@
 
          <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
-            <asp:GridView ID="GVRegDatos" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron registros" ToolTip="Listado de Personal" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" data-sort="true" Style="margin-top: -10px; text-align: center;" GridLines="None">
+            <asp:GridView ID="GVRegDatos" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron registros" ToolTip="Listado de Personal" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" data-sort="true" GridLines="None">
                 <Columns>
-                    <asp:BoundField HeaderText ="Proyecto" DataField="Proyecto" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText ="Subproyecto" DataField="SubProyecto" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField HeaderText="Turno" DataField="Turno" ItemStyle-HorizontalAlign="Left" />                   
-                    <asp:TemplateField HeaderText="Faltas">
+                    <asp:BoundField HeaderText ="Proyecto" DataField="Proyecto"  />
+                    <asp:BoundField HeaderText ="Subproyecto" DataField="SubProyecto"  />
+                    <asp:BoundField HeaderText="Turno" DataField="Turno"/>                   
+                    <asp:TemplateField HeaderText="Faltas" ItemStyle-HorizontalAlign="right" >
                         <ItemTemplate>
-                            <asp:Label ID ="lblFaltas" runat ="server"  Width="70" Text='<%# If(Eval("Faltas").ToString = "0", "-", Eval("FALTAS")) %>'></asp:Label>
+                            <asp:Label ID ="lblFaltas" runat ="server"  Width="70" Text='<%# If(Eval("Faltas").ToString = "0.0", "-", Eval("FALTAS", "{0:#,###}")) %>'></asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:BoundField HeaderText="Días laborales" DataField="DIAS" />                  
-                    <asp:TemplateField HeaderText= "AUSENTISMO" ItemStyle-HorizontalAlign="Center">
+                    <asp:BoundField HeaderText="Días laborales" DataField="DIAS" ItemStyle-HorizontalAlign="right" DataFormatString="{0:#,###}" />                  
+                    <asp:TemplateField HeaderText= "AUSENTISMO">
                         <ItemTemplate>
                              <asp:Label ID="lblAusentismo" runat="server"  Width ="70"  Text='<%# Eval("AUSENTISMO")%>'> </asp:Label>
                         </ItemTemplate>
diff --git a/RH/RepAusentismoLaboral.aspx.vb b/RH/RepAusentismoLaboral.aspx.vb
index 3bdb52e05..9840d048b 100644
--- a/RH/RepAusentismoLaboral.aspx.vb
+++ b/RH/RepAusentismoLaboral.aspx.vb
@@ -64,9 +64,8 @@ Partial Class RH_RepAusentismoLaboral
         Dim FechaInicio As Date = Date.Now.AddDays(-30)
         Dim FechaFin As Date = Date.Now
 
-        Try
 
-            FechaInicio = Date.Parse(txtInicio.Text)
+        FechaInicio = Date.Parse(txtInicio.Text)
             FechaFin = Date.Parse(txtFin.Text)
 
             If DdlProyecto.SelectedIndex <> 0 Then
@@ -88,9 +87,7 @@ Partial Class RH_RepAusentismoLaboral
             GVRegDatos.DataSource = dTable
             GVRegDatos.DataBind()
 
-        Catch ex As Exception
-            Dim exe As String = ex.Message
-        End Try
+
         rh.Dispose()
         UpDatos.Update()
 
@@ -106,25 +103,28 @@ Partial Class RH_RepAusentismoLaboral
         If e.Row.RowType = DataControlRowType.DataRow Then
             If Not (e.Row.RowState = DataControlRowState.Edit OrElse e.Row.RowState = 5) Then
 
-                Dim sPorcentaje As String = e.Row.DBCampo("AUSENTISMO").Trim
-                Dim porcentaje As Double = Convert.ToDouble(sPorcentaje)
+                Dim porcentaje As Decimal = e.Row.DBCampo("AUSENTISMO").ToDecimal
 
                 e.Row.FCLabel("lblAusentismo").CssClass = "label label-danger"
                 e.Row.FCLabel("lblAusentismo").Font.Bold = True
                 e.Row.FCLabel("lblAusentismo").Attributes.Add("dir", "rtl")
 
-                e.Row.FCLabel("lblAusentismo").Text = sPorcentaje & "%"
+                e.Row.FCLabel("lblAusentismo").Text = porcentaje.RoundSQL & "%"
 
                 If porcentaje <= 15.0 Then
                     e.Row.FCLabel("lblAusentismo").CssClass = "label label-success"
                 ElseIf (porcentaje > 15.0 And porcentaje <= 30.0) Then
                     e.Row.FCLabel("lblAusentismo").CssClass = "label label-warning"
                 End If
-
-
-
-
             End If
+            If e.Row.DBCampo("SubProyecto").ToString.Trim = "" Then
+                e.Row.CssClass = "SubTotales2"
+            Else
+                If e.Row.DBCampo("Turno").ToString.Trim = "" Then
+                    e.Row.CssClass = "SubTotales"
+                End If
+            End If
+
         End If
 
 
diff --git a/RH/RepIndiceRotacionPersonal.aspx b/RH/RepIndiceRotacionPersonal.aspx
index cf45a956a..6d01501ef 100644
--- a/RH/RepIndiceRotacionPersonal.aspx
+++ b/RH/RepIndiceRotacionPersonal.aspx
@@ -124,7 +124,7 @@
                       
                     <asp:TemplateField HeaderText= "Inicio" ItemStyle-HorizontalAlign="Center">
                         <ItemTemplate>
-                             <asp:Label ID="lblInicio" runat="server"  Width ="70"  Text='<%# If(Eval("PINICIO").ToString = "0", "-", Eval("PINICIO"))%>'> </asp:Label>
+                             <asp:Label ID="lblInicio" runat="server"  Width ="70"  Text='<%# If(Eval("PerINICIO").ToString = "0", "-", Eval("PerINICIO"))%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField> 
 
@@ -142,13 +142,13 @@
                     
                     <asp:TemplateField HeaderText="Fin" ItemStyle-HorizontalAlign="Center" >
                         <ItemTemplate>
-                            <asp:Label ID="lblFin" runat="server" Width="70" Text='<%# If(Eval("PFIN").ToString = "0", "-", Eval("PFIN")) %>'></asp:Label>
+                            <asp:Label ID="lblFin" runat="server" Width="70" Text='<%# If(Eval("PerFIN").ToString = "0", "-", Eval("PerFIN")) %>'></asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>                                    
                
                     <asp:TemplateField HeaderText= "IRP" ItemStyle-HorizontalAlign="Center">
                         <ItemTemplate>
-                             <asp:Label ID="lblIrp" runat="server"  Width ="70"  Text='<%# Eval("IRP")%>'> </asp:Label>
+                             <asp:Label ID="lblIrp" runat="server"  Width ="70"  Text='<%# Eval("IRP", "###.00%")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
                 </Columns>
diff --git a/RH/RepIndiceRotacionPersonal.aspx.vb b/RH/RepIndiceRotacionPersonal.aspx.vb
index edf2ac6fc..f2b71e8b7 100644
--- a/RH/RepIndiceRotacionPersonal.aspx.vb
+++ b/RH/RepIndiceRotacionPersonal.aspx.vb
@@ -76,11 +76,10 @@ Partial Class Ventas_RepIndiceRotacionPersonal
         Dim CveTurno As Integer = -1
 
         Dim FechaInicio As Date = Date.Now.AddDays(-30)
-        Dim FechaFin As Date = Date.Now
-
-        Try
-
-            FechaInicio = Date.Parse(txtInicio.Text)
+        Dim FechaFin As Date = Date.Now
+
+
+        FechaInicio = Date.Parse(txtInicio.Text)
             FechaFin = Date.Parse(txtFin.Text)
 
             If DdlProyecto.SelectedIndex <> 0 Then
@@ -100,16 +99,9 @@ Partial Class Ventas_RepIndiceRotacionPersonal
             End If
             DTGvDatos = dTable
             GVRegDatos.DataSource = dTable
-            GVRegDatos.DataBind()
-
-
-
-
-
-        Catch ex As Exception
-            Dim exe As String = ex.Message
-        End Try
-
+            GVRegDatos.DataBind()
+
+
         rh.Dispose()
         UpDatos.Update()
 
@@ -124,28 +116,32 @@ Partial Class Ventas_RepIndiceRotacionPersonal
 
         If e.Row.RowType = DataControlRowType.DataRow Then
 
-            If Not (e.Row.RowState = DataControlRowState.Edit OrElse e.Row.RowState = 5) Then
-
-                Dim sPorcentaje As String = e.Row.DBCampo("IRP").Trim
-                Dim porcentaje As Double = Convert.ToDouble(sPorcentaje)
+            If Not (e.Row.RowState = DataControlRowState.Edit OrElse e.Row.RowState = 5) Then
+
+                Dim porcentaje As Decimal = e.Row.DBCampo("IRP").ToDecimal
 
                 e.Row.FCLabel("LblIrp").CssClass = "label label-danger"
                 e.Row.FCLabel("LblIrp").Font.Bold = True
                 e.Row.FCLabel("lblIrp").Attributes.Add("dir", "rtl")
-
-                e.Row.FCLabel("LblIrp").Text = sPorcentaje & "%"
+                e.Row.FCLabel("LblIrp").Text = porcentaje.ToString("0.00") & "%"
 
                 If porcentaje <= 15.0 Then
                     e.Row.FCLabel("LblIrp").CssClass = "label label-success"
                 ElseIf (porcentaje > 15.0 And porcentaje <= 30.0) Then
                     e.Row.FCLabel("LblIrp").CssClass = "label label-warning"
                 End If
-
             End If
 
-            If e.Row.DataKey("SubProyecto").ToString.Trim = "" Then
-                e.Row.CssClass = "SubTotales"
-                ' e.Row.Attributes.Add("class", "SubTotales")
+            If e.Row.DBCampo("SubProyecto").ToString.Trim = "" Then
+                e.Row.CssClass = "SubTotales2"
+            Else
+                If e.Row.DBCampo("Turno").ToString.Trim = "" Then
+                    e.Row.CssClass = "SubTotales"
+                Else
+                    If e.Row.DBCampo("Turno").ToString.Trim = "" Then
+                        e.Row.CssClass = "SubTotales3"
+                    End If
+                End If
             End If
 
         End If