From c6796258d441200b0cf86b28b6fd80d151faf998 Mon Sep 17 00:00:00 2001
From: JORGE LUIS CAUDILLO ESPARZA <caudillo_90@hotmail.com>
Date: Fri, 29 Oct 2021 03:23:04 -0700
Subject: [PATCH]

---
 App_Code/ClsRH.vb              |  66 ++++++++++++++-
 Nomina/ChecadorAsistencia.aspx | 145 +++++++++++++++++----------------
 Nomina/Nomina.aspx             |   4 +-
 Nomina/Nomina.aspx.cs          |   2 +-
 RH/CatPersonal.aspx            |  80 ++++++++++++++----
 RH/CatPersonal.aspx.vb         |  40 ++++++++-
 RH/Personal.aspx               |  26 +++++-
 RH/Personal.aspx.vb            |  51 ++++++++++++
 vwd.webinfo                    |   6 ++
 9 files changed, 322 insertions(+), 98 deletions(-)

diff --git a/App_Code/ClsRH.vb b/App_Code/ClsRH.vb
index a78a05d7c..452c26b47 100644
--- a/App_Code/ClsRH.vb
+++ b/App_Code/ClsRH.vb
@@ -125,6 +125,68 @@ Public Class ClsRH
     End Sub
 #End Region
 
