This commit is contained in:
2025-02-22 17:20:24 -07:00
parent f068d86220
commit 1e4852891d
2 changed files with 3 additions and 3 deletions

View File

@@ -31,7 +31,7 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
pFechaI = context.Request("FechaI")
pFechaF = context.Request("FechaF")
End If
If context.Request("CveEmpresa") IsNot Nothing Then CveEmpresaFacturar = context.Request("CveEmpresa").ToString.ToEntero
Retorno = IniciaFacturacionMasiva(CveEmpresaFacturar.ToString, pFechaI, pFechaF)
End If
GuardaLogFacturacion(" -------------------------- Fin de Petición Metodo:" & Metodo & " --------------------------")

View File

@@ -1325,8 +1325,8 @@ Public Class TareasProgramadas : Implements IHttpHandler, IReadOnlySessionState
objGenerales.Dispose()
'MandaCorreoDiario
'Dim Correos As String = "hdiaz@grupodiaz.com.mx;libarra@grupodiaz.com.mx;jguerrero@grupodiaz.com.mx;contabilidad@grupodiaz.com.mx;cnazarit@yahoo.com;julian@adsistemas.mx;rene.molina@adssistemas.mx"
Dim Correos As String = " rene.molina@adssistemas.mx"
Dim Correos As String = "hdiaz@grupodiaz.com.mx;libarra@grupodiaz.com.mx;jguerrero@grupodiaz.com.mx;contabilidad@grupodiaz.com.mx;cnazarit@yahoo.com;julian@adsistemas.mx;rene.molina@adssistemas.mx"
' Dim Correos As String = " rene.molina@adssistemas.mx"
MandaCorreoDiario(sbTablas.ToString(), Correos, respuesta)
Return respuesta
End Function