-- se quito GlobalDTFolios
This commit is contained in:
rrene
@@ -1,5 +1,5 @@
|
||||
<%@ WebHandler Language="VB" Class="SIGFacturacion" %>
|
||||
|
||||
<%@ WebHandler Language="VB" Class="SIGFacturacion" %>
|
||||
|
||||
Imports System
|
||||
Imports System.Web
|
||||
Imports System.Net.Http
|
||||
@@ -212,8 +212,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
json.Add(New JProperty("Almacen", ObsInv.ToString()))
|
||||
|
||||
Return json
|
||||
End Function
|
||||
|
||||
End Function
|
||||
|
||||
#Region "V A L I D A - D A T O S"
|
||||
Private Function ValidaUsuarioSistema(CveEmpresa As Integer) As Usuario
|
||||
Dim UsuarioActual As Usuario = Nothing
|
||||
@@ -247,8 +247,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
UsuarioActual.Empresa = ObjEmpresa.Empresa
|
||||
End If
|
||||
ObjEmpresa.Dispose()
|
||||
End Sub
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
#Region "D E F I N I R - O B J E T O S"
|
||||
Private Function CreaFactura(Resp As Modelos.Factura.MMensajeFactura, UsuarioActual As Usuario, DTRemisionesPS As DataTable, CveCliente As Integer, CveSubProyecto As Integer, CveMoneda As Integer, DatosRemisiones As JObject, FechaI As DateTime, FechaF As DateTime) As Modelos.Factura
|
||||
@@ -750,7 +750,7 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
|
||||
'RECARGAR GV
|
||||
Return Row
|
||||
End Function
|
||||
End Function
|
||||
#End Region
|
||||
#Region "E N V I O - C O R R E O"
|
||||
Private Sub EnviarCorreo(Objfactura As Modelos.Factura, UsuarioActual As Usuario)
|
||||
@@ -894,9 +894,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
End If
|
||||
End Try
|
||||
End If
|
||||
End Sub
|
||||
End Sub
|
||||
#End Region
|
||||
|
||||
|
||||
Public Sub GuardaLogFacturacion(Str As String)
|
||||
Dim ArchivoW As StreamWriter
|
||||
Dim strLineaTMP As String
|
||||
@@ -919,8 +919,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
|
||||
ArchivoW.Close()
|
||||
ArchivoW.Dispose()
|
||||
End Sub
|
||||
|
||||
End Sub
|
||||
|
||||
#Region "G L O B A L - D T"
|
||||
Public Property GlobalTipoCambio(Optional Fecha As Date = MinFecha) As Double
|
||||
Get
|
||||
@@ -1105,10 +1105,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTPSATPS") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#Region "GLOBALES DE SAT COMERCIO EXTERIOR"
|
||||
|
||||
|
||||
Property GlobalDTClavePedimento() As DataTable
|
||||
Get
|
||||
GlobalDTClavePedimento = DirectCast(HttpContext.Current.Application("GlobalDTClavePedimento"), DataTable)
|
||||
@@ -1218,10 +1218,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTColonia") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
Property GlobalDTPSATUM() As DataTable
|
||||
Get
|
||||
GlobalDTPSATUM = DirectCast(HttpContext.Current.Application("GlobalDTPSATUM"), DataTable)
|
||||
@@ -1605,15 +1605,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTLeyendasFiscales") = value
|
||||
End Set
|
||||
End Property
|
||||
Property GlobalDTFolios() As DataTable
|
||||
Get
|
||||
GlobalDTFolios = DirectCast(HttpContext.Current.Application("GlobalDTFolios"), DataTable)
|
||||
End Get
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTFolios") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
|
||||
Property GlobalDTEstatusFactura() As DataTable
|
||||
Get
|
||||
GlobalDTEstatusFactura = DirectCast(HttpContext.Current.Application("GlobalDTEstatusFactura"), DataTable)
|
||||
@@ -2354,9 +2347,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTVtaCobranzaEstatus") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
End Property
|
||||
|
||||
|
||||
#Region "***********************************************************************DT EVENTOS****************************************************************************************"
|
||||
Property GlobalDTTiposEventos() As DataTable
|
||||
Get
|
||||
@@ -2392,9 +2385,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTOIEstatusEventos") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region " **********************************************************************DT PROSPECTOS*************************************************************************************"
|
||||
Property GlobalDTProspectosCaracteristicasClasificaciones() As DataTable
|
||||
Get
|
||||
@@ -2435,9 +2428,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTProspectosCaracteristicasOpciones") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "***********************************************************************DT ACTIVOS FIJOS**********************************************************************************"
|
||||
Property GlobalDTActivoFijos(CveEmpresa As Integer, Optional CveSubTipoActivoFijo As Integer = -1, Optional CveActivoFijo As Integer = -1) As DataTable
|
||||
Get
|
||||
@@ -2530,10 +2523,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTTipoActivoFijo") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "***********************************************************************DT GENERALES**************************************************************************************"
|
||||
Property GlobalDTGralPaises() As DataTable
|
||||
Get
|
||||
@@ -2621,10 +2614,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTGralColectivas") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "***********************************************************************DT PROSPECTOS*************************************************************************************"
|
||||
Property GlobalDTProspectosSupervisores(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
@@ -2833,8 +2826,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTProspectosTipos") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#Region " DT PROSPECTOS SOLICITUDES"
|
||||
Property GlobalDTProspectosSolicitudes(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
@@ -2901,15 +2894,15 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTProspectosSolicitudesApoyos") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "**********************************************DT AMORTIZACIÓN CONTABLE PLAN DE DESARROLLO********************************************************************************"
|
||||
|
||||
|
||||
#Region "***********************************************************************DT AMORTIZACIÓN CONTABLE*********************************************************************************************"
|
||||
|
||||
|
||||
Property GlobalDTAC_RubrosIngreso() As DataTable
|
||||
Get
|
||||
GlobalDTAC_RubrosIngreso = DirectCast(HttpContext.Current.Application("GlobalDTAC_RubrosIngreso"), DataTable)
|
||||
@@ -3165,11 +3158,11 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTAC_MatrizEgresos") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
End Property
|
||||
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
Property GlobalDTAC_PD_EjeRector(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
If CveEmpresa <> -1 Then
|
||||
@@ -3248,9 +3241,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTAC_PD_Metas") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "***********************************************************************GLOBAL DT ORDENES DE COMPRA***********************************************************************"
|
||||
Property GlobalDTOCEstatus(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
@@ -3287,11 +3280,11 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTOCEstatusUsuarios") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
End Property
|
||||
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "F I N A N Z A S "
|
||||
Property GlobalDTFinan_RazonesFinancieras() As DataTable
|
||||
Get
|
||||
@@ -3300,10 +3293,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTFinan_RazonesFinancieras") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
|
||||
#Region "***********************************************************************GLOBAL DT CONTABILIDAD****************************************************************************"
|
||||
Property GlobalDTContaPlantillasPolizas(CveEmpresa As Integer, Optional TipoPlantilla As Integer = -1) As DataTable
|
||||
Get
|
||||
@@ -3357,9 +3350,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTContaConceptosContables") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "**********************************************************************GLOBAL DT RH (RECURSOS HUMANOS)********************************************************************"
|
||||
Property GlobalDTAsistenciaDetalle() As DataTable
|
||||
Get
|
||||
@@ -3511,13 +3504,13 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTTipoBuzon") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "*********** D T - C O M B U S T I B L E S ***********"
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Property GlobalDTCombustibles(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
If CveEmpresa <> -1 Then
|
||||
@@ -3556,11 +3549,11 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(ByVal value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTCombustiblesTipos") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "*********** D T - M A N T E N I M I E N T O S ***********"
|
||||
|
||||
|
||||
Property GlobalDTMantenimientosTipos() As DataTable
|
||||
Get
|
||||
GlobalDTMantenimientosTipos = DirectCast(HttpContext.Current.Application("GlobalDTMantenimientosTipos"), DataTable)
|
||||
@@ -3599,13 +3592,13 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
|
||||
HttpContext.Current.Application("GlobalDTMantenimientosTipos") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
|
||||
#Region "*********** D T - T A L L E R E S ***********"
|
||||
|
||||
|
||||
Property GlobalDTTalleresTipos() As DataTable
|
||||
Get
|
||||
GlobalDTTalleresTipos = DirectCast(HttpContext.Current.Application("GlobalDTTalleresTipos"), DataTable)
|
||||
@@ -3622,12 +3615,12 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTTalleres") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "*********** D T - D I S T R I B U I D O R E S ***********"
|
||||
|
||||
|
||||
Property GlobalDTDistribuidoresTipos() As DataTable
|
||||
Get
|
||||
GlobalDTDistribuidoresTipos = DirectCast(HttpContext.Current.Application("GlobalDTDistribuidoresTipos"), DataTable)
|
||||
@@ -3644,11 +3637,11 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTDistribuidores") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
|
||||
Property GlobalDTOIRevision(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
If CveEmpresa <> -1 Then
|
||||
@@ -3739,8 +3732,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTPaqueterias") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
End Class
|
||||
Reference in New Issue
Block a user