This commit is contained in:
2022-06-18 11:54:01 -07:00
parent 31192c18a5
commit 20dfbe4a1f
4 changed files with 20 additions and 26 deletions

View File

@@ -1,7 +1,7 @@
using System; using Extensiones;
using System.Web.UI.WebControls; using System;
using Extensiones;
using System.Data; using System.Data;
using System.Web.UI.WebControls;
public partial class Contabilidad_ContabilizacionVentas : ClsPaginas public partial class Contabilidad_ContabilizacionVentas : ClsPaginas
{ {

View File

@@ -1,6 +1,6 @@
Imports System.Data Imports System.Data
Imports Extensiones
Imports System.Web.Services Imports System.Web.Services
Imports Extensiones
Partial Class Contabilidad_DiarioPagos Partial Class Contabilidad_DiarioPagos
Inherits ClsPaginas Inherits ClsPaginas

View File

@@ -1,11 +1,9 @@
 
Imports System.Data Imports System.Data
Imports Extensiones
Imports System.Linq
Imports System.Web.Services
Imports GemBox.Spreadsheet
Imports System.IO Imports System.IO
Imports Extensiones
Imports GemBox.Spreadsheet
Imports iTextSharp.text.pdf Imports iTextSharp.text.pdf
Imports Microsoft.Reporting.WebForms Imports Microsoft.Reporting.WebForms

View File

@@ -1,12 +1,8 @@
 
Imports System.Data Imports System.Data
Imports Extensiones Imports Extensiones
Imports System.Linq
Imports System.Web.Services
Imports GemBox.Spreadsheet Imports GemBox.Spreadsheet
Imports Microsoft.Reporting.WebForms Imports Microsoft.Reporting.WebForms
Imports System.IO
Imports iTextSharp.text.pdf
Partial Class ContabilidadC_RegPrePolizaS Partial Class ContabilidadC_RegPrePolizaS
Inherits ClsPaginas Inherits ClsPaginas
@@ -2264,7 +2260,7 @@ Partial Class ContabilidadC_RegPrePolizaS
If Not ErrorArchivo Then If Not ErrorArchivo Then
If Not dt.Columns(0).ColumnName.ToUpper = "CONCEPTOADMINISTRATIVO" Then If Not dt.Columns(0).ColumnName.ToUpper = "CONCEPTOADMINISTRATIVO" Then
Alert("El nombre de la primera columna debe ser 'ConceptoAdmin'. Favor de corregirlo", TipoMensaje.MsgError) Alert("El nombre de la primera columna debe ser 'ConceptoAdministrativo'. Favor de corregirlo", TipoMensaje.MsgError)
Exit Sub Exit Sub
End If End If
If Not dt.Columns(1).ColumnName.ToUpper = "CUENTA" Then If Not dt.Columns(1).ColumnName.ToUpper = "CUENTA" Then