diff --git a/CRM/Acercamiento.aspx b/CRM/Acercamiento.aspx
index 8cfb6f104..4565c7876 100644
--- a/CRM/Acercamiento.aspx
+++ b/CRM/Acercamiento.aspx
@@ -440,7 +440,8 @@
                                             </div>
                                             <div class="form-group col-md-6 form-md-line-input input-iconright">
                                                 <asp:DropDownList ID="DdlMedioCaptacion" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="MedioCaptacion" DataValueField="CveMedioCaptacion" Class="form-control input-sm select2me"></asp:DropDownList>
-                                                <label for="<%= DdlMedioCaptacion.ClientID.ToString()%>">Medio de Captación:</label>
+                                                <asp:RequiredFieldValidator ID="RequiredFieldValidator3" InitialValue="-1" runat="server" ControlToValidate="DdlMedioCaptacion" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b> El campo <b>''Medio de Captación''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                                                <label for="<%= DdlMedioCaptacion.ClientID.ToString()%>" style="width:90%">Medio de Captación:</label>
                                             </div>
                                         </div>
 
diff --git a/CRM/Acercamiento.aspx.cs b/CRM/Acercamiento.aspx.cs
index bc1ce9c1a..3890d6dc8 100644
--- a/CRM/Acercamiento.aspx.cs
+++ b/CRM/Acercamiento.aspx.cs
@@ -278,11 +278,11 @@ public partial class CRM_Acercamiento : ClsPaginas
         if (CveAcercamiento > 0)
         {
             ClsCRM ObjCRM = new ClsCRM();
-
+            
             if (ObjCRM.GetAcercamiento(UsuarioActual.CveEmpresa, CveAcercamiento: CveAcercamiento) && ObjCRM.DtResultados.Rows.Count > 0)
             {
                 LblEncabezadoAcercamiento.Text = String.Format("<span class='bold' style='color: #32c5d2;'>{0}:</span> {1}", ObjCRM.DtResultados.FiltroPrimeroValor("TipoProceso").ToUpper(), ObjCRM.DtResultados.FiltroPrimeroValor("NombreAcercamiento").ToUpper());
-
+                CveTipoProceso = ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso").ToEntero();
                 //SECCION DATOS DEL ACERCAMIENTO
                 TxtNombreAcercamiento.Text = ObjCRM.DtResultados.FiltroPrimeroValor("NombreAcercamiento");
                 TxtDescripcion.Text = ObjCRM.DtResultados.FiltroPrimeroValor("Descripcion");
@@ -294,10 +294,10 @@ public partial class CRM_Acercamiento : ClsPaginas
                 DdlProbabilidadAcercamiento.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveProbabilidadAcercamiento"));
                 DdlPrioridad.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("Prioridad"));
 
+                CargaDdl();
                 //SECCION DATOS DE LA EMPRESA
                 DdlEmpresaCRM.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveEmpresaCRM"));
                 //DdlContactoPrincipal.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveContactoPrincipal"));
-
                 //SECCION DATOS DEL PROCESO
                 //DdlTipoProceso.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso"));
                 DdlEtapaProceso.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveEtapaProcesoActual"));
@@ -316,7 +316,7 @@ public partial class CRM_Acercamiento : ClsPaginas
                 CveContactoPrincipal = (ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso").ToEntero() > 0) ? ObjCRM.DtResultados.FiltroPrimeroValor("CveContactoPrincipal").ToEntero() : -1;
 
                 CveEtapaActual = ObjCRM.DtResultados.FiltroPrimeroValor("CveEtapaProcesoActual").ToEntero();
-                CveTipoProceso = ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso").ToEntero();
+                
 
                 CveEncuestaProcesoCRM = (ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaProcesoCRM").ToEntero() > 0) ? ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaProcesoCRM").ToEntero() : -1;
                 CveEncuestaAplicadaProceso = (ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaAplicadaProceso").ToEntero() > 0) ? ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaAplicadaProceso").ToEntero() : -1;
@@ -366,7 +366,6 @@ public partial class CRM_Acercamiento : ClsPaginas
             }
 
             CargaImagenes();
-            CargaDdl();
 
             UpEncabezado.Update();
             UPAcercamiento.Update();
diff --git a/CRM/EmpresaCRM.aspx.cs b/CRM/EmpresaCRM.aspx.cs
index dfc7a457e..85ff85b65 100644
--- a/CRM/EmpresaCRM.aspx.cs
+++ b/CRM/EmpresaCRM.aspx.cs
@@ -226,7 +226,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas
             CreoCliente = false; 
             RecuperaCve();
             CargaTipoProceso();
-            CargaMetodosCaptacion();
+            //CargaMetodosCaptacion();
             CargaVendedores();
             CargaSucursales();
             CargarTiposEventos();
@@ -248,7 +248,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas
         ClsOIEventos ObjBitacora = new ClsOIEventos(ObjCRM.IniciaTransacSQL());
         ClsEncuestas ObjDatosTecnicos = new ClsEncuestas(ObjCRM.IniciaTransacSQL());
 
-        Boolean HuboError = true;
+        Boolean HuboError = false;
 
         String NombreEmpresa = TxtNombreEmpresa.Text;
         String RFC = TxtRFC.Text;
@@ -619,6 +619,8 @@ public partial class CRM_EmpresaCRM : ClsPaginas
 
                 TxtNombreEmpresa.Text = ObjCRM.DtResultados.FiltroPrimeroValor("Empresa");
                 TxtRFC.Text = ObjCRM.DtResultados.FiltroPrimeroValor("RFC");
+                DdlTipoPrceso2.SelectedValue = ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso");
+                CargaMetodosCaptacion();
                 TxtCorreoEmpresaCRM.Text = ObjCRM.DtResultados.FiltroPrimeroValor("Correo");
                 DdlMedioCaptacion.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveMedioCaptacion"));
 
@@ -1328,8 +1330,8 @@ public partial class CRM_EmpresaCRM : ClsPaginas
 
         if (ObjCRM.GetProbabilidadAcercamiento(UsuarioActual.CveEmpresa, 1))
         {
-            DdlProbabilidadAcercamiento.DataSource = ObjCRM.DtResultados;
-            DdlProbabilidadAcercamiento.DataBind();
+            //DdlProbabilidadAcercamiento.DataSource = ObjCRM.DtResultados;
+            //DdlProbabilidadAcercamiento.DataBind();
             DdlProbabilidadAcercamiento.Items.Insert(0, new ListItem("Seleccione ", "-1"));
 
             DtProbabilidadAcercamiento = ObjCRM.DtResultados;
diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb
index 218614f30..fd7b97de2 100644
--- a/RH/Personal.aspx.vb
+++ b/RH/Personal.aspx.vb
@@ -1237,6 +1237,11 @@ Partial Class RH_Personal
                     Dim LogoRutaFisica As String = String.Format("Empresas\{0}\RH\Personal\{1}.jpg", UsuarioActual.CveEmpresa, CvePersonal)
                     Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica))
 
