diff --git a/Compras/RepCompras.aspx.vb b/Compras/RepCompras.aspx.vb
index 192b4ee23..29c071940 100644
--- a/Compras/RepCompras.aspx.vb
+++ b/Compras/RepCompras.aspx.vb
@@ -68,7 +68,7 @@ Partial Class Compras_RepCompras
txtFechaI.Text = $"01/01/{Now.Year}"
'Carga Tipo Centro de Costo
- CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, Nothing, LblSubProyecto)
+ CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyecto, divProyecto:=DivProyecto)
'CargaProveedores
DdlProveedores.setEsWebService(True)
diff --git a/Compras/RepComprasDetalle.aspx.vb b/Compras/RepComprasDetalle.aspx.vb
index 9cc0a6ffd..25c891941 100644
--- a/Compras/RepComprasDetalle.aspx.vb
+++ b/Compras/RepComprasDetalle.aspx.vb
@@ -178,8 +178,8 @@ Partial Class Compras_RepComprasDetalle
End Sub
Private Sub CargaCombos()
- 'Carga Tipo Centro de Costo
- CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, Nothing, LblSubProyecto)
+ 'Carga Tipo Centro de Costo
+ CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyecto, divProyecto:=DivProyecto)
'Carga Tipo de Gasto
DdlTipoGasto.DataSource = GlobalDTTiposGastos(UsuarioActual.CveEmpresa)
diff --git a/Compras/RepComprasPeriodo.aspx.vb b/Compras/RepComprasPeriodo.aspx.vb
index 813fc67d0..868cc3b53 100644
--- a/Compras/RepComprasPeriodo.aspx.vb
+++ b/Compras/RepComprasPeriodo.aspx.vb
@@ -51,7 +51,7 @@ Partial Class Compras_RepComprasPeriodo
Private Sub CargaCombos()
'Carga Tipo Centro de Costo
- CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, Nothing, LblSubProyecto)
+ CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyecto, divProyecto:=DivProyecto)
'Carga Proveedores
DdlProveedores.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
diff --git a/CxC/RepCxC.aspx b/CxC/RepCxC.aspx
index 8b9913fba..efdbd5a25 100644
--- a/CxC/RepCxC.aspx
+++ b/CxC/RepCxC.aspx
@@ -116,10 +116,8 @@