-- carga estatus activos de modelos de autos

2022-03-02 22:15:20 -07:00
parent 4850ef01d1
commit cb280f03ee
1 changed files with 1 additions and 1 deletions
--- a/Ventas/PV.aspx.vb
+++ b/Ventas/PV.aspx.vb
@@ -6820,7 +6820,7 @@ Partial Class PV

    Private Sub CargaModelos()
        Dim ObjGral As New ClsGenerales
-        If ObjGral.ModelosAutosGet(UsuarioActual.CveEmpresa) Then
+        If ObjGral.ModelosAutosGet(1, UsuarioActual.CveEmpresa) Then
            DtModelosAuto = ObjGral.DtResultados
            DdlModeloAuto.DataSource = DtModelosAuto
        End If