--FIX descuentos
--refacturacion con pagos , func 382 --activar ps adicionales/similares E189
This commit is contained in:
@@ -25679,7 +25679,7 @@ Partial Class Ventas
|
||||
|
||||
Dim AplicaCancelacionConPagos As Boolean = False
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(109) = "1" AndAlso ObjFacturaCancelacion.TipoDocto.Contiene("Ing", "Rem") AndAlso Not EsRefacturacion AndAlso ObjFacturaCancelacion.Pagado > 0 Then
|
||||
If (UsuarioActual.Empresa.Funcionalidad(109) = "1" OrElse UsuarioActual.Empresa.Funcionalidad(382) = "1") AndAlso ObjFacturaCancelacion.TipoDocto.Contiene("Ing", "Rem") AndAlso Not EsRefacturacion AndAlso ObjFacturaCancelacion.Pagado > 0 Then
|
||||
AplicaCancelacionConPagos = True
|
||||
End If
|
||||
|
||||
@@ -38305,7 +38305,21 @@ Partial Class Ventas
|
||||
If UsuarioAutorizar.TienePermisoProceso(374) Then
|
||||
txtUserDesc.Text = ""
|
||||
txtPassDesc.Text = ""
|
||||
'UpAutorizarDesc.Update()
|
||||
|
||||
'ASIGNA EL PORCENTAJE A APLICAR DEL USUARIO QUE AUTORIZA
|
||||
Dim RowUpdate As DataRow = TmpDT.Select($"Consec = {HdnConsecPS.Value}").FirstOrDefault()
|
||||
If RowUpdate IsNot Nothing Then
|
||||
Dim DrPS As DataRow = GlobalDTPS(UsuarioActual.CveEmpresa, CvePS:=RowUpdate("CvePS").ToString().ToEntero()).FiltroPrimero("")
|
||||
If DrPS IsNot Nothing Then
|
||||
If DrPS("PorMaximoDescuento").ToString().ToDecimal() > 0 Then
|
||||
HdnPorcentajeMaxDescPS.Value = DrPS("PorMaximoDescuento").ToString()
|
||||
Else
|
||||
HdnPorcentajeMaxDescPS.Value = UsuarioAutorizar.DescuentoAutorizado.ToString()
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
UpDescPS.Update()
|
||||
|
||||
RegistraScript("$('#ModalPermisoDesc').modal('hide');$('#ModalDescPS').modal({backdrop: 'static', keyboard: false});", "AUT")
|
||||
Else
|
||||
|
||||
Reference in New Issue
Block a user