-
This commit is contained in:
@@ -56,13 +56,16 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
|||||||
Dim Retorno As Boolean = True
|
Dim Retorno As Boolean = True
|
||||||
Dim JsonRetorno As New JObject()
|
Dim JsonRetorno As New JObject()
|
||||||
Dim CveEmpresa As Integer = pCveEmpresa.ToEntero()
|
Dim CveEmpresa As Integer = pCveEmpresa.ToEntero()
|
||||||
|
|
||||||
|
GuardaLogFacturacion("- Inicio de facturación ")
|
||||||
If CveEmpresa > 0 Then
|
If CveEmpresa > 0 Then
|
||||||
|
GuardaLogFacturacion($"1.10 - CveE:{CveEmpresa}")
|
||||||
Dim Usuario = ValidaUsuarioSistema(CveEmpresa)
|
Dim Usuario = ValidaUsuarioSistema(CveEmpresa)
|
||||||
Dim FechaI, FechaF As DateTime
|
Dim FechaI, FechaF As DateTime
|
||||||
|
|
||||||
'EnviarCorreoFactura(New Modelos.Factura(Usuario, 844966, 1, context.ModExtensiones.DirectorioBaseEmpresas), Usuario)
|
'EnviarCorreoFactura(New Modelos.Factura(Usuario, 844966, 1, context.ModExtensiones.DirectorioBaseEmpresas), Usuario)
|
||||||
|
|
||||||
If String.IsNullOrEmpty(pFechaI) AndAlso String.IsNullOrEmpty(pFechaF) Then
|
If String.IsNullOrEmpty(pFechaI) AndAlso String.IsNullOrEmpty(pFechaF) Then
|
||||||
|
GuardaLogFacturacion("1.200")
|
||||||
Dim FechaReferencia As Date = ClsPaginas.NowADS()
|
Dim FechaReferencia As Date = ClsPaginas.NowADS()
|
||||||
If FechaReferencia.DayOfWeek = DayOfWeek.Sunday Then
|
If FechaReferencia.DayOfWeek = DayOfWeek.Sunday Then
|
||||||
Dim Sabado = FechaReferencia.AddDays(-1)
|
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")
|
GuardaLogFacturacion("Ejecución no permitida, no es el dia permitido para ejecucion o no se espeficaron las fechas")
|
||||||
End If
|
End If
|
||||||
Else
|
Else
|
||||||
|
GuardaLogFacturacion("1.300")
|
||||||
FechaI = pFechaI.ToDateTime()
|
FechaI = pFechaI.ToDateTime()
|
||||||
FechaF = pFechaF.ToDateTime()
|
FechaF = pFechaF.ToDateTime()
|
||||||
|
|
||||||
JsonRetorno = EjecutarFacturacionMasiva(Usuario, FechaI, FechaF, Usuario.Empresa.FacturaProduccion)
|
JsonRetorno = EjecutarFacturacionMasiva(Usuario, FechaI, FechaF, Usuario.Empresa.FacturaProduccion)
|
||||||
End If
|
End If
|
||||||
End If
|
End If
|
||||||
|
|
||||||
GuardaLogFacturacion("Ejecución Exitosa, se generaron las siguientes facturas:")
|
GuardaLogFacturacion("Ejecución Exitosa, se generaron las siguientes facturas:")
|
||||||
GuardaLogFacturacion(JsonRetorno.ToString())
|
GuardaLogFacturacion(JsonRetorno.ToString())
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user