diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb
index 0989f8ad6..4617e3a44 100644
--- a/RH/Personal.aspx.vb
+++ b/RH/Personal.aspx.vb
@@ -4455,15 +4455,17 @@ Partial Class RH_Personal
End Sub
Protected Sub BtnSolicitarVacaciones_Click(sender As Object, e As EventArgs) Handles BtnSolicitarVacaciones.Click
- Dim fInicio As Date = TxtFechaInicioVac.Text.ToDate
- Dim fFin As Date = TxtFechaFinVac.Text.ToDate
+ Dim fInicio As Date = TxtFechaInicioVac.Text.ToDate()
+ Dim fFin As Date = TxtFechaFinVac.Text.ToDate()
+ Dim fechapago As String = TxtFechaPago.Text.ToDate().ToString("yyyy/MM/dd")
+ Dim diasinhabil As Integer = Txtdiasinabiles.Text.ToEntero()
'Dim motivoVacaciones As String = TxtMotivoVacaciones.Text
If fInicio <= fFin Then
VacFolioActual = VacFolioActual + 1
Dim objRH As New ClsRH
'Dim continuar As Boolean = objRH.SolicitudVacacionesAdd(CvePersonal, fInicio, fFin, 0, UsuarioActual.CveUsuario, VacCveSupervisor, VacFolioActual, motivoVacaciones)
- Dim continuar As Boolean = objRH.SolicitudVacacionesAdd(CvePersonal, fInicio, fFin, 0, UsuarioActual.CveUsuario, VacCveSupervisor, VacFolioActual)
+ Dim continuar As Boolean = objRH.SolicitudVacacionesAdd(CvePersonal, fInicio, fFin, 0, UsuarioActual.CveUsuario, VacCveSupervisor, VacFolioActual, FechaPago:=fechapago, diasinabiles:=diasinhabil)
If objRH.DtResultados.Rows.Count > 0 Then
Dim ShowError As String = objRH.DtResultados.Rows(0)("ShowError").ToString()
If ShowError.Length > 0 Then
diff --git a/Scripts/custom.js b/Scripts/custom.js
index 74eac68b9..28dd940bc 100644
--- a/Scripts/custom.js
+++ b/Scripts/custom.js
@@ -1086,7 +1086,7 @@ function ADDropzone(txtid) {
document.getElementById(txtid + '-paste').onpaste = function (event) {
var __This = myDropzone;
var objfiles = JSON.parse(TxtField.val());
- if (objfiles.length < maxFile) {
+ if ((maxFile != null) || (maxFile < 1) || objfiles.length < maxFile) {
// use event.originalEvent.clipboard for newer chrome versions
var items = (event.clipboardData || event.originalEvent.clipboardData).items;
//console.log(JSON.stringify(items)); // will give you the mime types
diff --git a/Ventas/ClientesAbonar.aspx b/Ventas/ClientesAbonar.aspx
index 0c2dc1e61..61dbde5f6 100644
--- a/Ventas/ClientesAbonar.aspx
+++ b/Ventas/ClientesAbonar.aspx
@@ -365,7 +365,7 @@
Complemento Pago
-
+
diff --git a/Ventas/ClientesAbonar.aspx.vb b/Ventas/ClientesAbonar.aspx.vb
index 084de59b0..fc2aa4147 100644
--- a/Ventas/ClientesAbonar.aspx.vb
+++ b/Ventas/ClientesAbonar.aspx.vb
@@ -639,11 +639,10 @@ Partial Class Ventas_ClientesAbonar
If e.Row.DBCampo("CveVenta").ToEntero > 0 Then
If e.Row.DataKey("ClaveMetodoPagoSAT") = "PUE" Then
- e.Row.FCLinkButton("LnkComplemento").Text = "
"
- e.Row.FCLinkButton("LnkComplemento").CssClass = "text-danger"
+ e.Row.FCLiteral("LtlComplemento").Text = "
"
End If
Else
- e.Row.FCLinkButton("LnkComplemento").Visible = False
+ e.Row.FCLiteral("LtlComplemento").Visible = False
End If
diff --git a/vwd.webinfo b/vwd.webinfo
index 450c2d100..67035e8a8 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -212,6 +212,10 @@
+
+
+
+