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

-- cambio centros de costo

Browse Source
This commit is contained in:
rrene
2023-02-14 12:32:35 -07:00
parent 4737832a20
commit 2c6f6fbca5
4 changed files with 4 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Ventas/RepProductosServicios.aspx.vb
View File

@@ -158,7 +158,7 @@ Partial Class Ventas_RepProductosServicios
DdlClienteClasificacion.Items.Insert(0, New ListItem("Todos", "-1"))
CargaGrupo()
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, Nothing, LblSubProyecto)
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyecto, divProyecto:=DivProyecto)
CargarCentrosDeCosto(Nothing, DdlSubProyectoEjecucion, Nothing, Nothing)
TipoCambio = 1

3
Ventas/RepProductosServiciosDetalle.aspx.vb
View File

@@ -189,7 +189,7 @@ Partial Class Ventas_RepProductosServiciosDetalle
DdlTipoPSDes.DataBind()
CargaGrupo()
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, Nothing, LblSubProyecto)
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyecto, divProyecto:=DivProyecto)
CargarCentrosDeCosto(Nothing, DdlSubProyectoEjecucion, Nothing, Nothing)
TCEspecifico = 0
@@ -406,7 +406,6 @@ Partial Class Ventas_RepProductosServiciosDetalle
CveMoneda = If(Request("CveMoneda") IsNot Nothing AndAlso Request("CveMoneda").ToEntero() > 0, Request("CveMoneda").ToEntero(), -1).ToEntero
DdlProyecto.SelectedValueExist(CveProyecto)
If DivProyecto.Visible Then CargaSubProyecto()
DdlSubProyecto.SelectedValueExist(CveSubProyecto)
DdlCategoria.SelectedValueExist(CveCategoria)
DdlClasificacion.SelectedValueExist(CveClasificacion)