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

-- mejoras en warnings

Browse Source
This commit is contained in:
rrene
2023-02-11 08:33:59 -07:00
parent 8912f57cf8
commit ce8e30d395
13 changed files with 19 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Inventarios/EntregasPorRealizar.aspx.cs
View File

@@ -99,7 +99,7 @@ public partial class Inventarios_EntregasPorRealizar : ClsPaginas
int CvePaqueteriasGuias = row.DataKey("CvePaqueteriaGuia").ToEntero(); int CvePaqueteriasGuias = row.DataKey("CvePaqueteriaGuia").ToEntero();
int Orden = row.DataKey("Orden").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; TieneError = true;
break; break;

2
Inventarios/RecepcionDevolucion.aspx.vb
View File

@@ -769,7 +769,7 @@ Partial Class Inventarios_RecepcionDevolucion
ObjRemisionNC.IEPS = ImporteIEPS ObjRemisionNC.IEPS = ImporteIEPS
ObjRemisionNC.Total = Total ObjRemisionNC.Total = Total
ObjRemisionNC.TotalOtrosConceptos = 0 ObjRemisionNC.TotalOtrosConceptos = 0
ObjRemisionNC.ObservacionesMovimiento = TxtObservaciones.Text ObjRemisionNC.ObservacionesAlmacen = TxtObservaciones.Text
ObjRemisionNC.DtInventario = DtInventario ObjRemisionNC.DtInventario = DtInventario

6
Inventarios/RepApartados2.aspx.vb
View File

@@ -38,11 +38,7 @@ Partial Class Inventarios_RepApartados2
DdlCliente.DataBind() DdlCliente.DataBind()
DdlCliente.Items.Insert(0, New ListItem(" Todos ", "-1")) DdlCliente.Items.Insert(0, New ListItem(" Todos ", "-1"))
DdlVendedor.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa, -1)
Dim DTVendedores As New DataTable
DTVendedores = GlobalDTVendedores(UsuarioActual.CveEmpresa, True)
DTVendedores.Merge(GlobalDTVendedores(UsuarioActual.CveEmpresa, False))
DdlVendedor.DataSource = DTVendedores
DdlVendedor.DataBind() DdlVendedor.DataBind()
DdlVendedor.Items.Insert(0, New ListItem(" Todos ", "-1")) DdlVendedor.Items.Insert(0, New ListItem(" Todos ", "-1"))

1
Inventarios/RepEntregasForaneas.aspx.vb
View File

@@ -733,7 +733,6 @@ Partial Class Inventarios_RepEntregasForaneas
Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png") Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png")
params.Add(New ReportParameter("pImg", If(Imagen.Exists, $"file://{Imagen.FullName}", ""))) 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) 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)) params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))

2
OI/RepTareas3.aspx.cs
View File

@@ -17,6 +17,6 @@ public partial class OI_RepTareas3 : System.Web.UI.Page
protected void LnkAddEvento_Click(object sender, EventArgs e) protected void LnkAddEvento_Click(object sender, EventArgs e)
{ {
RegistraScript(string.Format("$('#{0}').modal()", iddivAgregar)); //RegistraScript(string.Format("$('#{0}').modal()", iddivAgregar));
} }
} }

2
OS/CatEstatusOrdenServicio.aspx.vb
View File

@@ -78,7 +78,7 @@ Partial Class OS_CatEstatusOrdenServicio
Public Sub CargaDatos() Public Sub CargaDatos()
DTUsuarios = GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa) DTUsuarios = GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa)
Using ObjEstatusOrdenServicios As New ClsOS 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)) DtEstatusOS = ObjEstatusOrdenServicios.DtResultados.FiltraParametros(String.Format("CveEmpresa = {0}", UsuarioActual.CveEmpresa))
GvDatos.DataSource = DtEstatusOS GvDatos.DataSource = DtEstatusOS
GlobalDTEstatusOrdenServicios(UsuarioActual.CveEmpresa) = ObjEstatusOrdenServicios.DtResultados GlobalDTEstatusOrdenServicios(UsuarioActual.CveEmpresa) = ObjEstatusOrdenServicios.DtResultados

