From 643a364b745bd66c4f818df7ff674b2c88f55bd4 Mon Sep 17 00:00:00 2001 From: rrene Date: Mon, 14 Oct 2024 17:51:38 -0700 Subject: [PATCH] - --- Ashx/SIGFacturacion.ashx | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/Ashx/SIGFacturacion.ashx b/Ashx/SIGFacturacion.ashx index 8a3112598..c0a122085 100644 --- a/Ashx/SIGFacturacion.ashx +++ b/Ashx/SIGFacturacion.ashx @@ -56,13 +56,16 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState Dim Retorno As Boolean = True Dim JsonRetorno As New JObject() Dim CveEmpresa As Integer = pCveEmpresa.ToEntero() + + GuardaLogFacturacion("- Inicio de facturación ") If CveEmpresa > 0 Then + GuardaLogFacturacion($"1.10 - CveE:{CveEmpresa}") Dim Usuario = ValidaUsuarioSistema(CveEmpresa) Dim FechaI, FechaF As DateTime - 'EnviarCorreoFactura(New Modelos.Factura(Usuario, 844966, 1, context.ModExtensiones.DirectorioBaseEmpresas), Usuario) If String.IsNullOrEmpty(pFechaI) AndAlso String.IsNullOrEmpty(pFechaF) Then + GuardaLogFacturacion("1.200") Dim FechaReferencia As Date = ClsPaginas.NowADS() If FechaReferencia.DayOfWeek = DayOfWeek.Sunday Then Dim Sabado = FechaReferencia.AddDays(-1) @@ -77,13 +80,13 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState GuardaLogFacturacion("Ejecución no permitida, no es el dia permitido para ejecucion o no se espeficaron las fechas") End If Else + GuardaLogFacturacion("1.300") FechaI = pFechaI.ToDateTime() FechaF = pFechaF.ToDateTime() JsonRetorno = EjecutarFacturacionMasiva(Usuario, FechaI, FechaF, Usuario.Empresa.FacturaProduccion) End If End If - GuardaLogFacturacion("Ejecución Exitosa, se generaron las siguientes facturas:") GuardaLogFacturacion(JsonRetorno.ToString())