From 0ca4b4fc8c65aaac84eb01ed15d679946f11dd67 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Tue, 14 Jan 2020 15:26:51 -0700 Subject: [PATCH] --- Inicio.aspx | 24 ++++++---- Inicio.aspx.vb | 46 ++++++++++++++++-- Ventas/RepConciliacionEmitidosSat.aspx.cs | 58 +++++++++++++++++++---- 3 files changed, 106 insertions(+), 22 deletions(-) diff --git a/Inicio.aspx b/Inicio.aspx index 3fb0bbc90..f2f896e76 100644 --- a/Inicio.aspx +++ b/Inicio.aspx @@ -683,12 +683,12 @@
+ Ir a Reporte

Ventas sin registrar en SIG

- Ver más " style="display: inline-block; width: 150px;" /> " style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info">
@@ -697,10 +697,14 @@ DataKeyNames="FolioFiscal,RFC,Total" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" data-sort="true" Style="text-align: center;" GridLines="None" Width="99%"> - + + +
+ + - + <%-- @@ -731,13 +735,13 @@
+ Ir a Reporte

Cancelaciones por Atender

- Ver más " style="display: inline-block; width: 150px;" /> " style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info">
@@ -746,10 +750,14 @@ DataKeyNames="FolioFiscal,RFC,Total" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" data-sort="true" Style="text-align: center;" GridLines="None" Width="99%"> - + + +
+ + - + <%-- @@ -783,7 +791,7 @@
-
+ @@ -1000,7 +1008,7 @@
-
+
" style="display: inline-block; margin-right: -20px; width: 150px;" /> " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> diff --git a/Inicio.aspx.vb b/Inicio.aspx.vb index 9747b5767..687113a45 100644 --- a/Inicio.aspx.vb +++ b/Inicio.aspx.vb @@ -11,8 +11,47 @@ Imports System.Drawing Partial Class Inicio Inherits ClsPaginas - Private Dias() As String = {"Domingo", "Lunes", "Martes", "Miércoles", "Jueves", "Viernes", "Sábado"} - + Private Dias() As String = {"Domingo", "Lunes", "Martes", "Miércoles", "Jueves", "Viernes", "Sábado"} + + + Public Function GetFacturasCanceladasPendientesWS(objventas As ClsVentas, RFC As String, CveEmpresa As Integer, Optional showalert As Boolean = True) As Boolean + Dim retorno As Boolean = False + Try + + Dim objServicio As Cancelacion.CancelacionSoapClient = New Cancelacion.CancelacionSoapClient() + Dim resp As Cancelacion.StructCancel = objServicio.ObtienePendientes(RFC, "UserTest", "1234567890") + If resp.Estado = 0 Then + Dim XmlPendientes As String = System.Text.Encoding.UTF8.GetString(Convert.FromBase64String(resp.Xml)) + Dim theReader As IO.StringReader = New IO.StringReader(XmlPendientes) + Dim theDataSet As DataSet = New DataSet() + theDataSet.ReadXml(theReader) + + If theDataSet.Tables(0).Rows(0)("Uuid").ToString() <> "null" Then + Dim sb = New StringBuilder() + + For Each item As DataRow In theDataSet.Tables(0).Rows + sb.AppendFormat("{0};", item("Uuid").ToString()) + Next + + If objventas.GetFacturasCanceladasPendientes(sb.ToString(), CveEmpresa) Then + retorno = True + End If + + Else + If showalert Then + Alert("No se encontraron cancelaciones pendientes", ModExtensiones.TipoMensaje.MsgError) + End If + End If + Else + Alert("Error al obtener cancelaciones pendientes: " & resp.Descripcion, ModExtensiones.TipoMensaje.MsgError) + End If + + Catch ex As Exception + retorno = False + Me.OnError("Error al obtener cancelaciones pendientes: ", ex, "") + End Try + Return retorno + End Function Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load If Not IsPostBack Then @@ -30,13 +69,12 @@ Partial Class Inicio End If If UsuarioActual.CveUsuario = 100 Then Using objventas As New ClsVentas - If (objventas.GetFacturasCanceladasPendientesWS(UsuarioActual.Empresa.RFC, UsuarioActual.CveEmpresa, False)) AndAlso objventas.DtResultados.Rows.Count > 0 Then + If (GetFacturasCanceladasPendientesWS(objventas, UsuarioActual.Empresa.RFC, UsuarioActual.CveEmpresa, False)) AndAlso objventas.DtResultados.Rows.Count > 0 Then RegistraScript("$('#ModalMitotereCancelaPendiente').modal();", "mitoterosatCanceladasPendientesWS") End If End Using End If - 'Exit Sub 'RESTRICCION AD If Not IsNothing(Request("ADCod")) Then diff --git a/Ventas/RepConciliacionEmitidosSat.aspx.cs b/Ventas/RepConciliacionEmitidosSat.aspx.cs index da48dc132..7acf60a6b 100644 --- a/Ventas/RepConciliacionEmitidosSat.aspx.cs +++ b/Ventas/RepConciliacionEmitidosSat.aspx.cs @@ -10,11 +10,13 @@ using System.Xml; using Extensiones; using System.Data; using System.Text; -using ADSistemaLibrary.SatXml; +using ADSistemaLibrary.SatXml; + //using ADS_CFDI_SAT; public partial class Ventas_RepConciliacionEmitidosSat : ClsPaginas { + #region "Propiedades" const string rqFechaInicio = "FechaInicio"; const string rqFechaFin = "FechaFin"; const string rqRegistroEn = "RegistroEn"; @@ -59,10 +61,44 @@ public partial class Ventas_RepConciliacionEmitidosSat : ClsPaginas set { ViewState["RegistroEn"] = value; } } private StringBuilder strErrores; + #endregion protected void Page_Load(object sender, EventArgs e) { if (!IsPostBack) { + string path; + if (Request["op"] != null && Request["op"].ToString().Length > 0) + { + try + { + + if (System.IO.File.Exists((path = string.Format("{0}\\{1}", UsuarioActual.Empresa.Ruta.Trim(), Extensiones.ModExtensiones.Decripta(Request["op"].ToString()).Trim()).Replace("/", "\\")))) + { + + System.IO.FileInfo archivo = new System.IO.FileInfo(path); + + HttpContext.Current.Response.Clear(); + HttpContext.Current.Response.ClearContent(); + HttpContext.Current.Response.ContentType = "text/plain"; + HttpContext.Current.Response.AppendHeader("Content-disposition", string.Format("attachment; filename={0}", archivo.Name)); + HttpContext.Current.Response.AddHeader("Content-Length", archivo.Length.ToString()); + HttpContext.Current.Response.TransmitFile(path); + HttpContext.Current.Response.End(); + } + else + { + RegistraScript("window.close()"); + } + } + catch (Exception ex) + { + Extensiones.ModExtensiones.GuardaLog(ex.ToString()); + RegistraScript("window.close()"); + + } + + } + fillrequestfields(); DdlSubProyectoDatos.DataSource = get_GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1).FiltraParametros("EsSucursal = True "); DdlSubProyectoDatos.DataBind(); @@ -92,7 +128,7 @@ public partial class Ventas_RepConciliacionEmitidosSat : ClsPaginas } private void downfile(string path) { - + } public void fillrequestfields() { @@ -151,8 +187,10 @@ public partial class Ventas_RepConciliacionEmitidosSat : ClsPaginas { { + string ruta = string.Format("{0}\\{1}", UsuarioActual.Empresa.Ruta.Trim(), gvrow.DataKey("RutaXml").Trim()).Replace("/", "\\"); //gvrow.DataKey("RutaXml"); + //Alert(ruta); - string ruta = gvrow.DataKey("RutaXml"); + //return false; strErrores = new StringBuilder(); XmlSatCFDI objxml = null; Modelos.Factura objfact = null; @@ -743,18 +781,18 @@ public partial class Ventas_RepConciliacionEmitidosSat : ClsPaginas if (e.Row.RowType == DataControlRowType.DataRow) { string navurl = ""; - if(e.Row.DBCampo("Tipo") == "1") + if (e.Row.DBCampo("Tipo") == "1") { string RutaXml = e.Row.DBCampo("RutaXml"); - if (RutaXml.IndexOf("Empresas")>0) - { - RutaXml = RutaXml.Substring(RutaXml.IndexOf("Empresas")); - } - navurl =string.Format("RepConciliacionEmitidosSat.aspx?op=", e.Row.DBCampo("RutaXml")); + //if (RutaXml.IndexOf("Empresas")>0) + //{ + // RutaXml = RutaXml.Substring(RutaXml.IndexOf("Empresas")); + //} + navurl = string.Format("RepConciliacionEmitidosSat.aspx?op={0}", Extensiones.ModExtensiones.Encripta(e.Row.DataKey("RutaXml"))); } else { - navurl = string.Format("/Compras/PopUpVerFactura.aspx?P={0}", Extensiones.ModExtensiones.Encripta(String.Format("OP=FactVta&CVEVENTA={0}&EXT={1}&SERIEFOLIO={2}&TIPODOCTO={3}", e.Row.DBCampo("CveVenta"), "XML", e.Row.DBCampo("SerieFolio"), e.Row.DBCampo("TipoDocto")))); + navurl = string.Format("/Compras/PopUpVerFactura.aspx?P={0}", Extensiones.ModExtensiones.Encripta(String.Format("OP=FactVta&CVEVENTA={0}&EXT={1}&SERIEFOLIO={2}&TIPODOCTO={3}", e.Row.DBCampo("CveVenta"), "XML", e.Row.DBCampo("SerieFolio"), e.Row.DBCampo("TipoDocto")))); } e.Row.FCHyperLink("HypXml").NavigateUrl = navurl; }