4
Prospectos/CatEventosEstructuras.aspx.vb
View File

@@ -14,7 +14,7 @@ Partial Class Prospectos_CatEventosEstructuras
CargaEventoTipo() CargaEventoTipo()
CargaDatos() CargaDatos()
CargaAnfitrion(DdlAnfitrion) CargaAnfitrion(DdlAnfitrion)
DdlMunicipio.DataSource = GlobalDTGralMunicipios(26) DdlMunicipio.DataSource = GlobalDTGralMunicipios("26")
DdlMunicipio.DataBind() DdlMunicipio.DataBind()
End If End If
End Sub End Sub
@@ -102,7 +102,7 @@ Partial Class Prospectos_CatEventosEstructuras
e.Row.FCDropDownList("DdlEventoTipo").DataBind() e.Row.FCDropDownList("DdlEventoTipo").DataBind()
e.Row.FCDropDownList("DdlEventoTipo").SelectedValue = e.Row.DBCampo("CveEventoTipo") 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").DataBind()
e.Row.FCDropDownList("DdlMunicipio").SelectedValue = e.Row.DBCampo("CveMunicipio") e.Row.FCDropDownList("DdlMunicipio").SelectedValue = e.Row.DBCampo("CveMunicipio")

2
Prospectos/CatProspectosRedesMetas.aspx.vb
View File

@@ -35,7 +35,7 @@ Partial Class Prospectos_CatProspectosRedesMetas
DdlClasificacion.DataSource = GlobalDTProspectosClasificaciones(UsuarioActual.CveEmpresa) : DdlClasificacion.DataBind() DdlClasificacion.DataSource = GlobalDTProspectosClasificaciones(UsuarioActual.CveEmpresa) : DdlClasificacion.DataBind()
DdlZona.DataSource = GlobalDTProspectosSupervisores(UsuarioActual.CveEmpresa) : DdlZona.DataBind() DdlZona.DataSource = GlobalDTProspectosSupervisores(UsuarioActual.CveEmpresa) : DdlZona.DataBind()
DdlRegion.DataSource = GlobalDTProspectosCoordinadores(DdlZona.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) : DdlRegion.DataBind() DdlRegion.DataSource = GlobalDTProspectosCoordinadores(DdlZona.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) : DdlRegion.DataBind()
DdlMunicipioFiltro.DataSource = GlobalDTGralMunicipios(26) : DdlMunicipioFiltro.DataBind() DdlMunicipioFiltro.DataSource = GlobalDTGralMunicipios("26") : DdlMunicipioFiltro.DataBind()
CargaDatos() CargaDatos()

8
Prospectos/Prospectos.aspx.vb
View File

@@ -79,7 +79,7 @@ Partial Class Prospectos_Prospectos
DdlPaises.SelectedValue = "1" DdlPaises.SelectedValue = "1"
DdlEmpresaPaises.SelectedValue = "1" DdlEmpresaPaises.SelectedValue = "1"
DdlEmpresaPaises.DataSource = GlobalDTGralPaises : DdlEmpresaPaises.DataBind() DdlEmpresaPaises.DataSource = GlobalDTGralPaises : DdlEmpresaPaises.DataBind()
DdlFiscalEstados.DataSource = GlobalDTGralEstados(1) : DdlFiscalEstados.DataBind() DdlFiscalEstados.DataSource = GlobalDTGralEstados("1") : DdlFiscalEstados.DataBind()
'DdlMunicipios.DataSource = GlobalDTGralMunicipios : DdlMunicipios.DataBind() 'DdlMunicipios.DataSource = GlobalDTGralMunicipios : DdlMunicipios.DataBind()
@@ -88,7 +88,7 @@ Partial Class Prospectos_Prospectos
CargaDatos() CargaDatos()
'Configuración de Modalidad Update 'Configuración de Modalidad Update
BtnGuardar.Text = "Guardar Cambios" 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');") 'ImgAddObs.Attributes.Add("onclick", "javascript:$('#DivEventoBitacora').show(1000); PosicionaObjeto(this.id,'DivEventoBitacora');")
'Else 'Else
@@ -337,11 +337,11 @@ Partial Class Prospectos_Prospectos
Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer) Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer)
ddl.DataSource = GlobalDTGralEstados(CvePais) : ddl.DataBind() ddl.DataSource = GlobalDTGralEstados(CvePais.ToString) : ddl.DataBind()
End Sub End Sub
Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer) Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer)
ddl.DataSource = GlobalDTGralMunicipios(CveEstado) : ddl.DataBind() ddl.DataSource = GlobalDTGralMunicipios(CveEstado.ToString) : ddl.DataBind()
End Sub End Sub
Protected Sub CargaCaracteristicas() Protected Sub CargaCaracteristicas()

