diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb
index 390c3f3f6..117080dbd 100644
--- a/RH/Personal.aspx.vb
+++ b/RH/Personal.aspx.vb
@@ -1041,11 +1041,13 @@ Partial Class RH_Personal
Private Sub CargaProyecto()
- DdlProyectoAsignado.Items.Clear()
- DdlProyectoAsignado.DataSource = GlobalDTProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, 1)
- DdlProyectoAsignado.DataBind()
+ CargarCentrosDeCosto(DdlProyectoAsignado, DdlSubProyectoAsignado, LblProyectoAsignado, LblSubProyectoAsignado)
+ DivProyectosAsignado.Visible = LblProyectoAsignado.Visible
+ 'DdlProyectoAsignado.Items.Clear()
+ 'DdlProyectoAsignado.DataSource = GlobalDTProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, 1)
+ 'DdlProyectoAsignado.DataBind()
- DdlProyectoAsignado.Items.Insert(0, New ListItem("Sin Proyecto asignado", "-1"))
+ 'DdlProyectoAsignado.Items.Insert(0, New ListItem("Sin Proyecto asignado", "-1"))
DdlProyectoAsistenciaC.DataSource = GlobalDTProyectos(UsuarioActual.Empresa.CveEmpresa).FiltraParametros("", "", {"CveProyecto", "Proyecto"})
DdlProyectoAsistenciaC.DataBind()
@@ -4671,12 +4673,17 @@ Partial Class RH_Personal
Dim Fecha As String = DateTime.Now.ToString("dd/MM/yyyy")
Dim Solicitante As String = UsuarioActual.Nombre
Dim anio As Integer = GvRow.DataKey("FechaInicio").ToDate().Year
+ Dim FechaPeriodo As String = GvRow.DataKey("Periodo")
+
+
+
+
If Periodoingreso > PeriodoInicio Then
anio = anio - 1
- End If
-
-
- Dim FechaPeriodo As String = String.Format("{0:dd/MM}/{1}", fechaIngreso, anio)
+ End If
+
+
+
If File.Exists(RutaFormato) Then
Dim objGemDocument As New clsGemBoxDocument(RutaFormato)
@@ -6123,10 +6130,36 @@ Partial Class RH_Personal
End If
If TxtFIPrimaVacacional.Text = "0" Or TxtFIPrimaVacacional.Text = "" Or TxtFIAguinaldo.Text = "-1" Then
TxtFIPrimaVacacional.Text = "25"
- End If
+ End If
+
+
+
TxtFISalariodiarioImss.Text = TxtSalarioCotizado.Text
TxtFactordeIntegracion.Text = ""
- TxtFISalarioDiarioIntegrado.Text = ""
+ TxtFISalarioDiarioIntegrado.Text = ""
+
+
+
+ Dim objRH As New ClsRH
+
+ If objRH.VacacionesResumenGet(CvePersonal, UsuarioActual.Empresa.CveEmpresa) Then
+ If objRH.DtResultados.Rows.Count > 0 Then
+
+ If objRH.DtResultados.Rows.Count > 0 Then
+ TxtFIDiasVacaciones.Text = objRH.DtResultados(0)("Dias").ToString
+ Else
+ TxtFIDiasVacaciones.Text = "6"
+ End If
+ Else
+
+ End If
+ End If
+
+ objRH.Dispose()
+
+
+
+
RegistraScript("$('#DmodalFactordeIntegraccion').modal()")
UpFactordeintegracion.Update()
End Sub
diff --git a/RH/RepPersonalInconsistencias.aspx.vb b/RH/RepPersonalInconsistencias.aspx.vb
index bf9d0b4e9..763ea5656 100644
--- a/RH/RepPersonalInconsistencias.aspx.vb
+++ b/RH/RepPersonalInconsistencias.aspx.vb
@@ -181,7 +181,7 @@ Partial Class RH_RepPersonalInconsistencias
Dim ObjAF As New ClsAF()
If ObjAF.GetLicenciasVencidas(-1, -1, UsuarioActual.CveEmpresa, Estatus:=1) Then
- GvLicencias.DataSource = ObjAF.DtResultados
+ GvLicencias.DataSource = ObjAF.DtResultados.FiltraParametros("CveEstatusPersonal = 1")
Else
GvLicencias.DataSource = Nothing
diff --git a/TareasProgramadas/Tareas72.ashx b/TareasProgramadas/Tareas72.ashx
index 1edc5d88a..f3d4ba7aa 100644
--- a/TareasProgramadas/Tareas72.ashx
+++ b/TareasProgramadas/Tareas72.ashx
@@ -66,13 +66,31 @@ public class Tareas72 : IHttpHandler
string JsonStringFormat = JsonString.Replace("Resultado(", "{\"Resultado\":").Replace(")", "}");
DataSet dataSet = JsonConvert.DeserializeObject(JsonStringFormat);
DataTable dataTable = dataSet.Tables["Resultado"];
- if (dataTable.Rows[0]["eventoId"].ToString() == "Hdc")
+ string eventoId = dataTable.Rows[0]["eventoId"].ToString();
+ if (eventoId == "Hdc" | eventoId == "HDC")
{
int EstatusEntregado = 3;
//MANDAMOS A ACTUALIZAR CON ESTATUS DE ENTREGADO
if (ObjGenerales.UpdatePaqueteriasGuias(CvePaqueteriaGuia, -1, -1, -1, EstatusEntregado, "-1", "", "", -1, -1, "-1", "-1", ""))
{
+ #region 'DESCARGAR IMAGEN'
+ string rastreo = Guia["Rastreo"].ToString();
+ string uriConsultaFirma = string.Format("https://cc.paquetexpress.com.mx/ptxws/rest/api/v1/entrega/firma/{0}/@1@2@3@4@5", rastreo);
+
+ HttpClient ClientFirma = new HttpClient();
+ HttpResponseMessage ResponseMessageFirma = ClientFirma.GetAsync(uriConsultaFirma).Result;
+ string JsonStringFirma = ResponseMessageFirma.Content.ReadAsStringAsync().Result;
+ string JsonStringFormatFirma = JsonStringFirma.Replace("callback(", "{\"callback\":").Replace(")", "}");
+ DataSet dataSetFirma = JsonConvert.DeserializeObject(JsonStringFormatFirma);
+ DataTable dataTableFirma = dataSetFirma.Tables["callback"];
+
+ string ImagenBase64 = dataTableFirma.Rows[0]["imagen"].ToString();
+ byte[] ImagenByteArray = Convert.FromBase64String(ImagenBase64);
+ string rutaDestino = ModExtensiones.DirectorioEmpresas + "72\\" + "Documentos\\Guias\\" + CvePaqueteriaGuia + ".jpg";
+ File.WriteAllBytes(rutaDestino,ImagenByteArray);
+ #endregion
+
#region 'MANDAR CORREOS'
int CveCliente = Guia["CveCliente"].ToString().ToEntero();
int CveVenta = Guia["CveAgrupador"].ToString().ToEntero();
@@ -123,7 +141,7 @@ public class Tareas72 : IHttpHandler
ObjVentas.Dispose();
ObjVendedores.Dispose();
ObjEmpresa.Dispose();
- return false;
+ return retorno;
}
public bool IsReusable
diff --git a/vwd.webinfo b/vwd.webinfo
index 6a84ef014..4edae1c8c 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -80,6 +80,10 @@
+
+
+
+