AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

/cambios en globalDT separados por Empresa

Browse Source
This commit is contained in:
janeth arvizu
2019-12-26 17:30:11 -07:00
parent fdb3abf583
commit 2bb4c47c92
32 changed files with 601 additions and 482 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
Ashx/SIGFacturacion.ashx
View File

@@ -1929,24 +1929,7 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
HttpContext.Current.Application("GlobalDTProductosServiciosAlias") = value
End Set
End Property
Property GlobalDTProductosServiciosEquivalencias(CvePS As Integer, CveUM As Integer) As DataTable
Get
If CvePS <> -1 OrElse CveUM <> -1 Then
Dim StrSQL As New StringBuilder
If CvePS <> -1 Then StrSQL.AppendFormat(" AND CvePS = {0}", CvePS)
If CveUM <> -1 Then StrSQL.AppendFormat(" AND CveUM = {0}", CveUM)
Dim Dv As New DataView(DirectCast(HttpContext.Current.Application("GlobalDTProductosServiciosEquivalencias"), DataTable), StrSQL.ToString.Trim.TrimStart("A"c, "N"c, "D"c), "", DataViewRowState.CurrentRows)
GlobalDTProductosServiciosEquivalencias = Dv.ToTable
Dv.Dispose()
Else
GlobalDTProductosServiciosEquivalencias = DirectCast(HttpContext.Current.Application("GlobalDTProductosServiciosEquivalencias"), DataTable)
End If
End Get
Set(value As DataTable)
HttpContext.Current.Application("GlobalDTProductosServiciosEquivalencias") = value
End Set
End Property
Property GlobalDTProductosServiciosCaracteristicas(CveEmpresa As Integer) As DataTable
Get
If CveEmpresa <> -1 Then