4
Prospectos/ProspectosEstructuras.aspx.vb
View File

@@ -208,11 +208,11 @@ Partial Class Prospectos_ProspectosEstructuras
End Sub End Sub
Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer) Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer)
ddl.DataSource = GlobalDTGralEstados(CvePais) : ddl.DataBind() ddl.DataSource = GlobalDTGralEstados(CvePais.ToString) : ddl.DataBind()
End Sub End Sub
Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer) Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer)
ddl.DataSource = GlobalDTGralMunicipios(CveEstado) : ddl.DataBind() ddl.DataSource = GlobalDTGralMunicipios(CveEstado.ToString) : ddl.DataBind()
End Sub End Sub
Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click

4
Prospectos/ProspectosRedes.aspx.vb
View File

@@ -201,11 +201,11 @@ Partial Class Prospectos_ProspectosRedes
End Sub End Sub
Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer) Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer)
ddl.DataSource = GlobalDTGralEstados(CvePais) : ddl.DataBind() ddl.DataSource = GlobalDTGralEstados(CvePais.ToString) : ddl.DataBind()
End Sub End Sub
Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer) Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer)
ddl.DataSource = GlobalDTGralMunicipios(CveEstado) : ddl.DataBind() ddl.DataSource = GlobalDTGralMunicipios(CveEstado.ToString) : ddl.DataBind()
End Sub End Sub
Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click

2
Prospectos/RedesArbol.aspx.vb
View File

@@ -36,7 +36,7 @@ Partial Class Prospectos_RedesArbol
DdlClasificacion.DataSource = GlobalDTProspectosClasificaciones(UsuarioActual.CveEmpresa) : DdlClasificacion.DataBind() DdlClasificacion.DataSource = GlobalDTProspectosClasificaciones(UsuarioActual.CveEmpresa) : DdlClasificacion.DataBind()
DdlZona.DataSource = GlobalDTProspectosSupervisores(UsuarioActual.CveEmpresa) : DdlZona.DataBind() DdlZona.DataSource = GlobalDTProspectosSupervisores(UsuarioActual.CveEmpresa) : DdlZona.DataBind()
DdlRegion.DataSource = GlobalDTProspectosCoordinadores(DdlZona.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) : DdlRegion.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) CargaDatos(True)
ImgPersonalizar.Attributes.Add("onclick", "$('#DivPersonalizar').show(1000); PosicionaObjeto(this.id,'DivPersonalizar');") ImgPersonalizar.Attributes.Add("onclick", "$('#DivPersonalizar').show(1000); PosicionaObjeto(this.id,'DivPersonalizar');")

4
Prospectos/RedesEncuestas.aspx.vb
View File

@@ -155,11 +155,11 @@ Partial Class Prospectos_RedesEncuestas
End Sub End Sub
Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer) Private Sub CargaEstados(ddl As DropDownList, CvePais As Integer)
ddl.DataSource = GlobalDTGralEstados(CvePais) : ddl.DataBind() ddl.DataSource = GlobalDTGralEstados(CvePais.ToString) : ddl.DataBind()
End Sub End Sub
Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer) Private Sub CargaMunicipios(ddl As DropDownList, CveEstado As Integer)
ddl.DataSource = GlobalDTGralMunicipios(CveEstado) : ddl.DataBind() ddl.DataSource = GlobalDTGralMunicipios(CveEstado.ToString) : ddl.DataBind()
End Sub End Sub
Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click