+    Public Function AgroOrigenGet(CveEmpresa As Int32, CveOrigen As Integer, Estatus As Integer, CveTipoNomina As Integer, CveSubProyecto As Integer, GPO As Integer) As Boolean
+        Dim retorno As Boolean = False
+        DataAdapter("PA_Agro_OrigenGet", CommandType.StoredProcedure)
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@CveOrigen", SqlDbType.Int).Value = CveOrigen
+            .Add("@Estatus", SqlDbType.Int).Value = Estatus
+            .Add("@CveTipoNomina", SqlDbType.Int).Value = CveTipoNomina
+            .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
+            .Add("@GPO", SqlDbType.Int).Value = GPO
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            retorno = True
+        Catch Ex1 As SqlException
+
+            Me.OnError("Ocurrió un error al obtener los agro departamentos.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener los agro departamentos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return retorno
+    End Function
+    Public Function AgroDepartamentosGet(CveEmpresa As Int32, CveDepartamento As Integer, CveTipoTrabajador As Integer) As Boolean
+        Dim retorno As Boolean = False
+        DataAdapter("PA_Agro_DepartamentosGet", CommandType.StoredProcedure)
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@CveDepartamento", SqlDbType.Int).Value = CveDepartamento
+            .Add("@CveTipoTrabajador", SqlDbType.Int).Value = CveTipoTrabajador
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            retorno = True
+        Catch Ex1 As SqlException
+
+            Me.OnError("Ocurrió un error al obtener los agro departamentos.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener los agro departamentos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return retorno
+    End Function
+
+    Public Function AgroDepartamentoPersonalUp(CveEmpresa As Int32, CveDepartamento As Integer, CvePersonal As Integer, CharolaForanea As Integer) As Boolean
+        Dim retorno As Boolean = False
+        DataAdapter("PA_Agro_DepartamentoPersonalUP", CommandType.StoredProcedure)
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@CveDepartamento", SqlDbType.Int).Value = CveDepartamento
+            .Add("@CharolaForanea", SqlDbType.Int).Value = CharolaForanea
+            .Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            retorno = True
+        Catch Ex1 As SqlException
+
+            Me.OnError("Ocurrió un error al obtener los agro departamentos.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener los agro departamentos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return retorno
+    End Function
 #Region "DiasFestivos"
 
     Public Function DiasFestivosGet(CveEmpresa As Int32) As Boolean
@@ -138,9 +200,9 @@ Public Class ClsRH
             retorno = True
         Catch Ex1 As SqlException
 
-            Me.OnError("Ocurrió un error al obtener los días festivos", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            Me.OnError("Ocurrió un error al obtener los días festivos.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
         Catch ex As Exception
-            OnError("Ocurrió un error al Guardar el Tipo de A-I", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+            OnError("Ocurrió un error al obtener los días festivos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
         End Try
         Return retorno
     End Function
diff --git a/Nomina/ChecadorAsistencia.aspx b/Nomina/ChecadorAsistencia.aspx
index 8ad4fd876..43ee0dab3 100644
--- a/Nomina/ChecadorAsistencia.aspx
+++ b/Nomina/ChecadorAsistencia.aspx
@@ -4,9 +4,10 @@
 </asp:Content>
 <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
     <style>
-        .GvBitacora th:nth-child(n+2){
+        .GvBitacora th:nth-child(n+2) {
             text-align: left;
         }
+
         .AdsCHeader .GvNominas th:nth-child(1),
         .AdsCHeader .GvNominas td:nth-child(1) {
             text-align: left;
@@ -118,38 +119,38 @@
             </asp:GridView>
 
 
-            
-                    <div class="portlet light bordered xspadding">
-                        <div class="portlet-title">
-                            <div class="caption font-green">
-                                <i class="icon-pin font-green"></i>
-                                <span class="caption-subject bold uppercase">Historial de Modificación</span>
-                            </div>
-                            <div class="actions">
-                                <div class="btn-group">
-                                </div>
-                            </div>
-                        </div>
-                        <div class="portlet-body">
-                            <asp:GridView ID="GvBitacora" runat="server" GridLines="None" Width="100%" CssClass="table table-striped table-advance table-hover GvBitacora  Widthall ScrollAD mysmallbtn" data-sort="true" CellSpacing="0" AutoGenerateColumns="False">
-                                <Columns>
-                                    <asp:TemplateField HeaderText="Fecha" ItemStyle-HorizontalAlign="Center">
-                                        <ItemTemplate>
-                                            <asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("FechaIng") %>'></asp:Literal>
-                                        </ItemTemplate>
-                                    </asp:TemplateField>
-                                    <asp:BoundField DataField="NombreCompleto" HeaderText="Nombre" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
-                                    <asp:BoundField DataField="ConceptoHistorialBitacora" HeaderText="Campo" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
-                                    <asp:BoundField DataField="Anterior" HeaderText="Anterior" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
-                                    <asp:BoundField DataField="Actual" HeaderText="Actual" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
-                                    <asp:BoundField DataField="Asistencia" HeaderText="Asistencia" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
-                                    <asp:BoundField DataField="Turno" HeaderText="Turno" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
-                                    <asp:BoundField DataField="Descripcion" HeaderText="Motivo" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
-                                    <asp:BoundField DataField="Usuario" HeaderText="Usuario" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
-                                </Columns>
-                            </asp:GridView>
+
+            <div class="portlet light bordered xspadding">
+                <div class="portlet-title">
+                    <div class="caption font-green">
+                        <i class="icon-pin font-green"></i>
+                        <span class="caption-subject bold uppercase">Historial de Modificación</span>
+                    </div>
+                    <div class="actions">
+                        <div class="btn-group">
                         </div>
                     </div>
+                </div>
+                <div class="portlet-body">
+                    <asp:GridView ID="GvBitacora" runat="server" GridLines="None" Width="100%" CssClass="table table-striped table-advance table-hover GvBitacora  Widthall ScrollAD mysmallbtn" data-sort="true" CellSpacing="0" AutoGenerateColumns="False">
+                        <Columns>
+                            <asp:TemplateField HeaderText="Fecha" ItemStyle-HorizontalAlign="Center">
+                                <ItemTemplate>
+                                    <asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("FechaIng") %>'></asp:Literal>
+                                </ItemTemplate>
+                            </asp:TemplateField>
+                            <asp:BoundField DataField="NombreCompleto" HeaderText="Nombre" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
+                            <asp:BoundField DataField="ConceptoHistorialBitacora" HeaderText="Campo" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
+                            <asp:BoundField DataField="Anterior" HeaderText="Anterior" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
+                            <asp:BoundField DataField="Actual" HeaderText="Actual" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
+                            <asp:BoundField DataField="Asistencia" HeaderText="Asistencia" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
+                            <asp:BoundField DataField="Turno" HeaderText="Turno" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
+                            <asp:BoundField DataField="Descripcion" HeaderText="Motivo" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
+                            <asp:BoundField DataField="Usuario" HeaderText="Usuario" ItemStyle-HorizontalAlign="Left" HeaderStyle-HorizontalAlign="Left" />
+                        </Columns>
+                    </asp:GridView>
+                </div>
+            </div>
         </ContentTemplate>
     </asp:UpdatePanel>
     <div id="divDetallesDia" class="modal ADS fade" role="dialog">
@@ -257,43 +258,43 @@
                                 </asp:GridView>
                             </div>
                         </div>
-                                <asp:GridView ID="GvAsistenciaUp" runat="server" DataKeyNames="CveAsistenciaDetalle,CveAsistenciasInasistencias,CvePersonal,CveSubProyecto,CveProyecto,CveTurno,Fecha" AutoGenerateColumns="false" ShowHeaderWhenEmpty="false" OnRowDataBound="GvAsistenciaUp_RowDataBound"
-                                    CssClass="  table table-striped table-advance table-hover Widthall" Style="text-align: center;" GridLines="None">
-                                    <Columns>
-                                        <asp:TemplateField HeaderText="Turno" ItemStyle-HorizontalAlign="Left" Visible="true" HeaderStyle-Width="80px">
-                                            <ItemTemplate>
-                                                <asp:Label runat="server" Text='<%#  Eval("Turno")  %>'></asp:Label>
-                                            </ItemTemplate>
-                                        </asp:TemplateField>
-                                        <asp:TemplateField HeaderText="Asistencia" Visible="true" HeaderStyle-Width="100px">
-                                            <ItemTemplate>
-                                                    <asp:DropDownList ID="DdlTipoAsistencias"  runat="server" CssClass="select2me form-control" DataTextField="Tipo" DataValueField="CveAsistenciasInasistencias"></asp:DropDownList>
-                                            </ItemTemplate>
-                                        </asp:TemplateField> 
-                                        <asp:TemplateField HeaderText="Centro de costos" Visible="true" HeaderStyle-Width="150px">
-                                            <ItemTemplate>
+                        <asp:GridView ID="GvAsistenciaUp" runat="server" DataKeyNames="CveAsistenciaDetalle,CveAsistenciasInasistencias,CvePersonal,CveSubProyecto,CveProyecto,CveTurno,Fecha" AutoGenerateColumns="false" ShowHeaderWhenEmpty="false" OnRowDataBound="GvAsistenciaUp_RowDataBound"
+                            CssClass="  table table-striped table-advance table-hover Widthall" Style="text-align: center;" GridLines="None">
+                            <Columns>
+                                <asp:TemplateField HeaderText="Turno" ItemStyle-HorizontalAlign="Left" Visible="true" HeaderStyle-Width="80px">
+                                    <ItemTemplate>
+                                        <asp:Label runat="server" Text='<%#  Eval("Turno")  %>'></asp:Label>
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+                                <asp:TemplateField HeaderText="Asistencia" Visible="true" HeaderStyle-Width="100px">
+                                    <ItemTemplate>
+                                        <asp:DropDownList ID="DdlTipoAsistencias" runat="server" CssClass="select2me form-control" DataTextField="Tipo" DataValueField="CveAsistenciasInasistencias"></asp:DropDownList>
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+                                <asp:TemplateField HeaderText="Centro de costos" Visible="true" HeaderStyle-Width="150px">
+                                    <ItemTemplate>
 
-                                                <asp:Panel ID="PnlProyecto"  runat="server">
-                                                    <div class="form-group form-md-line-input input-iconright">
-                                                        <asp:DropDownList ID="DdlAsisProyecto" runat="server" AppendDataBoundItems="true" CssClass="form-control select2me" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Style="width: 100% !important;" ValidationGroup="GrpGuardar">
-                                                            <asp:ListItem  Text="Seleccione" Value="-1"></asp:ListItem>
-                                                        </asp:DropDownList>
-                                                        <asp:Label ID="LblAsisProyecto" AssociatedControlID="DdlAsisProyecto" runat="server" Text="Proyecto:"></asp:Label>
-                                                    </div>
-                                                </asp:Panel>
-                                                        <asp:DropDownList ID="DdlAsisSubProyecto" runat="server" AppendDataBoundItems="true" CssClass="form-control select2me" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Style="width: 100% !important;" ValidationGroup="GrpGuardar">
-                                                            <asp:ListItem  Text="Todos" Value="-1"></asp:ListItem>
-                                                        </asp:DropDownList>
-                                            </ItemTemplate>
-                                        </asp:TemplateField>
-                                        
-                                        <asp:TemplateField HeaderText="Motivo" Visible="true" HeaderStyle-Width="300px">
-                                            <ItemTemplate>
-                                                <asp:TextBox ID="TxtMotivo" CssClass="form-control" TextMode="MultiLine" rows="2" runat="server"></asp:TextBox>
-                                            </ItemTemplate>
-                                        </asp:TemplateField>
-                                    </Columns>
-                                </asp:GridView>
+                                        <asp:Panel ID="PnlProyecto" runat="server">
+                                            <div class="form-group form-md-line-input input-iconright">
+                                                <asp:DropDownList ID="DdlAsisProyecto" runat="server" AppendDataBoundItems="true" CssClass="form-control select2me" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Style="width: 100% !important;" ValidationGroup="GrpGuardar">
+                                                    <asp:ListItem Text="Seleccione" Value="-1"></asp:ListItem>
+                                                </asp:DropDownList>
+                                                <asp:Label ID="LblAsisProyecto" AssociatedControlID="DdlAsisProyecto" runat="server" Text="Proyecto:"></asp:Label>
+                                            </div>
+                                        </asp:Panel>
+                                        <asp:DropDownList ID="DdlAsisSubProyecto" runat="server" AppendDataBoundItems="true" CssClass="form-control select2me" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Style="width: 100% !important;" ValidationGroup="GrpGuardar">
+                                            <asp:ListItem Text="Todos" Value="-1"></asp:ListItem>
+                                        </asp:DropDownList>
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+
+                                <asp:TemplateField HeaderText="Motivo" Visible="true" HeaderStyle-Width="300px">
+                                    <ItemTemplate>
+                                        <asp:TextBox ID="TxtMotivo" CssClass="form-control" TextMode="MultiLine" Rows="2" runat="server"></asp:TextBox>
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+                            </Columns>
+                        </asp:GridView>
                         <%-- <table style="width: 100%">
                             <tr>
                                 <td style="width: 50%; vertical-align: top!important">
@@ -349,6 +350,10 @@
                         <h4 class="modal-title">Agregar registro</h4>
                     </div>
                     <div class="modal-body">
+                        <div class="form-group form-md-line-input input-iconright">
+                            <asp:DropDownList ID="DdlChecador" runat="server" CssClass="select2me form-control" Width="100%" DataTextField="Checador" DataValueField="CveChecador"></asp:DropDownList>
+                            <asp:Label runat="server" AssociatedControlID="DdlTipoAsistencias" Text="Asistencia"></asp:Label>
+                        </div>
                         <div runat="server" id="PnlConceptoPersonal" class="form-group form-md-line-input input-iconright">
                             <asp:DropDownList ID="DdlmcPersonal" DataTextField="CodigoNombreCompleto" DataValueField="CvePersonal" runat="server" Width="100%" AppendDataBoundItems="true" CssClass="form-control select2me">
                                 <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
@@ -367,14 +372,10 @@
                             <div class="col-md-2">
                                 <label style="top: 0; margin-bottom: 0; font-size: 13px; color: #888888; display: block;">Segundos</label>
                                 <div class="input-group input-sm  date date-picker " data-date-format="dd/mm/yyyy hh:mm" style="display: inline-block; padding-left: 0px;">
-                                    <asp:TextBox ID="TxtSegundos" runat="server" CssClass="form-control input-sm " CausesValidation="true" MaxLength="18" ></asp:TextBox>
+                                    <asp:TextBox ID="TxtSegundos" runat="server" CssClass="form-control input-sm " CausesValidation="true" MaxLength="18"></asp:TextBox>
                                 </div>
                             </div>
                             <div class="col-md-4">
-                                <div class="form-group form-md-line-input input-iconright">
-                                    <asp:DropDownList ID="DdlChecador" runat="server" CssClass="select2me form-control" Width="100%" DataTextField="Checador" DataValueField="CveChecador"></asp:DropDownList>
-                                    <asp:Label runat="server" AssociatedControlID="DdlTipoAsistencias" Text="Asistencia"></asp:Label>
-                                </div>
                             </div>
                         </div>
                         <div class="text-right">
diff --git a/Nomina/Nomina.aspx b/Nomina/Nomina.aspx
index 637f773a9..ff70bae46 100644
--- a/Nomina/Nomina.aspx
+++ b/Nomina/Nomina.aspx
@@ -852,12 +852,12 @@
                                                         <li>
                                                             <asp:LinkButton ID="LnkCalculoHorasExtras" OnClick="LnkCalculoHorasExtras_Click" Text="<i class='icon-bulb'></i> Calculo horas extras" runat="server"></asp:LinkButton>
                                                         </li>
-                                                        <li>
+                                                       <%-- <li>
                                                             <asp:LinkButton ID="LnkCalculoSubsidio" OnClick="LnkCalculoSubsidio_Click" Text="<i class='icon-bulb'></i> Calculo Subsidio" runat="server"></asp:LinkButton>
                                                         </li>
                                                         <li>
                                                             <asp:LinkButton ID="LnkCalculoISR" OnClick="LnkCalculoISR_Click" Text="<i class='icon-bulb'></i> Calculo ISR" runat="server"></asp:LinkButton>
-                                                        </li>
+                                                        </li>--%>
                                                     </ul>
                                                 </div>
                                             </div>
diff --git a/Nomina/Nomina.aspx.cs b/Nomina/Nomina.aspx.cs
index 4c382c13a..dae0cdd6b 100644
--- a/Nomina/Nomina.aspx.cs
+++ b/Nomina/Nomina.aspx.cs
@@ -195,7 +195,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
         {
             DmodalCancelartimbre.Visible = (UsuarioActual.CveUsuario == 100);
             LnkOpenCancelarTimbre.Visible = (UsuarioActual.CveUsuario == 100);
-            LnkVerCalculoISR.Visible = (UsuarioActual.CveUsuario == 100);
+            LnkVerCalculoISR.Visible = (UsuarioActual.CveUsuario == 100 || UsuarioActual.CveEmpresa ==119);
             TxtPeriodo.Text = $"{DateTime.Now:yyyyMM}";
             CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyeccto);
             CargarCentrosDeCosto(DdlPRProyecto, DdlPRSubProyecto, LblPRProyecto, LblPRSubProyeccto);
diff --git a/RH/CatPersonal.aspx b/RH/CatPersonal.aspx
index c2e985b3e..26a9b0b02 100644
--- a/RH/CatPersonal.aspx
+++ b/RH/CatPersonal.aspx
@@ -952,16 +952,6 @@
                                                 </div>
                                             </div>
                                             <div class="col-md-4">
-
-                                                <div class="form-group form-md-line-input input-iconright">
-                                                    <asp:DropDownList Width="100%" ID="DdlMedioTransporte" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="MedioTransporte" DataValueField="CveMedioTransporte" ValidationGroup="GrpGuardar">
-                                                        <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
-                                                        <asp:ListItem Value="1" Text="Hermosillo"></asp:ListItem>
-                                                        <asp:ListItem Value="2" Text="Taxi 1"></asp:ListItem>
-                                                        <asp:ListItem Value="3" Text="Taxi 2"></asp:ListItem>
-                                                    </asp:DropDownList>
-                                                    <asp:Label AssociatedControlID="DdlMedioTransporte" runat="server" Text="Medio transporte:"></asp:Label>
-                                                </div>
                                             </div>
                                             <div class="col-md-5" style="display: none;">
                                                 <div class="form-group form-md-line-input input-iconright">
@@ -1001,7 +991,7 @@
                                                     <i></i>
                                                 </div>
                                                 <div class="form-group form-md-line-input input-iconright">
-                                                    <asp:DropDownList Width="100%" ID="DdlSubProyectoAsignadoAdd" runat="server" AppendDataBoundItems="True" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardarAddS">
+                                                    <asp:DropDownList Width="100%" ID="DdlSubProyectoAsignadoAdd" runat="server" AutoPostBack="true" OnSelectedIndexChanged="DdlSubProyectoAsignadoAdd_SelectedIndexChanged" AppendDataBoundItems="True" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardarAddS">
                                                         <asp:ListItem Selected="True" Text="Sin SubProyecto asignado" Value="-1"></asp:ListItem>
                                                     </asp:DropDownList>
                                                     <asp:Label runat="server" ID="LblSubProyectoAsignado" AssociatedControlID="DdlSubProyectoAsignadoAdd">SubProyecto:</asp:Label>
@@ -1114,9 +1104,67 @@
                             </div>
 
                         </div>
-                        <div class="row">
-                            <div class="col-md-4">
-                                <asp:TextBox ID="TxtFoto" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
+                        <div class="portlet light bordered xspadding">
+                            <div class="portlet-title text-center">
+                                <div class="caption font-green">
+                                    <i class="fa fa-users font-green"></i>
+                                    <span class="caption-subject bold uppercase">Datos </span>
+                                </div>
+                                <div class="actions">
+                                    <div class="btn-group">
+                                    </div>
+                                </div>
+                                <div class="tools">
+                                    <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
+                                </div>
+                            </div>
+                            <div class="portlet-body form">
+                                <div class="row">
+                                    <div class="col-md-4">
+                                        <asp:TextBox ID="TxtFoto" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
+                                    </div>
+                                    <div class="col-md-4">
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <asp:DropDownList Width="100%" ID="DdlTipoTrabajador" CssClass="form-control input-sm select2me" runat="server" AutoPostBack="true"
+                                                DataTextField="TipoTrabajadorB" DataValueField="CveTipoTrabajador" ValidationGroup="GrpGuardar" OnSelectedIndexChanged="DdlTipoTrabajador_SelectedIndexChanged">
+                                            </asp:DropDownList>
+                                            <asp:Label AssociatedControlID="DdlTipoTrabajador" runat="server" Text="Tipo trabajador:"></asp:Label>
+                                        </div>
+
+
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <asp:DropDownList Width="100%" ID="DdlMedioTransporte" CssClass="form-control input-sm select2me" runat="server" DataTextField="MedioTransporte" DataValueField="CveMedioTransporte" ValidationGroup="GrpGuardar">
+                                                <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
+                                                <asp:ListItem Value="1" Text="Hermosillo"></asp:ListItem>
+                                                <asp:ListItem Value="2" Text="Taxi-1"></asp:ListItem>
+                                                <asp:ListItem Value="3" Text="Taxi-2"></asp:ListItem>
+                                                <asp:ListItem Value="5" Text="Taxi-3"></asp:ListItem>
+                                                <asp:ListItem Value="4" Text="Taxi-4"></asp:ListItem>
+                                                <asp:ListItem Value="7" Text="Taxi-5"></asp:ListItem>
+                                                <asp:ListItem Value="6" Text="Taxi-6"></asp:ListItem>
+                                                <asp:ListItem Value="8" Text="Costa"></asp:ListItem>
+                                            </asp:DropDownList>
+                                            <asp:Label AssociatedControlID="DdlMedioTransporte" runat="server" Text="Medio transporte:"></asp:Label>
+                                        </div>
+                                    </div>
+                                    <div class="col-md-3">
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <asp:DropDownList Width="100%" ID="DDlAgroDepartamento" CssClass="form-control input-sm select2me" runat="server"
+                                                DataTextField="Departamento" DataValueField="CveDepartamento" ValidationGroup="GrpGuardar">
+                                            </asp:DropDownList>
+                                            <asp:Label AssociatedControlID="DDlAgroDepartamento" runat="server" Text="Depto:"></asp:Label>
+                                        </div>
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <div style="height: 35px;padding-top: 12px;">
+                                                <asp:CheckBox ID="ChkCharolaForanea" CssClass="chksino " Text=" " runat="server" />
+                                            </div>
+                                            <input type="text" class="form-control hidden" />
+                                            <asp:Label AssociatedControlID="ChkCharolaForanea" runat="server" Text="Charola foraneo"></asp:Label>
+                                        </div>
+
+
+                                    </div>
+                                </div>
                             </div>
                         </div>
                         <div class="text-right">
@@ -1445,9 +1493,9 @@
         function ValidaRFC() {
 
             if (rfcValidoJS(<%= String.Format("$('#{0}').val()", TxtRFC.ClientID) %>)) {
-                alertatoast(5, "RFC valido!", "", 7);
+                alertatoast(5, "Formato de RFC valido!", "", 7);
             } else {
-                alertatoast(8, "RFC invalido!", "", 7)
+                alertatoast(8, "Formato de RFC invalido!", "", 7)
             }
         }
         function rfcValidoJS(rfc, aceptarGenerico = true) {
diff --git a/RH/CatPersonal.aspx.vb b/RH/CatPersonal.aspx.vb
index 126d3f76e..0ea8a913b 100644
--- a/RH/CatPersonal.aspx.vb
+++ b/RH/CatPersonal.aspx.vb
@@ -1136,7 +1136,7 @@ Partial Class RH_CatPersonal
         Dim continuar As Boolean = False
         Dim CvePersonal As Integer = 0
         Using ObjPersonal As New ClsRH()
-
+            ObjPersonal.IniciaTransacSQL()
             If ObjPersonal.AddPersonal("-1", TxtAPaterno.Text.Trim, TxtAMaterno.Text.Trim, TxtNombres.Text.Trim, "", TxtFechaIngreso.Text.ToDate,
                    DdlTipoPeriodoAdd.SelectedValue.ToEntero, TxtNumeroSS.Text.Trim, True, SalarioDiario,
                    SalarioDiario, 0, 0, 0, 15, 25, DdlMetodoPagoAdd.SelectedValue.ToEntero, TxtFechaIngreso.Text.Trim.ToDate, "-1",
@@ -1169,12 +1169,14 @@ Partial Class RH_CatPersonal
 
                 Next
 
-
+                ObjPersonal.AgroDepartamentoPersonalUp(UsuarioActual.CveEmpresa, DDlAgroDepartamento.SelectedValue.ToEntero(), ObjPersonal.CvePersonal, If(ChkCharolaForanea.Checked, 1, 0))
 
                 Alert(String.Format("El empleado a sido agregado satisfactoriamente <a href=""/RH/Personal.aspx?CvePersonal={0}"">Ver empleado</a>", ObjPersonal.CvePersonal), TipoMensaje.ToastInformacion, "", 0)
                 continuar = True
                 ISChange = True
+                ObjPersonal.Commit()
             Else
+                ObjPersonal.RollBack()
                 'Alert("El empleado a sido agregado satisfactoriamente", TipoMensaje.ToastInformacion, "", 0)
             End If
         End Using
@@ -1212,4 +1214,38 @@ Partial Class RH_CatPersonal
         End If
 
     End Sub
+
+    Protected Sub DdlSubProyectoAsignadoAdd_SelectedIndexChanged(sender As Object, e As EventArgs)
+        Using objrh As New ClsRH()
+            If (objrh.AgroDepartamentosGet(UsuarioActual.CveEmpresa, -1, -1)) Then
+                Dim dt As DataTable = objrh.DtResultados.FiltraParametros(String.Format("CveSubProyecto ={0}", DdlSubProyectoAsignadoAdd.SelectedValue), "", {"CveTipoTrabajador", "TipoTrabajadorB"})
+                Dim drow As DataRow = dt.NewRow()
+                drow("CveTipoTrabajador") = "-1"
+                drow("TipoTrabajadorB") = "Seleccione"
+                dt.Rows.InsertAt(drow, 0)
+                If DdlTipoTrabajador.Items.Count() > 0 Then
+                    DdlTipoTrabajador.SelectedValueExist("-1")
+                End If
+                DdlTipoTrabajador.DataSource = dt
+                DdlTipoTrabajador.DataBind()
+            End If
+        End Using
+    End Sub
+
+    Protected Sub DdlTipoTrabajador_SelectedIndexChanged(sender As Object, e As EventArgs)
+        Using objrh As New ClsRH()
+            If (objrh.AgroDepartamentosGet(UsuarioActual.CveEmpresa, -1, -1)) Then
+                Dim dt As DataTable = objrh.DtResultados.FiltraParametros(String.Format("CveTipoTrabajador ={0}", DdlTipoTrabajador.SelectedValue))
+                Dim drow As DataRow = dt.NewRow()
+                drow("CveDepartamento") = "-1"
+                drow("Departamento") = "Seleccione"
+                dt.Rows.InsertAt(drow, 0)
+                If DDlAgroDepartamento.Items.Count() > 0 Then
+                    DDlAgroDepartamento.SelectedValueExist("-1")
+                End If
+                DDlAgroDepartamento.DataSource = dt
+                DDlAgroDepartamento.DataBind()
+            End If
+        End Using
+    End Sub
 End Class
diff --git a/RH/Personal.aspx b/RH/Personal.aspx
index e69de49b8..aa8269d95 100644
--- a/RH/Personal.aspx
+++ b/RH/Personal.aspx
@@ -234,6 +234,26 @@
                                                             <asp:CheckBox ID="CHKRFCValidado" Text=" " CssClass="chksino" runat="server" />
                                                         </div>
                                                     </div>
+                                                    
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <asp:DropDownList Width="100%" ID="DdlTipoTrabajador" CssClass="form-control input-sm select2me" runat="server" AutoPostBack="true"
+                                                DataTextField="TipoTrabajadorB" DataValueField="CveTipoTrabajador" ValidationGroup="GrpGuardar" OnSelectedIndexChanged="DdlTipoTrabajador_SelectedIndexChanged">
+                                            </asp:DropDownList>
+                                            <asp:Label AssociatedControlID="DdlTipoTrabajador" runat="server" Text="Tipo trabajador:"></asp:Label>
+                                        </div>
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <asp:DropDownList Width="100%" ID="DDlAgroDepartamento" CssClass="form-control input-sm select2me" runat="server"
+                                                DataTextField="Departamento" DataValueField="CveDepartamento" ValidationGroup="GrpGuardar">
+                                            </asp:DropDownList>
+                                            <asp:Label AssociatedControlID="DDlAgroDepartamento" runat="server" Text="Depto:"></asp:Label>
+                                        </div>
+                                        <div class="form-group form-md-line-input input-iconright">
+                                            <div style="height: 35px;padding-top: 12px;">
+                                                <asp:CheckBox ID="ChkCharolaForanea" CssClass="chksino " Text=" " runat="server" />
+                                            </div>
+                                            <input type="text" class="form-control hidden" />
+                                            <asp:Label AssociatedControlID="ChkCharolaForanea" runat="server" Text="Charola foraneo"></asp:Label>
+                                        </div>
                                                 </div>
                                             </div>
                                         </div>
@@ -615,7 +635,7 @@
                                                     <div class="form-group form-md-line-input input-iconright">
                                                         <asp:Label runat="server" ID="LblSubProyectoAsignado" CssClass="form-line" for="<%= DdlSubProyectoAsignado.ClientID.ToString()%>" Style="        margin-bottom: unset;
         color: #888888">SubProyecto:  </asp:Label>
-                                                        <asp:DropDownList Width="100%" ID="DdlSubProyectoAsignado" runat="server" AppendDataBoundItems="True" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar">
+                                                        <asp:DropDownList Width="100%" ID="DdlSubProyectoAsignado" AutoPostBack="True" runat="server" AppendDataBoundItems="True" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar">
                                                             <asp:ListItem Selected="True" Text="Sin SubProyecto asignado" Value="-1"></asp:ListItem>
                                                         </asp:DropDownList>
                                                         <asp:RequiredFieldValidator ID="RfvDdlSubProyectoAsignado" runat="server" InitialValue="-1" ControlToValidate="DdlSubProyectoAsignado" ValidationGroup="GrpGuardar" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''SubProyecto''</b> es necesario, por favor seleccione uno."></asp:RequiredFieldValidator>
@@ -5310,9 +5330,9 @@
         function ValidaRFC() {
 
             if (rfcValidoJS(<%= String.Format("$('#{0}').val()", TxtRFC.ClientID) %>)) {
-                alertatoast(5, "RFC valido!", "", 7);
+                alertatoast(5, "Formato de RFC valido!", "", 7);
             } else {
-                alertatoast(8, "RFC invalido!", "", 7)
+                alertatoast(8, "Formato de RFC invalido!", "", 7)
             }
         }
         function rfcValidoJS(rfc, aceptarGenerico = true) {
diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb
index e021e8c56..bf1d7ede5 100644
--- a/RH/Personal.aspx.vb
+++ b/RH/Personal.aspx.vb
@@ -1020,6 +1020,39 @@ Partial Class RH_Personal
 
 #Region "Carga Combos"
 
+    Public Sub cargatipoTrabajador()
+        Using objrh As New ClsRH()
+            If (objrh.AgroDepartamentosGet(UsuarioActual.CveEmpresa, -1, -1)) Then
+                Dim dt As DataTable = objrh.DtResultados.FiltraParametros(String.Format("CveSubProyecto ={0}", DdlSubProyectoAsignado.SelectedValue), "", {"CveTipoTrabajador", "TipoTrabajadorB"})
+                Dim drow As DataRow = dt.NewRow()
+                drow("CveTipoTrabajador") = "-1"
+                drow("TipoTrabajadorB") = "Seleccione"
+                dt.Rows.InsertAt(drow, 0)
+                If DdlTipoTrabajador.Items.Count() > 0 Then
+                    DdlTipoTrabajador.SelectedValueExist("-1")
+                End If
+                DdlTipoTrabajador.DataSource = dt
+                DdlTipoTrabajador.DataBind()
+            End If
+        End Using
+    End Sub
+
+    Protected Sub cargaagrodeptos()
+        Using objrh As New ClsRH()
+            If (objrh.AgroDepartamentosGet(UsuarioActual.CveEmpresa, -1, -1)) Then
+                Dim dt As DataTable = objrh.DtResultados.FiltraParametros(String.Format("CveTipoTrabajador ={0}", DdlTipoTrabajador.SelectedValue))
+                Dim drow As DataRow = dt.NewRow()
+                drow("CveDepartamento") = "-1"
+                drow("Departamento") = "Seleccione"
+                dt.Rows.InsertAt(drow, 0)
+                If DDlAgroDepartamento.Items.Count() > 0 Then
+                    DDlAgroDepartamento.SelectedValueExist("-1")
+                End If
+                DDlAgroDepartamento.DataSource = dt
+                DDlAgroDepartamento.DataBind()
+            End If
+        End Using
+    End Sub
     Private Sub CargaEscolaridad()
         DdlEscolaridad.DataSource = GlobalDTEscolaridad
         DdlEscolaridad.DataBind()
@@ -1569,6 +1602,11 @@ Partial Class RH_Personal
                 DdlProyectoAsignado.SelectedValue = ObjPersonal.CveProyecto.ToString()
                 If ObjPersonal.CveProyecto <> -1 Then DdlProyectoAsignado_SelectedIndexChanged(Me, New System.EventArgs())
                 DdlSubProyectoAsignado.SelectedValue = ObjPersonal.CveSubProyecto.ToString()
+                cargatipoTrabajador()
+                DdlTipoTrabajador.SelectedValueExist(drow("CveTipoTrabajador").ToString())
+                cargaagrodeptos()
+                DDlAgroDepartamento.SelectedValueExist(drow("CveDepartamentoAgropecuaria").ToString())
+                ChkCharolaForanea.Checked = (drow("CharolaForanea").ToString().ToUpper().Contiene("1", "TRUE"))
                 DdlSupervisor.SelectedValue = ObjPersonal.CveSupervisor.ToString()
                 'Carga Nómina
                 TxtFechaIngreso.Text = ObjPersonal.FechaIngreso.ToShortDateString
@@ -1783,6 +1821,8 @@ Partial Class RH_Personal
 
                 End If
 
+
+                ObjPersonal.AgroDepartamentoPersonalUp(UsuarioActual.CveEmpresa, DDlAgroDepartamento.SelectedValue.ToEntero(), ObjPersonal.CvePersonal, If(ChkCharolaForanea.Checked, 1, 0))
                 'Agregar Cuentas Bancarias
                 ViewState("CvePersonal") = ObjPersonal.CvePersonal
 
@@ -1852,6 +1892,7 @@ Partial Class RH_Personal
                     ProcesaDTFamiliares(ObjPersonal)
                 End If
 
+                ObjPersonal.AgroDepartamentoPersonalUp(UsuarioActual.CveEmpresa, DDlAgroDepartamento.SelectedValue.ToEntero(), CvePersonal, If(ChkCharolaForanea.Checked, 1, 0))
 
                 If Archivo.Exists Then
 
@@ -1944,6 +1985,16 @@ Partial Class RH_Personal
     Protected Sub DdlProyectoAsignado_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles DdlProyectoAsignado.SelectedIndexChanged
         CargaSubProyectoAsignado()
     End Sub
+    Protected Sub DdlSubProyectoAsignado_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles DdlSubProyectoAsignado.SelectedIndexChanged
+        cargatipoTrabajador()
+        UpDatos.Update()
+    End Sub
+
+    Protected Sub DdlTipoTrabajador_SelectedIndexChanged(sender As Object, e As EventArgs)
+        cargaagrodeptos()
+        UpDatos.Update()
+    End Sub
+
 
     Protected Sub DdlProyectoAsistenciaC_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles DdlProyectoAsistenciaC.SelectedIndexChanged
         CargaSubProyectoAsistenciaC()
diff --git a/vwd.webinfo b/vwd.webinfo
index 583dcacf8..ca6a9b893 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -340,6 +340,12 @@
     
   
     
+  
+    
+  
+    
+  
+