diff --git a/Inventarios/EntregasPorRealizar.aspx.cs b/Inventarios/EntregasPorRealizar.aspx.cs index 44a8d193e..93a38ff12 100644 --- a/Inventarios/EntregasPorRealizar.aspx.cs +++ b/Inventarios/EntregasPorRealizar.aspx.cs @@ -99,7 +99,7 @@ public partial class Inventarios_EntregasPorRealizar : ClsPaginas int CvePaqueteriasGuias = row.DataKey("CvePaqueteriaGuia").ToEntero(); int Orden = row.DataKey("Orden").ToEntero(); - if (!ObjGeneral.AsignarEntregasPorRealizar(CvePaqueteriasGuias, CvePersonal:CvePersonal, CveAsignacionEntrega: CveAsignacionEntrega, Orden: Orden)) + if (!ObjGeneral.AsignarEntregasPorRealizar(CvePaqueteriasGuias, CvePersonal:CvePersonal, CveAsignacionEntrega: CveAsignacionEntrega )) { TieneError = true; break; diff --git a/Inventarios/RecepcionDevolucion.aspx.vb b/Inventarios/RecepcionDevolucion.aspx.vb index b1b536de3..bb687ac11 100644 --- a/Inventarios/RecepcionDevolucion.aspx.vb +++ b/Inventarios/RecepcionDevolucion.aspx.vb @@ -769,7 +769,7 @@ Partial Class Inventarios_RecepcionDevolucion ObjRemisionNC.IEPS = ImporteIEPS ObjRemisionNC.Total = Total ObjRemisionNC.TotalOtrosConceptos = 0 - ObjRemisionNC.ObservacionesMovimiento = TxtObservaciones.Text + ObjRemisionNC.ObservacionesAlmacen = TxtObservaciones.Text ObjRemisionNC.DtInventario = DtInventario diff --git a/Inventarios/RepApartados2.aspx.vb b/Inventarios/RepApartados2.aspx.vb index 521f152f6..2b3270f10 100644 --- a/Inventarios/RepApartados2.aspx.vb +++ b/Inventarios/RepApartados2.aspx.vb @@ -38,11 +38,7 @@ Partial Class Inventarios_RepApartados2 DdlCliente.DataBind() DdlCliente.Items.Insert(0, New ListItem(" Todos ", "-1")) - - Dim DTVendedores As New DataTable - DTVendedores = GlobalDTVendedores(UsuarioActual.CveEmpresa, True) - DTVendedores.Merge(GlobalDTVendedores(UsuarioActual.CveEmpresa, False)) - DdlVendedor.DataSource = DTVendedores + DdlVendedor.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa, -1) DdlVendedor.DataBind() DdlVendedor.Items.Insert(0, New ListItem(" Todos ", "-1")) diff --git a/Inventarios/RepEntregasForaneas.aspx.vb b/Inventarios/RepEntregasForaneas.aspx.vb index 5e7d46689..6709e9a4d 100644 --- a/Inventarios/RepEntregasForaneas.aspx.vb +++ b/Inventarios/RepEntregasForaneas.aspx.vb @@ -733,7 +733,6 @@ Partial Class Inventarios_RepEntregasForaneas Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png") params.Add(New ReportParameter("pImg", If(Imagen.Exists, $"file://{Imagen.FullName}", ""))) - Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png") Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa) params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa)) diff --git a/OI/RepTareas3.aspx.cs b/OI/RepTareas3.aspx.cs index bc044fee3..a37a27eab 100644 --- a/OI/RepTareas3.aspx.cs +++ b/OI/RepTareas3.aspx.cs @@ -17,6 +17,6 @@ public partial class OI_RepTareas3 : System.Web.UI.Page protected void LnkAddEvento_Click(object sender, EventArgs e) { - RegistraScript(string.Format("$('#{0}').modal()", iddivAgregar)); + //RegistraScript(string.Format("$('#{0}').modal()", iddivAgregar)); } } \ No newline at end of file diff --git a/OS/CatEstatusOrdenServicio.aspx.vb b/OS/CatEstatusOrdenServicio.aspx.vb index a197bd468..dc7598417 100644 --- a/OS/CatEstatusOrdenServicio.aspx.vb +++ b/OS/CatEstatusOrdenServicio.aspx.vb @@ -78,7 +78,7 @@ Partial Class OS_CatEstatusOrdenServicio Public Sub CargaDatos() DTUsuarios = GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa) Using ObjEstatusOrdenServicios As New ClsOS - If ObjEstatusOrdenServicios.GetEstatusOrdenServicio() Then + If ObjEstatusOrdenServicios.GetEstatusOrdenServicio(UsuarioActual.CveEmpresa) Then DtEstatusOS = ObjEstatusOrdenServicios.DtResultados.FiltraParametros(String.Format("CveEmpresa = {0}", UsuarioActual.CveEmpresa)) GvDatos.DataSource = DtEstatusOS GlobalDTEstatusOrdenServicios(UsuarioActual.CveEmpresa) = ObjEstatusOrdenServicios.DtResultados diff --git a/Prospectos/CatEventosEstructuras.aspx.vb b/Prospectos/CatEventosEstructuras.aspx.vb index e30a647ca..ac39d71f9 100644 --- a/Prospectos/CatEventosEstructuras.aspx.vb +++ b/Prospectos/CatEventosEstructuras.aspx.vb @@ -14,7 +14,7 @@ Partial Class Prospectos_CatEventosEstructuras CargaEventoTipo() CargaDatos() CargaAnfitrion(DdlAnfitrion) - DdlMunicipio.DataSource = GlobalDTGralMunicipios(26) + DdlMunicipio.DataSource = GlobalDTGralMunicipios("26") DdlMunicipio.DataBind() End If End Sub @@ -102,7 +102,7 @@ Partial Class Prospectos_CatEventosEstructuras e.Row.FCDropDownList("DdlEventoTipo").DataBind() e.Row.FCDropDownList("DdlEventoTipo").SelectedValue = e.Row.DBCampo("CveEventoTipo") - e.Row.FCDropDownList("DdlMunicipio").DataSource = GlobalDTGralMunicipios(26) + e.Row.FCDropDownList("DdlMunicipio").DataSource = GlobalDTGralMunicipios("26") e.Row.FCDropDownList("DdlMunicipio").DataBind() e.Row.FCDropDownList("DdlMunicipio").SelectedValue = e.Row.DBCampo("CveMunicipio") diff --git a/Prospectos/CatProspectosRedesMetas.aspx.vb b/Prospectos/CatProspectosRedesMetas.aspx.vb index 6033c63a6..6f8efd243 100644 --- a/Prospectos/CatProspectosRedesMetas.aspx.vb +++ b/Prospectos/CatProspectosRedesMetas.aspx.vb @@ -35,7 +35,7 @@ Partial Class Prospectos_CatProspectosRedesMetas DdlClasificacion.DataSource = GlobalDTProspectosClasificaciones(UsuarioActual.CveEmpresa) : DdlClasificacion.DataBind() DdlZona.DataSource = GlobalDTProspectosSupervisores(UsuarioActual.CveEmpresa) : DdlZona.DataBind() DdlRegion.DataSource = GlobalDTProspectosCoordinadores(DdlZona.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) : DdlRegion.DataBind() - DdlMunicipioFiltro.DataSource = GlobalDTGralMunicipios(26) : DdlMunicipioFiltro.DataBind() + DdlMunicipioFiltro.DataSource = GlobalDTGralMunicipios("26") : DdlMunicipioFiltro.DataBind() CargaDatos() diff --git a/Prospectos/Prospectos.aspx.vb b/Prospectos/Prospectos.aspx.vb index 49ace671c..5ced21f5c 100644 --- a/Prospectos/Prospectos.aspx.vb +++ b/Prospectos/Prospectos.aspx.vb @@ -79,7 +79,7 @@ Partial Class Prospectos_Prospectos DdlPaises.SelectedValue = "1" DdlEmpresaPaises.SelectedValue = "1" DdlEmpresaPaises.DataSource = GlobalDTGralPaises : DdlEmpresaPaises.DataBind() - DdlFiscalEstados.DataSource = GlobalDTGralEstados(1) : DdlFiscalEstados.DataBind() + DdlFiscalEstados.DataSource = GlobalDTGralEstados("1") : DdlFiscalEstados.DataBind() 'DdlMunicipios.DataSource = GlobalDTGralMunicipios : DdlMunicipios.DataBind() @@ -88,7 +88,7 @@ Partial Class Prospectos_Prospectos CargaDatos() 'Configuración de Modalidad Update BtnGuardar.Text = "Guardar Cambios" - LtlTitulo.Text = "Consulta del Prospecto:" + LtlTitulo.Text = "Consulta del Prospecto: " 'ImgAddObs.Attributes.Add("onclick", "javascript:$('#DivEventoBitacora').show(1000); PosicionaObjeto(this.id,'DivEventoBitacora');") 'Else @@ -337,11 +337,11 @@ Partial Class Prospectos_Prospectos Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer) - ddl.DataSource = GlobalDTGralEstados(CvePais) : ddl.DataBind() + ddl.DataSource = GlobalDTGralEstados(CvePais.ToString) : ddl.DataBind() End Sub Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer) - ddl.DataSource = GlobalDTGralMunicipios(CveEstado) : ddl.DataBind() + ddl.DataSource = GlobalDTGralMunicipios(CveEstado.ToString) : ddl.DataBind() End Sub Protected Sub CargaCaracteristicas() diff --git a/Prospectos/ProspectosEstructuras.aspx.vb b/Prospectos/ProspectosEstructuras.aspx.vb index 09203cf85..7a172decd 100644 --- a/Prospectos/ProspectosEstructuras.aspx.vb +++ b/Prospectos/ProspectosEstructuras.aspx.vb @@ -208,11 +208,11 @@ Partial Class Prospectos_ProspectosEstructuras End Sub Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer) - ddl.DataSource = GlobalDTGralEstados(CvePais) : ddl.DataBind() + ddl.DataSource = GlobalDTGralEstados(CvePais.ToString) : ddl.DataBind() End Sub Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer) - ddl.DataSource = GlobalDTGralMunicipios(CveEstado) : ddl.DataBind() + ddl.DataSource = GlobalDTGralMunicipios(CveEstado.ToString) : ddl.DataBind() End Sub Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click diff --git a/Prospectos/ProspectosRedes.aspx.vb b/Prospectos/ProspectosRedes.aspx.vb index b463acb29..3fcdd5eea 100644 --- a/Prospectos/ProspectosRedes.aspx.vb +++ b/Prospectos/ProspectosRedes.aspx.vb @@ -201,11 +201,11 @@ Partial Class Prospectos_ProspectosRedes End Sub Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer) - ddl.DataSource = GlobalDTGralEstados(CvePais) : ddl.DataBind() + ddl.DataSource = GlobalDTGralEstados(CvePais.ToString) : ddl.DataBind() End Sub Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer) - ddl.DataSource = GlobalDTGralMunicipios(CveEstado) : ddl.DataBind() + ddl.DataSource = GlobalDTGralMunicipios(CveEstado.ToString) : ddl.DataBind() End Sub Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click diff --git a/Prospectos/RedesArbol.aspx.vb b/Prospectos/RedesArbol.aspx.vb index 0f28d9c0e..601b71be0 100644 --- a/Prospectos/RedesArbol.aspx.vb +++ b/Prospectos/RedesArbol.aspx.vb @@ -36,7 +36,7 @@ Partial Class Prospectos_RedesArbol DdlClasificacion.DataSource = GlobalDTProspectosClasificaciones(UsuarioActual.CveEmpresa) : DdlClasificacion.DataBind() DdlZona.DataSource = GlobalDTProspectosSupervisores(UsuarioActual.CveEmpresa) : DdlZona.DataBind() DdlRegion.DataSource = GlobalDTProspectosCoordinadores(DdlZona.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) : DdlRegion.DataBind() - DdlMunicipioFiltro.DataSource = GlobalDTGralMunicipios(26) : DdlMunicipioFiltro.DataBind() + DdlMunicipioFiltro.DataSource = GlobalDTGralMunicipios("26") : DdlMunicipioFiltro.DataBind() CargaDatos(True) ImgPersonalizar.Attributes.Add("onclick", "$('#DivPersonalizar').show(1000); PosicionaObjeto(this.id,'DivPersonalizar');") diff --git a/Prospectos/RedesEncuestas.aspx.vb b/Prospectos/RedesEncuestas.aspx.vb index b811fa03e..b0e2ade0c 100644 --- a/Prospectos/RedesEncuestas.aspx.vb +++ b/Prospectos/RedesEncuestas.aspx.vb @@ -155,11 +155,11 @@ Partial Class Prospectos_RedesEncuestas End Sub Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer) - ddl.DataSource = GlobalDTGralEstados(CvePais) : ddl.DataBind() + ddl.DataSource = GlobalDTGralEstados(CvePais.ToString) : ddl.DataBind() End Sub Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer) - ddl.DataSource = GlobalDTGralMunicipios(CveEstado) : ddl.DataBind() + ddl.DataSource = GlobalDTGralMunicipios(CveEstado.ToString) : ddl.DataBind() End Sub Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click