-- corrección

This commit is contained in:
2025-01-10 08:00:25 -07:00
parent eb9404e470
commit 58aedf2c84

View File

@@ -527,7 +527,7 @@ Partial Class Inventarios_EntregaAlmacen
BtnGuardar.Enabled = False
Dim FI As Date = NowADS().AddDays(-1)
Dim FF As Date = NowADS().AddDays(-7)
If ObjInventarios.RepNotasSinAlmacen(1, -1, FI, FF, "-1", -1, UsuarioActual.Empresa.CveEmpresa) Then
If ObjInventarios.RepNotasSinAlmacen(1, -1, FI, FF, "-1", -1, UsuarioActual.Empresa.CveEmpresa, UsuarioActual.CveUsuario) Then
If ObjInventarios.DtResultados IsNot Nothing AndAlso ObjInventarios.DtResultados.Rows.Count > 1 Then
BtnGuardar.Enabled = False
Alert("No se podrá realizar entrega de mercancía si no se les da salida a los documentos pendientes. Para más información ver el Reporte de notas sin entrada en la sección Ventas.", TipoMensaje.MsgAdvertencia)