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

-- cleanup

Browse Source
This commit is contained in:
rrene
2022-06-18 11:19:59 -07:00
parent 23ffe814e9
commit 8a5eae3654
4 changed files with 9 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Compras/PopUpVerFactura.aspx.vb
View File

@@ -1,21 +1,15 @@
Option Strict On
Option Explicit On
Imports Extensiones
Imports System.Data
Imports Microsoft.Reporting.WebForms
Imports System.Xml
Imports System.IO
Imports System.Xml
Imports Extensiones
Imports iTextSharp.text
Imports iTextSharp.text.pdf
Imports Microsoft.Reporting.WebForms
Imports Stimulsoft.Report
Imports Stimulsoft.Report.Components
Imports Stimulsoft.Report.Dictionary
Imports Stimulsoft.Report.Web
Imports Newtonsoft.Json.Linq
Imports System
Imports Microsoft.VisualBasic
Partial Class PopUpVerFactura
Inherits ClsPaginas

4
Compras/ReembolsosComprobaciones.aspx.vb
View File

@@ -1,6 +1,6 @@

Imports Extensiones
Imports System.Data
Imports Extensiones
Imports Microsoft.Reporting.WebForms
Partial Class Compras_ReembolsosComprobaciones
@@ -1424,7 +1424,7 @@ Partial Class Compras_ReembolsosComprobaciones
GvCxP.Visible = True
ObjMovtos.GetCxPPersonalCajaChica(UsuarioActual.CveEmpresa, CvePersonal, CveCajaChica, If(TxtNumeroReembolso.Text.Trim = "", "-1", TxtNumeroReembolso.Text.Trim))
ObjMovtos.GetCxPPersonalCajaChica(UsuarioActual.CveEmpresa, CvePersonal, CveCajaChica, If(TxtNumeroReembolso.Text.Trim = "", "-1", TxtNumeroReembolso.Text.Trim), OpcionSaldo:=1)
DtDatos = ObjMovtos.DtResultados.FiltraParametros("Saldo > 0")
GvCxP.DataSource = DtDatos
CvePrePolizaComprobacion = DtDatos.MAX("CvePrePolizaComprobacion").ToEntero

2
Compras/RepRembolsoComprobaciones.aspx.vb
View File

@@ -261,7 +261,7 @@ Partial Class Compras_RepRembolsoComprobaciones
Dim FechaI As DateTime = If(String.IsNullOrEmpty(txtFechaI.Text.Trim()), ModExtensiones.MinFecha, txtFechaI.Text.ToDateTime())
Dim FechaF As DateTime = If(String.IsNullOrEmpty(txtFechaF.Text.Trim()), ModExtensiones.MaxFecha, txtFechaF.Text.ToDateTime())
ObjMovtos.GetCxPPersonalCajaChica(UsuarioActual.CveEmpresa, CvePersonal, CveCajaChica, If(TxtNumeroReembolso.Text.Trim = "", "-1", TxtNumeroReembolso.Text.Trim), FechaI:=FechaI, FechaF:=FechaF)
ObjMovtos.GetCxPPersonalCajaChica(UsuarioActual.CveEmpresa, CvePersonal, CveCajaChica, If(TxtNumeroReembolso.Text.Trim = "", "-1", TxtNumeroReembolso.Text.Trim), FechaI:=FechaI, FechaF:=FechaF, OpcionSaldo:=-1)
DtDatos = ObjMovtos.DtResultados
GvCxP.DataSource = DtDatos

6
Compras/eFacturas.aspx.vb
View File

@@ -2,15 +2,15 @@
Option Explicit On
Imports System.Data
Imports Extensiones
Imports System.Diagnostics
Imports System.Globalization
Imports System.IO
Imports System.IO.Compression
Imports System.Xml
Imports Microsoft.Reporting.WebForms
Imports System.Globalization
Imports ADSistemaLibrary.SatXml
Imports ADSistemaLibrary.SatXml.XmlSatCFDI
Imports Extensiones
Imports Microsoft.Reporting.WebForms
Partial Class Compras_eFacturas
Inherits ClsPaginas