-- cambios, para ddlclientes no cerrara el modal

2024-01-29 08:14:39 -07:00
parent be79aa6be3
commit bd756f901a
2 changed files with 65 additions and 64 deletions
--- a/Transportes/RepContratos.aspx.vb
+++ b/Transportes/RepContratos.aspx.vb
@@ -24,7 +24,7 @@ Partial Class ListadoContratos
    Private Sub InicializaCombos()
        'Lista Activos Fijos'
        Dim ObjAF As New ClsAF()
-        If ObjAF.GetActivosFijos(-1, 13, "-1", "-1", -1, -1, "-1", -1, -1, -1, -1, 1, "-1", -1, -1, -1) Then
+        If ObjAF.GetActivosFijos(-1, UsuarioActual.CveEmpresa, "-1", "-1", -1, -1, "-1", -1, -1, -1, -1, 1, "-1", -1, -1, -1) Then
            If ObjAF.DtResultados.Rows.Count > 0 Then
                DdlTransporte.DataSource = ObjAF.DtResultados
                DdlTransporte.Items.Insert(0, New ListItem("Seleccione", ""))