+                    ImgPersonal.ImageUrl = logouri
+                ElseIf File.Exists(ModExtensiones.DirectorioBaseEmpresas & "Empresas\" & UsuarioActual.CveEmpresa & "\RH\Personal\" & CvePersonal & ".png") Then
+                    Dim LogoRutaFisica As String = String.Format("Empresas\{0}\RH\Personal\{1}.png", UsuarioActual.CveEmpresa, CvePersonal)
+                    Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica))
+
                     ImgPersonal.ImageUrl = logouri
                 End If
                 'BtnCargarArchivo_Click(Me, New EventArgs)
@@ -4967,8 +4972,11 @@ Partial Class RH_Personal
             filemove = fileItem.filename
 
             Dim yaExistente As String = String.Format("{0}Empresas\{1}\RH\Personal\{2}.jpg", ModExtensiones.DirectorioBaseEmpresas, UsuarioActual.CveEmpresa, CvePersonal)
+            Dim yaExistentePNG As String = String.Format("{0}Empresas\{1}\RH\Personal\{2}.png", ModExtensiones.DirectorioBaseEmpresas, UsuarioActual.CveEmpresa, CvePersonal)
             If File.Exists(yaExistente) Then
                 File.Delete(yaExistente)
+            ElseIf File.Exists(yaExistentePNG) Then
+                File.Delete(yaExistentePNG)
             End If
 
             If filemove <> "" Then
@@ -4976,8 +4984,8 @@ Partial Class RH_Personal
             End If
             ViewState("Archivo") = String.Format("{0}.{1}", CvePersonal.ToString, FileExtension)
         Next
-        If File.Exists(ModExtensiones.DirectorioBaseEmpresas & "Empresas\" & UsuarioActual.CveEmpresa & "\RH\Personal\" & CvePersonal & ".jpg") Then
-            Dim LogoRutaFisica As String = String.Format("Empresas\{0}\RH\Personal\{1}.jpg", UsuarioActual.CveEmpresa, CvePersonal)
+        If File.Exists(ModExtensiones.DirectorioBaseEmpresas & "Empresas\" & UsuarioActual.CveEmpresa & "\RH\Personal\" & CvePersonal & "." & FileExtension) Then
+            Dim LogoRutaFisica As String = String.Format("Empresas\{0}\RH\Personal\{1}.{2}", UsuarioActual.CveEmpresa, CvePersonal, FileExtension)
             Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}&version={4}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica), Now)
             ImgPersonal.ImageUrl = logouri
         End If