AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Corrección en Clientes, Ddl Cliente-sucursal tiene otro comportamiento, no usar sub de ClsPaginas

Browse Source
This commit is contained in:
MLopez
2023-02-11 09:26:04 -07:00
parent 963387aa8c
commit f1495d6ad4
1 changed files with 3 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
Ventas/Clientes.aspx.vb
View File

@@ -1130,10 +1130,6 @@ Partial Class Clientes
End If End If
End If End If
ObjCliente.Dispose() ObjCliente.Dispose()
DdlSucursalCliente.DataBind() DdlSucursalCliente.DataBind()
@@ -1148,9 +1144,9 @@ Partial Class Clientes
DdlClienteSucursalEnvio.DataBind() DdlClienteSucursalEnvio.DataBind()
DdlClienteSucursalEnvio.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlClienteSucursalEnvio.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlClienteSucursalEnvio.SelectedValue = "-1" DdlClienteSucursalEnvio.SelectedValue = "-1"
End Sub
Private Sub CargaSubProyectosSuscursales()
CargarCentrosDeCosto(Nothing, DdlSubProyectoClienteSucursal, Nothing, LblSubProyectoClienteSucursal)
End Sub End Sub
Private Sub CargaGridRetenciones() Private Sub CargaGridRetenciones()
Dim ObjClientes As New ClsClientes Dim ObjClientes As New ClsClientes
@@ -1161,10 +1157,6 @@ Partial Class Clientes
ObjClientes.Dispose() ObjClientes.Dispose()
GvRetenciones.DataBind() GvRetenciones.DataBind()
End Sub End Sub
Private Sub CargaCuentasEquipos() Private Sub CargaCuentasEquipos()
Dim Objeto As New ClsGenerales Dim Objeto As New ClsGenerales
If Objeto.GetCuentasEquipos(CveCliente, -1) Then If Objeto.GetCuentasEquipos(CveCliente, -1) Then