From aaa3b42399a52c13bcb5e37a01056f7864ffd48a Mon Sep 17 00:00:00 2001 From: rakcsle Date: Tue, 26 Jul 2022 09:04:52 -0700 Subject: [PATCH 1/7] Cambios solicitudesIngresos SAT, mensajes efacturas descarga de facturas --- Compras/eFacturas.aspx.vb | 14 +- SAT/SolicitudesIngresoSat.aspx | 64 +++++++-- SAT/SolicitudesIngresoSat.aspx.cs | 227 +++++++++++++++++++----------- 3 files changed, 204 insertions(+), 101 deletions(-) diff --git a/Compras/eFacturas.aspx.vb b/Compras/eFacturas.aspx.vb index 85d745c64..b7a4ef535 100644 --- a/Compras/eFacturas.aspx.vb +++ b/Compras/eFacturas.aspx.vb @@ -2645,10 +2645,10 @@ Partial Class Compras_eFacturas sbResultado.Append($"{resultSolicitud(1)}
") Else sbResultado.Append($"Solicitud Generada Correctamente") - sbResultado.Append($"Se presento un error al verificar las solicitudes
{resultSolicitud(2)}
") + sbResultado.Append($"Se presento un error al verificar las solicitudes
{resultSolicitud(1)}
") End If Else - sbResultado.Append($"{resultSolicitud(2)}") + sbResultado.Append($"{resultSolicitud(1)}") TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia End If Else @@ -2675,7 +2675,7 @@ Partial Class Compras_eFacturas If Continuar Then txtFechaIAdd.Text = "" txtFechaFAdd.Text = "" - Me.RegistraScript("$('#ModalAgregarSolicitud').modal('hide');") + Me.RegistraScript("$('#ModalViewSolicitudes').modal('hide');") cargasolicitudes() End If @@ -2723,10 +2723,10 @@ Partial Class Compras_eFacturas sbResultado.Append($"{resultSolicitud(2)}
") Else sbResultado.Append($"Solicitud Generada Correctamente") - sbResultado.Append($"Se presento un error al verificar las solicitudes
{resultSolicitud(2)}
") + sbResultado.Append($"Se presento un error al verificar las solicitudes
{resultSolicitud(1)}
") End If Else - sbResultado.Append($"{resultSolicitud(2)}") + sbResultado.Append($"{resultSolicitud(1)}") TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia End If Else @@ -2737,9 +2737,9 @@ Partial Class Compras_eFacturas If SeVerifico AndAlso resultVerificacion.Count = 4 Then If ResultadoVerificaionOK Then - sbResultado.Append($"{resultVerificacion(2)}
") + sbResultado.Append($"{resultVerificacion(1)}
") Else - sbResultado.Append($"Se presento un error al verificar las solicitudes {resultVerificacion(2)}
") + sbResultado.Append($"Se presento un error al verificar las solicitudes {resultVerificacion(1)}
") TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia End If Else diff --git a/SAT/SolicitudesIngresoSat.aspx b/SAT/SolicitudesIngresoSat.aspx index a8b5ff7e0..f7319dad0 100644 --- a/SAT/SolicitudesIngresoSat.aspx +++ b/SAT/SolicitudesIngresoSat.aspx @@ -205,6 +205,9 @@ .reporte9 .GVSolicitudTimbreNominaGral tr td:nth-child(n+40) { text-align: right !important; } + + + @@ -219,7 +222,7 @@
  • - Solicitudes + Solicitudes
    • @@ -329,7 +332,7 @@
    + DataKeyNames="UUID,CountRegistros,VTotal,CBTTotal,CountRegistrosSIG,CountRegistrosSAT"> @@ -469,7 +472,7 @@
    - Verificar pendientes +
    diff --git a/SAT/SolicitudesIngresoSat.aspx.cs b/SAT/SolicitudesIngresoSat.aspx.cs index c2aef546f..13f65f1b5 100644 --- a/SAT/SolicitudesIngresoSat.aspx.cs +++ b/SAT/SolicitudesIngresoSat.aspx.cs @@ -179,6 +179,7 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas private void cargasolicitudes() { + LnkverificarSolicitudes.Visible = false; using (ClsNominas nom = new ClsNominas()) { @@ -187,6 +188,13 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas GVSolicitudesPendientes.DataSource = nom.DtResultados.FiltraParametros("Estatus =0"); GVSolicitudesPendientes.DataBind(); + + if (nom.DtResultados.FiltraParametros("Estatus =0").Rows.Count > 0) + { + LnkverificarSolicitudes.Visible = true; + } + + GVSolicitudesNominas.DataSource = nom.DtResultados.FiltraParametros("Estatus =1"); GVSolicitudesNominas.DataBind(); } @@ -271,12 +279,12 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas else { sbResultado.Append($"Solicitud Generada Correctamente"); - sbResultado.Append($"Se presento un error al verificar las solicitudes
    {resultSolicitud[2]}
    "); + sbResultado.Append($"Se presento un error al verificar las solicitudes
    {resultSolicitud[1]}
    "); } } else { - sbResultado.Append($"{resultSolicitud[2]}"); + sbResultado.Append($"{resultSolicitud[1]}"); TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; } } @@ -287,23 +295,23 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas } - if (SeVerifico && resultVerificacion.Count == 4) - { - if (ResultadoVerificaionOK) - { - sbResultado.Append($"{resultVerificacion[1]}
    "); - } - else - { - sbResultado.Append($"Se presento un error al verificar las solicitudes {resultVerificacion[1]}
    "); - TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; - } - } - else - { - sbResultado.AppendLine("Se presento un error al verificar las solicitudes (API)
    "); - TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; - } + //if (SeVerifico && resultVerificacion.Count == 4) + //{ + // if (ResultadoVerificaionOK) + // { + // sbResultado.Append($"{resultVerificacion[1]}
    "); + // } + // else + // { + // sbResultado.Append($"Se presento un error al verificar las solicitudes {resultVerificacion[1]}
    "); + // TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; + // } + //} + //else + //{ + // sbResultado.AppendLine("Se presento un error al verificar las solicitudes (API)
    "); + // TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; + //} Alert(sbResultado.ToString(), TipoMensaje); } @@ -327,95 +335,104 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas - StringBuilder sbResultado = new StringBuilder(); - var api = new GeneralesAPII(); - JToken ObjApiSolicitud = (JToken)api.GeneraSolicitud(UsuarioActual.CveEmpresa, 3); - List resultSolicitud = new List(); - List resultVerificacion = new List(); - var ResultadoVerificaionOK = false; - var SeVerifico = false; - var TipoMensaje = ModExtensiones.TipoMensaje.MsgInformacion; - var ResultadoSolicitudOK = false; - if (!(ObjApiSolicitud == null)) + try { - resultSolicitud = ObjApiSolicitud.Select(token => token.Values().Aggregate((i, j) => $"{i}|{j}").Value()).ToList(); - ResultadoSolicitudOK = bool.Parse(resultSolicitud[0]); - } - else - { - TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; - } + StringBuilder sbResultado = new StringBuilder(); + var api = new GeneralesAPII(); + JToken ObjApiSolicitud = (JToken)api.GeneraSolicitud(UsuarioActual.CveEmpresa, 3); + List resultSolicitud = new List(); + List resultVerificacion = new List(); + var ResultadoVerificaionOK = false; + var SeVerifico = false; + var TipoMensaje = ModExtensiones.TipoMensaje.MsgInformacion; + var ResultadoSolicitudOK = false; - - if (ResultadoSolicitudOK) - { - JToken ObjApiVerificacion = (JToken)api.VerificaSolicitudesNominas(UsuarioActual.CveEmpresa, 3); - - - if (!(ObjApiVerificacion == null)) + if (!(ObjApiSolicitud == null)) { - resultVerificacion = ObjApiVerificacion.Select(token => token.Values().Aggregate((i, j) => $"{i}|{j}").Value()).ToList(); - ResultadoVerificaionOK = bool.Parse(resultVerificacion[0]); - SeVerifico = true; + resultSolicitud = ObjApiSolicitud.Select(token => token.Values().Aggregate((i, j) => $"{i}|{j}").Value()).ToList(); + ResultadoSolicitudOK = bool.Parse(resultSolicitud[0]); } else { TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; } - } - if (resultSolicitud.Count == 4) - { if (ResultadoSolicitudOK) { - if (resultSolicitud[2].ToString().Trim().Length > 0) + JToken ObjApiVerificacion = (JToken)api.VerificaSolicitudesNominas(UsuarioActual.CveEmpresa, 3); + + + if (!(ObjApiVerificacion == null)) { - sbResultado.Append($"{resultSolicitud[2]}
    "); + resultVerificacion = ObjApiVerificacion.Select(token => token.Values().Aggregate((i, j) => $"{i}|{j}").Value()).ToList(); + ResultadoVerificaionOK = bool.Parse(resultVerificacion[0]); + SeVerifico = true; } else { - sbResultado.Append($"Solicitud Generada Correctamente"); - sbResultado.Append($"Se presento un error al verificar las solicitudes
    {resultSolicitud[2]}
    "); + TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; + } + } + + + if (resultSolicitud.Count == 4) + { + if (ResultadoSolicitudOK) + { + if (resultSolicitud[1].ToString().Trim().Length > 0) + { + //sbResultado.Append($"{resultSolicitud[1]}
    "); + } + else + { + sbResultado.Append($"Se presento un error al verificar las solicitudes
    {resultSolicitud[1]}
    "); + } + } + else + { + sbResultado.Append($"{resultSolicitud[1]}"); + TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; } } else { - sbResultado.Append($"{resultSolicitud[2]}"); + sbResultado.AppendLine("Se presento un error al generar la solicitud (API)
    "); TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; } - } - else - { - sbResultado.AppendLine("Se presento un error al generar la solicitud (API)
    "); - TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; - } - if (SeVerifico && resultVerificacion.Count == 4) - { - if (ResultadoVerificaionOK) + if (SeVerifico && resultVerificacion.Count == 4) { - sbResultado.Append($"{resultVerificacion[2]}
    "); + if (ResultadoVerificaionOK) + { + sbResultado.Append($"{resultVerificacion[1]}.
    "); + } + else + { + sbResultado.Append($"Se presento un error al verificar las solicitudes {resultVerificacion[1]}
    "); + TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; + } } else { - sbResultado.Append($"Se presento un error al verificar las solicitudes {resultVerificacion[2]}
    "); + sbResultado.AppendLine("Se presento un error al verificar las solicitudes (API)
    "); TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; } + + Alert(sbResultado.ToString(), TipoMensaje); + + + + cargasolicitudes(); } - else + catch(Exception ex) { - sbResultado.AppendLine("Se presento un error al verificar las solicitudes (API)
    "); - TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia; + Alert(ex.StackTrace); } - Alert(sbResultado.ToString(), TipoMensaje); - - - - cargasolicitudes(); + } @@ -436,8 +453,8 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas { if(e.Row.DataKey("Mes").ToString() == "") { - e.Row.Cells[0].Text = "Total"; - e.Row.Font.Bold = true; + e.Row.Cells[0].Text = "Total"; + e.Row.Attributes.Add("class", "Totales"); } } @@ -449,13 +466,12 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas if(e.Row.RowType == DataControlRowType.DataRow) { if (e.Row.DataKey("UUID") == "Totales") - { - + { e.Row.Font.Bold = true; - e.Row.Cells[1].Text = e.Row.DataKey("VTotal").ToDecimal().ToString("###,###,###.00"); - e.Row.Cells[2].Text = e.Row.DataKey("CBTTotal").ToDecimal().ToString("###,###,###.00"); - e.Row.Cells[3].Text = e.Row.DataKey("CountRegistros"); - + e.Row.Cells[1].Text = e.Row.DataKey("CountRegistrosSIG"); + e.Row.Cells[2].Text = e.Row.DataKey("CountRegistrosSAT"); + e.Row.Cells[3].Text = e.Row.DataKey("CountRegistros"); + e.Row.Attributes.Add("class", "Totales"); } } @@ -503,6 +519,55 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas } + } + + protected void LnkDescargaXML_Click(object sender, EventArgs e) + { + GridViewRow GvRow = (GridViewRow)((LinkButton)sender).NamingContainer; + + var UrlDescarga = $"{UsuarioActual.Empresa.Ruta}NomXMLSAT\\Descargas\\{GvRow.DataKey("ArchivoXML")}"; + + var Archivo = new System.IO.FileInfo(UrlDescarga); + + if (Archivo.Exists) + { + Response.Clear(); + Response.AddHeader("Content-Disposition", "attachment; filename=" + Archivo.Name); + Response.AddHeader("Content-Length", Archivo.Length.ToString()); + Response.ContentType = "text/octet-stream"; + Response.Flush(); + Response.TransmitFile(Archivo.FullName); + Response.End(); + } + + } + + protected void GVSolicitudesNominas_RowDataBound(object sender, GridViewRowEventArgs e) + { + + + + + if (e.Row.RowType == DataControlRowType.DataRow) + { + if (e.Row.DataKey("ArchivoXML").Length > 0) + { + var UrlDescarga = $"{UsuarioActual.Empresa.Ruta}NomXMLSAT\\Descargas\\{e.Row.DataKey("ArchivoXML")}"; + + if (System.IO.File.Exists(UrlDescarga)){ + LinkButton LnkDescargaXML = e.Row.FCLinkButton("LnkDescargaXML"); + ScriptManager.GetCurrent(this).RegisterPostBackControl(LnkDescargaXML); + LnkDescargaXML.Visible = true; + } + } + + + + } + + + + } } From 35be01025e15869b48de880cea37e77d8f01c61e Mon Sep 17 00:00:00 2001 From: rakcsle Date: Tue, 26 Jul 2022 20:52:03 -0700 Subject: [PATCH 2/7] =?UTF-8?q?Mejoras=20solictudes=20Ingresos,=20OC=20Num?= =?UTF-8?q?=20Remisi=C3=B3n?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- App_Code/ClsNominas.vb | 4 +- App_Code/ClsOC.vb | 32 +- OC/OC.aspx | 58 ++-- OC/OC.aspx.vb | 113 ++++++- SAT/SolicitudesIngresoSat.aspx | 534 +++++++++++++++--------------- SAT/SolicitudesIngresoSat.aspx.cs | 54 ++- 6 files changed, 492 insertions(+), 303 deletions(-) diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index ebb3bb10b..5a076dc1a 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -3232,12 +3232,14 @@ Public Class ClsNominas End Function #Region "CRUD_SolicitudesNominas" - Public Function SolicitudesGet(CveSolicitud As Integer, CveEmpresa As Integer, Optional CveTipoSolicitud As Integer = 1) As Boolean + Public Function SolicitudesGet(CveSolicitud As Integer, CveEmpresa As Integer, Optional CveTipoSolicitud As Integer = 1, Optional Estatus As Integer = -1, Optional Top As Integer = 100000) As Boolean Dim retorno As Boolean = False DataAdapter("PA_Gral_SAT_SolicitudesGet", CommandType.StoredProcedure) addParameters("@CveSolicitud", SqlDbType.Int, CveSolicitud) addParameters("@CveEmpresa", SqlDbType.Int, CveEmpresa) addParameters("@CveTipoSolicitud", SqlDbType.Int, CveTipoSolicitud) + addParameters("@Estatus", SqlDbType.Int, Estatus) + addParameters("@Top", SqlDbType.Int, Top) retorno = RunQuery("Ocurrió un error al obtener el SolicitudesNominas.") Return retorno End Function diff --git a/App_Code/ClsOC.vb b/App_Code/ClsOC.vb index 628310288..53feb942d 100644 --- a/App_Code/ClsOC.vb +++ b/App_Code/ClsOC.vb @@ -119,6 +119,7 @@ Public Class ClsOC Public Property UsoCFDI As String Public Property Promocion As String Public Property CveProveedorContacto As Integer + Public Property NumRemision As String Public ReadOnly Property DtResultados() As DataTable Get @@ -685,6 +686,7 @@ Public Class ClsOC _UsoCFDI = dr("UsoCFDI").ToString Promocion = IfNull(dr("Promocion"), "", dr("Promocion").ToString) CveProveedorContacto = If(Not IsDBNull(dr("CveProveedorContacto")), dr("CveProveedorContacto").ToString.ToEntero, -1) + NumRemision = dr("NumRemision").ToString Retorno = True ElseIf Data.Rows.Count > 0 Then @@ -704,7 +706,7 @@ Public Class ClsOC Optional CveCliente As Integer = -1, Optional CveVendedor As Integer = -1, Optional PrioridadObservacion As String = "", Optional PorcentajeIVA As Decimal = 0.16, Optional IVA As Decimal = 0, Optional RetIVA As Decimal = 0, Optional RetISR As Decimal = 0, Optional FechaExpiracion As Date = Nothing, Optional CveCotizacion As Integer = -1, Optional FolioAdicional As String = "", Optional EntregaDirecta As Integer = -1, Optional CveDireccionEnvio As Integer = -1, Optional Guia As String = "-1", Optional IEPS As Decimal = -1, - Optional CveIEAnticipo As Integer = -1, Optional ImporteAnticipo As Decimal = 0, Optional UsoCFDI As Integer = -1, Optional Promocion As String = "-1", Optional CveProveedorContacto As Integer = -1) As Boolean + Optional CveIEAnticipo As Integer = -1, Optional ImporteAnticipo As Decimal = 0, Optional UsoCFDI As Integer = -1, Optional Promocion As String = "-1", Optional CveProveedorContacto As Integer = -1, Optional NumRemision As String = "-1") As Boolean Dim Retorno As Boolean = False DataAdapter("PA_OC_OrdenesCompraAdd") @@ -747,6 +749,7 @@ Public Class ClsOC .Add("@UsoCFDI", SqlDbType.Int).Value = UsoCFDI .Add("@Promocion", SqlDbType.VarChar).Value = Promocion .Add("@CveProveedorContacto", SqlDbType.Int).Value = CveProveedorContacto + .Add("@NumRemision", SqlDbType.VarChar).Value = NumRemision .Add("@vCveOrdenCompra", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@vFolio", SqlDbType.Int).Direction = ParameterDirection.Output @@ -910,7 +913,7 @@ Public Class ClsOC pCveProveedor As Integer, pCveOrdenCompra As Integer, pCveUsuarioModifico As Integer, Optional CveCliente As Integer = -1, Optional CveVendedor As Integer = -1, Optional PrioridadObservacion As String = "", Optional IVA As Decimal = 0, Optional RetIVA As Decimal = 0, Optional RetISR As Decimal = 0, Optional IDPoliza As Integer = -1, Optional FechaExpiracion As Date = Nothing, Optional FolioAdicional As String = "", Optional EntregaDirecta As Integer = -1, Optional CveDireccionEnvio As Integer = -1, Optional Guia As String = "-1", Optional IEPS As Decimal = -1, Optional UsoCFDI As Integer = -1, Optional Promocion As String = "-1", - Optional pCveProveedorSucursal As Integer = -1, Optional CveProveedorContacto As Integer = -1, Optional PorcentajeIVA As Decimal = 0.16) As Boolean + Optional pCveProveedorSucursal As Integer = -1, Optional CveProveedorContacto As Integer = -1, Optional PorcentajeIVA As Decimal = 0.16, Optional NumRemision As String = "-1") As Boolean Dim Retorno As Boolean = False DataAdapter("PA_OC_OrdenesCompraUpdate") @@ -944,6 +947,7 @@ Public Class ClsOC .Add("@CveProveedorSucursal", SqlDbType.Int).Value = pCveProveedorSucursal .Add("@CveProveedorContacto", SqlDbType.Int).Value = CveProveedorContacto .Add("@PorcentajeIVA", SqlDbType.SmallMoney).Value = PorcentajeIVA + .Add("@NumRemision", SqlDbType.VarChar).Value = NumRemision End With Try @@ -2506,6 +2510,30 @@ Public Class ClsOC Return Retorno End Function + + Public Function GetVerificaNumRemision(CveProveedor As Integer, Tipo As String, NumRemision As String, CveEmpresa As Integer, CveOrdenCompraValida As Integer) As Boolean + Dim Retorno As Boolean = False + DataAdapter("PA_OC_OCVerificaNumRemisionGet") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor + .Add("@Tipo", SqlDbType.VarChar).Value = Tipo + .Add("@NumRemision", SqlDbType.VarChar).Value = NumRemision + .Add("@CveOrdenCompraValida", SqlDbType.Int).Value = CveOrdenCompraValida + .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al consultar las remiciones", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + + Return Retorno + End Function + + #Region " IDisposable Support " ' IDisposable Protected Overridable Sub Dispose(ByVal disposing As Boolean) diff --git a/OC/OC.aspx b/OC/OC.aspx index b2e5651aa..fdf713b49 100644 --- a/OC/OC.aspx +++ b/OC/OC.aspx @@ -325,20 +325,34 @@ - - -
    - -
    + + + +
    + + +
    + + 8% 16% 0% -
    -
    - - + + +
    + +
    Número Remisión
    +
    + +
    + +
    + + + <%--linea 7--%>
    <%----%> @@ -2767,7 +2781,7 @@ - + @@ -3215,20 +3229,20 @@ function ValidateCant(variable) { - - var txt = $(variable); - var max = txt.data('cantidad'); - var value = parseInt(txt.val()); + + var txt = $(variable); + var max = txt.data('cantidad'); + var value = parseInt(txt.val()); if (value > max) { txt.val(max); - } + } if (value < 0) { txt.val(0); - } - - var importe = $('.txtimporte[data-cve="' + txt.data('cve') + '"]'); - importe.val(parseFloat(txt.val()) * parseFloat(txt.data('pu'))); - + } + + var importe = $('.txtimporte[data-cve="' + txt.data('cve') + '"]'); + importe.val(parseFloat(txt.val()) * parseFloat(txt.data('pu'))); + } @@ -3244,6 +3258,10 @@ } } + + function ValidaNumRemision() { + $('#BtnValidaNumRemision').click(); + } diff --git a/OC/OC.aspx.vb b/OC/OC.aspx.vb index 5097f2a22..83b727175 100644 --- a/OC/OC.aspx.vb +++ b/OC/OC.aspx.vb @@ -822,12 +822,16 @@ Partial Class OC If UsuarioActual.Empresa.Funcionalidad(590).ToString.ToEntero = 1 Then + DVCultivosCuadro.Visible = True DdlSubProyecto.AutoPostBack = True DdlCultivosCuadro.DataSource = GlobalDTCultivosCuadro(UsuarioActual.CveEmpresa).FiltraParametros($"CveSubProyecto = {DdlSubProyecto.SelectedValue} AND Estatus =1") DdlCultivosCuadro.DataBind() DdlCultivosCuadro.Items.Insert(0, New ListItem("Seleccione uno", "-1")) + DvNumRemision1.Visible = True + DvNumRemision2.Visible = True + End If 'SOLO SE MUESTRA CUANDO ES REGISTRO NUEVO @@ -1409,6 +1413,8 @@ Partial Class OC LblCodigo.Text = objOC.Codigo TxtFolioAdicional.Text = objOC.FolioAdicional + TxtNumRemision.Text = objOC.NumRemision + If Not IsNothing(objOC.Tipo) Then Select Case objOC.Tipo.ToUpper @@ -1750,6 +1756,10 @@ Partial Class OC UpAcciones.Update() End If + + + + uppEstatus.Update() UPPEmp.Update() @@ -2529,6 +2539,9 @@ Partial Class OC 'VALIDACIONES PARA GUARDAR If ValidaGuardar() Then Exit Sub + + + Dim MsgError As String = "Hubo un error al registrar" 'VARIABLES Dim CveProveedorSucursal As Integer = -1 @@ -2590,12 +2603,18 @@ Partial Class OC Dim CveOrdenCompraPadre As Integer = -1 If GeneraReq Then + + If Not ValidaNumRemision(TxtNumRemision.Text.Trim(), "REQ", CveProveedor, OC.IniciaTransacSQL) Then + TieneError = True + End If + + If Not TieneError Then ' AGREGAR REQUISICION If OC.AddOrdenCompra("REQ", -1, TxtDescrip.Text, TxtJustificacion.Text, DdlPrioridad.SelectedValue.ToEntero, TxtFecha.Text.ToDate, DdlMoneda.SelectedValue.ToEntero, CboE.SelectedValue.ToEntero, If(TxtFechaEstimadaEntrega.Text.Trim = "", "-1", TxtFechaEstimadaEntrega.Text.Trim), LugarEntrega, UsuarioActual.CveUsuario, CveEmpresaActual, GvD.Rows(0).FCHiddenField("HdnCvePresupuestoEgreso").Value.ToString.ToEntero, pCveProveedor:=CveProveedor, pCveProveedorSucursal:=CveProveedorSucursal, RequiereCotizacion:=ChkCotizacion.Checked, CveCliente:=Ddlcliente.txtValue.Value.ToEntero, CveVendedor:=DdlVendedor.SelectedValue.ToEntero, PrioridadObservacion:=txtobsprioridad.Text, PorcentajeIVA:=Math.Round(DdlIVA.SelectedValue.ToDecimal - 1, 2), IVA:=IVA, RetIVA:=TxtRetIVA.Text.ToDecimal, RetISR:=TxtRetISR.Text.ToDecimal, CveCotizacion:=CveCotizacion, FolioAdicional:=TxtFolioAdicional.Text, EntregaDirecta:=If(ChkEntregaDirecta.Checked, 1, -1), CveDireccionEnvio:=If(DdlDireccionEnvio.Visible, DdlDireccionEnvio.SelectedValue.ToEntero, -1), Guia:=TxtGuia.Text.Trim, - IEPS:=TxtIEPS.Text.ToDecimal, UsoCFDI:=DdlUsoCFDI.SelectedValue.ToEntero, Promocion:=Promocion, CveProveedorContacto:=CveProveedorContacto) Then + IEPS:=TxtIEPS.Text.ToDecimal, UsoCFDI:=DdlUsoCFDI.SelectedValue.ToEntero, Promocion:=Promocion, CveProveedorContacto:=CveProveedorContacto, NumRemision:=TxtNumRemision.Text.Trim()) Then CveOrdenCompraPadre = OC.CveOrdenCompra If CveOrdenCompraPadre > 0 Then @@ -2622,15 +2641,21 @@ Partial Class OC End If End If + + If Not ValidaNumRemision(TxtNumRemision.Text.Trim(), If(TipoOS, "OS", TipoOC), CveProveedor, OC.IniciaTransacSQL) Then + TieneError = True + End If + If Not TieneError Then ' AGREGAR ORDEN DE COMPRA + If OC.AddOrdenCompra(If(TipoOS, "OS", TipoOC), -1, TxtDescrip.Text, TxtJustificacion.Text, DdlPrioridad.SelectedValue.ToEntero, TxtFecha.Text.ToDate, DdlMoneda.SelectedValue.ToEntero, CveEstatusNuevo, If(TxtFechaEstimadaEntrega.Text.Trim = "", "-1", TxtFechaEstimadaEntrega.Text.Trim), LugarEntrega, UsuarioActual.CveUsuario, CveEmpresaActual, GvD.Rows(0).FCHiddenField("HdnCvePresupuestoEgreso").Value.ToString.ToEntero, pCveProveedor:=CveProveedor, pCveProveedorSucursal:=CveProveedorSucursal, RequiereCotizacion:=ChkCotizacion.Checked, CveUsuarioAsignado:=DdlUsuariosAsignado.SelectedValue.ToEntero, CveCliente:=Ddlcliente.txtValue.Value.ToEntero, CveVendedor:=DdlVendedor.SelectedValue.ToEntero, PrioridadObservacion:=txtobsprioridad.Text, PorcentajeIVA:=Math.Round(DdlIVA.SelectedValue.ToDecimal - 1, 2), IVA:=IVA, RetIVA:=TxtRetIVA.Text.ToDecimal, RetISR:=TxtRetISR.Text.ToDecimal, CveCotizacion:=CveCotizacion, FolioAdicional:=TxtFolioAdicional.Text, EntregaDirecta:=If(ChkEntregaDirecta.Checked, 1, -1), CveDireccionEnvio:=If(DdlDireccionEnvio.Visible, DdlDireccionEnvio.SelectedValue.ToEntero, -1), Guia:=TxtGuia.Text.Trim, IEPS:=TxtIEPS.Text.ToDecimal, CveIEAnticipo:=CveIEAnticipo, ImporteAnticipo:=ImporteAnticipos, UsoCFDI:=DdlUsoCFDI.SelectedValue.ToEntero, - Promocion:=Promocion, CveProveedorContacto:=CveProveedorContacto) Then + Promocion:=Promocion, CveProveedorContacto:=CveProveedorContacto, NumRemision:=TxtNumRemision.Text) Then CveOrdenCompra = OC.CveOrdenCompra CveEstatus = CboE.SelectedValue.ToEntero @@ -2790,11 +2815,17 @@ Partial Class OC Proveedor = DdlProveedores.SelectedText.ToString End If + + If Not ValidaNumRemision(TxtNumRemision.Text.Trim(), TipoOC, CveProveedor, OC.IniciaTransacSQL, CveOrdenCompra) Then + TieneError = True + End If + + If OC.UpdateOrdenCompra(-1, TxtDescrip.Text, TxtJustificacion.Text, DdlPrioridad.SelectedValue.ToEntero, ChkCotizacion.Checked, If(TxtFechaEstimadaEntrega.Text.Trim = "", "-1", TxtFechaEstimadaEntrega.Text.Trim), LugarEntrega, DdlMoneda.SelectedValue.ToEntero, CveProveedor, CveOrdenCompra, UsuarioActual.CveUsuario, Ddlcliente.txtValue.Value.ToEntero, DdlVendedor.SelectedValue.ToEntero, txtobsprioridad.Text, IVA:=IVA, RetIVA:=TxtRetIVA.Text.ToDecimal, RetISR:=TxtRetISR.Text.ToDecimal, FolioAdicional:=TxtFolioAdicional.Text, EntregaDirecta:=If(ChkEntregaDirecta.Checked, 1, -1), CveDireccionEnvio:=If(DdlDireccionEnvio.Visible, DdlDireccionEnvio.SelectedValue.ToEntero, -1), Guia:=TxtGuia.Text.Trim, IEPS:=TxtIEPS.Text.ToDecimal, UsoCFDI:=DdlUsoCFDI.SelectedValue.ToEntero, Promocion:=Promocion, pCveProveedorSucursal:=DdlProveedorSucursal.SelectedValue.ToEntero, CveProveedorContacto:=CveProveedorContacto, - PorcentajeIVA:=Math.Round(DdlIVA.SelectedValue.ToDecimal - 1, 2)) Then + PorcentajeIVA:=Math.Round(DdlIVA.SelectedValue.ToDecimal - 1, 2), NumRemision:=TxtNumRemision.Text) Then If CveProveedorOriginal <> CveProveedor Then If Not ObjConta.UpdateProveedorPoliza(CveOrdenCompra, CveProveedor, Proveedor) Then TieneError = True @@ -3263,11 +3294,17 @@ Partial Class OC RetIVA = TxtRetIVA.Text.ToDecimal RetISR = TxtRetISR.Text.ToDecimal - If objOrdenCompra.AddOrdenCompra("OC", -1, TxtDescrip.Text, TxtJustificacion.Text, DdlPrioridad.SelectedValue.ToEntero, TxtFecha.Text.ToDate, DdlMoneda.SelectedValue.ToEntero, CveEstatusInicialOC, TxtFechaEstimadaEntrega.Text, LugarEntrega, + If Not ValidaNumRemision(TxtNumRemision.Text.Trim(), "OC", CveProveedor, objOrdenCompra.IniciaTransacSQL) Then + HuboError = True + End If + + + + If (Not HuboError) AndAlso objOrdenCompra.AddOrdenCompra("OC", -1, TxtDescrip.Text, TxtJustificacion.Text, DdlPrioridad.SelectedValue.ToEntero, TxtFecha.Text.ToDate, DdlMoneda.SelectedValue.ToEntero, CveEstatusInicialOC, TxtFechaEstimadaEntrega.Text, LugarEntrega, CveUsuario, CveEmpresaActual, 0, pCveProveedor:=CveProveedor, CveCliente:=Ddlcliente.txtValue.Value.ToEntero, CveVendedor:=DdlVendedor.SelectedValue.ToEntero, PrioridadObservacion:=txtobsprioridad.Text, PorcentajeIVA:=PorIVA, IVA:=IVACot, RetIVA:=RetIVA.ToString.ToDecimal, RetISR:=RetISR.ToString.ToDecimal, IDPoliza:=IdPoliza, CveCotizacion:=CveCotizacion, FolioAdicional:=TxtFolioAdicional.Text, EntregaDirecta:=If(ChkEntregaDirecta.Checked, 1, -1), CveDireccionEnvio:=If(DdlDireccionEnvio.Visible, DdlDireccionEnvio.SelectedValue.ToEntero, -1), IEPS:=TxtIEPS.Text.ToDecimal, - CveIEAnticipo:=CveIEAnticipo, ImporteAnticipo:=ImporteAnticipos, Promocion:=Promocion, UsoCFDI:=DdlUsoCFDI.SelectedValue.ToEntero) Then + CveIEAnticipo:=CveIEAnticipo, ImporteAnticipo:=ImporteAnticipos, Promocion:=Promocion, UsoCFDI:=DdlUsoCFDI.SelectedValue.ToEntero, NumRemision:=TxtNumRemision.Text.Trim) Then 'CREA POLIZA POR CADA PROVEEDOR @@ -3331,11 +3368,19 @@ Partial Class OC Else - If objOrdenCompra.AddOrdenCompra("OC", -1, TxtDescrip.Text, TxtJustificacion.Text, DdlPrioridad.SelectedValue.ToEntero, TxtFecha.Text.ToDate, DdlMoneda.SelectedValue.ToEntero, CveEstatusInicialOC, TxtFechaEstimadaEntrega.Text, LugarEntrega, + + + If Not ValidaNumRemision(TxtNumRemision.Text.Trim(), "OC", DdlProveedores.SelectedValue.ToEntero, objOrdenCompra.IniciaTransacSQL) Then + HuboError = True + End If + + + + If (Not HuboError) AndAlso objOrdenCompra.AddOrdenCompra("OC", -1, TxtDescrip.Text, TxtJustificacion.Text, DdlPrioridad.SelectedValue.ToEntero, TxtFecha.Text.ToDate, DdlMoneda.SelectedValue.ToEntero, CveEstatusInicialOC, TxtFechaEstimadaEntrega.Text, LugarEntrega, CveUsuario, CveEmpresaActual, 0, pCveProveedor:=DdlProveedores.SelectedValue.ToEntero, pCveProveedorSucursal:=DdlProveedorSucursal.SelectedValue.ToEntero, CveUsuarioAsignado:=DdlUsuariosAsignado.SelectedValue.ToEntero(), CveCliente:=Ddlcliente.txtValue.Value.ToEntero, CveVendedor:=DdlVendedor.SelectedValue.ToEntero, PrioridadObservacion:=txtobsprioridad.Text, PorcentajeIVA:=Math.Round(DdlIVA.SelectedValue.ToDecimal - 1, 2), IVA:=IVA, RetIVA:=TxtRetIVA.Text.ToDecimal, RetISR:=TxtRetISR.Text.ToDecimal, IDPoliza:=IDPolizaPresupuestal, CveCotizacion:=CveCotizacion, FolioAdicional:=TxtFolioAdicional.Text, EntregaDirecta:=If(ChkEntregaDirecta.Checked, 1, -1), CveDireccionEnvio:=If(DdlDireccionEnvio.Visible, DdlDireccionEnvio.SelectedValue.ToEntero, -1), IEPS:=TxtIEPS.Text.ToDecimal, CveIEAnticipo:=CveIEAnticipo, ImporteAnticipo:=ImporteAnticipos, UsoCFDI:=DdlUsoCFDI.SelectedValue.ToEntero, - Promocion:=Promocion) Then + Promocion:=Promocion, NumRemision:=TxtNumRemision.Text.Trim) Then 'USA AC @@ -8677,4 +8722,58 @@ Partial Class OC Return Retorno End Function + + + + Private Function ValidaNumRemision(NumRemision As String, TipoOC As String, CveProveedor As Integer, Optional OcTranasaccion As System.Data.SqlClient.SqlTransaction = Nothing, Optional CveOrdenCompraValida As Integer = -1) As Boolean + Dim NumRemisionValida As Boolean = False + + + + If NumRemision.Trim.Length > 0 Then + If UsuarioActual.Empresa.Funcionalidad(590).ToString.ToEntero = 1 Then + + Dim ObjOC As ClsOC + + If OcTranasaccion IsNot Nothing Then + ObjOC = New ClsOC(OcTranasaccion) + Else + ObjOC = New ClsOC + End If + + + If ObjOC.GetVerificaNumRemision(CveProveedor, TipoOC, NumRemision, UsuarioActual.CveEmpresa, CveOrdenCompraValida) Then + + If ObjOC.DtResultados.Rows.Count > 0 Then + Alert($"La remision ya se encuentra asiganada a la { If(TipoOC = "OC", "Orden de compra", "Requisición")} {ObjOC.DtResultados.Rows(0)("Folio").ToString() }", TipoMensaje.MsgAdvertencia) + Else + NumRemisionValida = True + End If + + End If + + + + Else + NumRemisionValida = True + End If + Else + NumRemisionValida = True + End If + + + + + + Return NumRemisionValida + + End Function + + Protected Sub BtnValidaNumRemision_Click(sender As Object, e As EventArgs) + + ValidaNumRemision(TxtNumRemision.Text.Trim(), TipoOC, DdlProveedores.SelectedValue.ToEntero, Nothing, If(CveOrdenCompra > 0, CveOrdenCompra, -1)) + + End Sub + + End Class diff --git a/SAT/SolicitudesIngresoSat.aspx b/SAT/SolicitudesIngresoSat.aspx index f7319dad0..857960652 100644 --- a/SAT/SolicitudesIngresoSat.aspx +++ b/SAT/SolicitudesIngresoSat.aspx @@ -292,177 +292,193 @@ - - -
    -
    - - - - - - - - - - - - - - - - - - - - - - - - -
    - -
    - - - -
    -
    - - - - - - - - + - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    - +
    +
    + " style="display: inline-block; width: 150px;" /> + " style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"> +
    +
    +
    + +
    + + + + + + + + + + + + + + + + + + + + + + + +
    - +
    + + +
    +
    +
    + " style="display: inline-block; width: 150px;" /> + " style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"> +
    + +
    +
    +
    +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    + +
    + @@ -497,54 +513,54 @@ - +
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + - - - - - - - - + + + + + + + +
    @@ -566,55 +582,57 @@ -
    + + +
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    diff --git a/SAT/SolicitudesIngresoSat.aspx.cs b/SAT/SolicitudesIngresoSat.aspx.cs index 13f65f1b5..1a78ec64e 100644 --- a/SAT/SolicitudesIngresoSat.aspx.cs +++ b/SAT/SolicitudesIngresoSat.aspx.cs @@ -137,18 +137,34 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas { - GvResumen.DataSource = null; - GvDatos.DataSource = null; + //GvResumen.DataSource = null; + //GvDatos.DataSource = null; + + DvDatos1.Visible = false; + DvDatos2.Visible = false; + + DVResumen1.Visible = false; + DVResumen2.Visible = false; if (DdlReporte.SelectedValue.ToEntero() == 1) { - GvResumen.Visible = true; - GvDatos.Visible = false; + + DVResumen1.Visible = true; + DVResumen2.Visible = true; + + DvDatos1.Visible = false; + DvDatos2.Visible = false; + + } else { - GvResumen.Visible = false; - GvDatos.Visible = true; + + DVResumen1.Visible = false; + DVResumen2.Visible = false; + + DvDatos1.Visible = true; + DvDatos2.Visible = true; } @@ -168,6 +184,9 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas } } + + + GvResumen.DataBind(); GvDatos.DataBind(); @@ -183,21 +202,27 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas using (ClsNominas nom = new ClsNominas()) { - if (nom.SolicitudesGet(-1, UsuarioActual.CveEmpresa, CveTipoSolicitud: 3)) + if (nom.SolicitudesGet(-1, UsuarioActual.CveEmpresa, CveTipoSolicitud: 3, Estatus: 0,Top:50)) { - - GVSolicitudesPendientes.DataSource = nom.DtResultados.FiltraParametros("Estatus =0"); - GVSolicitudesPendientes.DataBind(); - - if (nom.DtResultados.FiltraParametros("Estatus =0").Rows.Count > 0) + GVSolicitudesPendientes.DataSource = nom.DtResultados; + if (nom.DtResultados.Rows.Count > 0) { LnkverificarSolicitudes.Visible = true; } + GVSolicitudesPendientes.DataBind(); + + + } - GVSolicitudesNominas.DataSource = nom.DtResultados.FiltraParametros("Estatus =1"); + if (nom.SolicitudesGet(-1, UsuarioActual.CveEmpresa, CveTipoSolicitud: 3, Estatus:1,Top:50)) + { + + GVSolicitudesNominas.DataSource = nom.DtResultados; GVSolicitudesNominas.DataBind(); } + + } UPModalViewSolicitudes.Update(); } @@ -469,8 +494,7 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas { e.Row.Font.Bold = true; e.Row.Cells[1].Text = e.Row.DataKey("CountRegistrosSIG"); - e.Row.Cells[2].Text = e.Row.DataKey("CountRegistrosSAT"); - e.Row.Cells[3].Text = e.Row.DataKey("CountRegistros"); + e.Row.Cells[2].Text = e.Row.DataKey("CountRegistrosSAT"); e.Row.Attributes.Add("class", "Totales"); } From d6a349e5e2e62d8cb6c03177a27ba4199f06d8ae Mon Sep 17 00:00:00 2001 From: rakcsle Date: Tue, 2 Aug 2022 09:33:47 -0700 Subject: [PATCH 3/7] Solicitudes Ingreso ajustes, OC num remision, rep ventas detalle --- App_Code/ClsNominas.vb | 62 ++ Empresas/Grales/Formatos/RepVentaDetalle.rdlc | 2 +- OC/OC.aspx | 2 +- OC/OC.aspx.vb | 9 +- SAT/SolicitudesIngresoSat.aspx | 490 ++++++++------- SAT/SolicitudesIngresoSat.aspx.cs | 579 +++++++++++------- Ventas/RepVentaDetalle.aspx.vb | 6 + 7 files changed, 693 insertions(+), 457 deletions(-) diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 5a076dc1a..0128188fc 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -3259,6 +3259,68 @@ Public Class ClsNominas retorno = RunQuery("Ocurrió un error al agregar el SolicitudesNominas.") Return retorno End Function + + + Public Function SolicitudesAdd2(CveSolicitudCFDI As Integer, CveSolicitudMetadata As Integer, estatus As Integer, observaciones As String, fechaInicio As DateTime, fechaFin As DateTime, cveUsuarioIng As Int32, cveEmpresa As Int32, Optional CveTipoSolicitud As Integer = 1) As Integer + + Dim CveSolictudAgregada As Integer = -1 + + Try + DataAdapter("PA_Gral_SAT_SolicitudesAdd2", CommandType.StoredProcedure) + addParameters("@CveSolicitudCFDI", SqlDbType.Int, CveSolicitudCFDI) + addParameters("@CveSolicitudMetadata", SqlDbType.Int, CveSolicitudMetadata) + addParameters("@Estatus", SqlDbType.Int, estatus) + addParameters("@Observaciones", SqlDbType.VarChar, observaciones) + addParameters("@FechaInicio", SqlDbType.DateTime, fechaInicio) + addParameters("@FechaFin", SqlDbType.DateTime, fechaFin) + addParameters("@CveUsuarioIng", SqlDbType.Int, cveUsuarioIng) + addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa) + addParameters("@CveTipoSolicitud", SqlDbType.Int, CveTipoSolicitud) + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveSolicitud", SqlDbType.Int).Direction = ParameterDirection.Output + End With + + + SqlAdapter.Fill(Data) + CveSolictudAgregada = SqlAdapter.SelectCommand.Parameters("@CveSolicitud").Value.ToString.ToEntero + + Catch ex As Exception + CveSolictudAgregada = -1 + OnError("Ocurrió un error al agregar la Solicitud.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return CveSolictudAgregada + + + End Function + + + Public Function UpdateSolicitudDetalleCveSolicitudDetalle(CveEmpresa As Integer, UUID As String, CveSolicitudDetalle As Integer) As Boolean + + + Dim retorno As Boolean = False + Try + DataAdapter("PA_SAT_SolicitudesCFDIDataCveSolicitudDetalleUpdate", CommandType.StoredProcedure) + With SqlAdapter.SelectCommand.Parameters + .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + .Add("@UUID", SqlDbType.VarChar).Value = UUID + .Add("@CveSolicitudDetalle", SqlDbType.Int).Value = CveSolicitudDetalle + End With + SqlAdapter.Fill(Data) + + retorno = True + + Catch ex As Exception + retorno = False + OnError("Ocurrió un error al Actualizar SolicitudesCFDIData.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + + Return retorno + + + End Function + Public Function SolicitudesUp(CveSolicitud As Int32, CveSolicitudCFDI As Int32, CveSolicitudMetadata As Int32, estatus As Int32, observaciones As String, cveEmpresa As Int32) As Boolean Dim retorno As Boolean = False DataAdapter("PA_Gral_SAT_SolicitudesUp", CommandType.StoredProcedure) diff --git a/Empresas/Grales/Formatos/RepVentaDetalle.rdlc b/Empresas/Grales/Formatos/RepVentaDetalle.rdlc index 816c4bfd3..2d2e81ef0 100644 --- a/Empresas/Grales/Formatos/RepVentaDetalle.rdlc +++ b/Empresas/Grales/Formatos/RepVentaDetalle.rdlc @@ -1114,7 +1114,7 @@ 0.63559in @@ -216,15 +222,21 @@ -
  • - <%-- Descargar--%> -
    • + - -
  • - Solicitudes + + +
  • + Descargar
    • -     +
  • + Solicitudes +
    • + + + + +     @@ -232,7 +244,7 @@ - +
    @@ -240,8 +252,8 @@
    - - + +
    @@ -253,10 +265,10 @@ - - + + - +
    @@ -267,13 +279,13 @@ - - + + - +
    -
    +
    @@ -286,240 +298,246 @@
    - -     + +     - + -
    -
    - " style="display: inline-block; width: 150px;" /> - " style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"> -
    +
    +
    + " style="display: inline-block; width: 150px;" /> + " style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"> +
    -
    - -
    - - - - - - - - - - - - - - - - - - - - - - - - -
    - +
    + +
    + + + + + + + + + + + + + + + + + + + + + + + +
    - -
    -
    -
    - " style="display: inline-block; width: 150px;" /> - " style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"> -
    - -
    -
    -
    -
    - - - - - - - - - +
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
    +
    +
    + " style="display: inline-block; width: 150px;" /> + " style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info">
    +
    +
    +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    + +
    - - - -