-

2020-03-17 16:33:31 -07:00
parent 74c116ac82
commit 0f1ed5d000
9 changed files with 18453 additions and 18438 deletions
--- a/Inventarios/RecepcionUsados.aspx.vb
+++ b/Inventarios/RecepcionUsados.aspx.vb
@@ -2621,7 +2621,7 @@ Partial Class Inventarios_RecepcionUsados
    Private Sub CargaFolioAjuste()
        DdlFolioGarantia.Items.Clear()
        Dim ObjAcum As New ClsAcumuladores
-        If ObjAcum.FoliosGarantiaGet(-1, UsuarioActual.CveEmpresa) Then
+        If ObjAcum.FoliosGarantiaGet(-1, UsuarioActual.CveEmpresa, Area:=2) Then
            DdlFolioGarantia.DataSource = ObjAcum.DtResultados
            DdlFolioGarantia.Items.Insert(0, New ListItem("Seleccione", "-1"))
        End If