globaldtpaqueterias

Inventarios/RepEntregasForaneas.aspx.vb

@@ -204,12 +204,12 @@ Partial Class Inventarios_RepEntregasForaneas
                 DTEstatus = ObjInv.DtResultados
                 DdlEstatusFiltro.DataSource = DTEstatus
             End If
+            ObjInv.Dispose()
 
-            DdlPaqueteria.DataSource = GlobalDTPaqueterias
+            DdlPaqueteria.DataSource = GlobalDTPaqueterias(UsuarioActual.CveEmpresa)
             DdlPaqueteria.DataBind()
 
             DdlEstatusFiltro.DataBind()
-            ObjInv.Dispose()
 
             CargaSucursales()
 
@@ -334,7 +334,7 @@ Partial Class Inventarios_RepEntregasForaneas
             e.Row.FCDropDownList("DdlEstatus").DataBind()
             e.Row.FCDropDownList("DdlEstatus").SelectedValueExist(e.Row.DBCampo("CveEntregaForaneaEstatus"))
 
-            e.Row.FCDropDownList("DdlPaqueteria").DataSource = GlobalDTPaqueterias
+            e.Row.FCDropDownList("DdlPaqueteria").DataSource = GlobalDTPaqueterias(UsuarioActual.CveEmpresa)
             e.Row.FCDropDownList("DdlPaqueteria").DataBind()
             e.Row.FCDropDownList("DdlPaqueteria").SelectedValueExist(e.Row.DBCampo("CvePaqueteria"))
 

Inventarios/TrasladoSolicitud.aspx.vb

@@ -85,7 +85,7 @@ Partial Class Inventarios_TrasladoSolicitud
         TempDT.Columns.Add()
     End Sub
     Private Sub CargaPaqueterias()
-        DdlPaqueteria.DataSource = GlobalDTPaqueterias()
+        DdlPaqueteria.DataSource = GlobalDTPaqueterias(UsuarioActual.CveEmpresa)
         DdlPaqueteria.DataBind()
         DdlPaqueteria.Items.Insert(0, New ListItem("-", "-1"))
     End Sub

RMA/Garantias.aspx.vb

@@ -27,7 +27,7 @@ Partial Class Ventas_Garantias
             DdlProveedores.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
             DdlProveedores.DataBind()
 
-            DdlPaqueteria.DataSource = GlobalDTPaqueterias
+            DdlPaqueteria.DataSource = GlobalDTPaqueterias(UsuarioActual.CveEmpresa)
             DdlPaqueteria.DataBind()