Merge branch 'master' of http://192.168.10.111:8383/SIG
This commit is contained in:
JPerez
@@ -120,12 +120,13 @@ Public Class ClsExportaciones
|
||||
End Sub
|
||||
|
||||
#Region "EXPORTACIONES"
|
||||
Public Function GetExportacion(Optional CveExportacion As Integer = -1, Optional CveEmpresa As Integer = -1, Optional FechaInicio As Date = MinFecha, Optional FechaFin As Date = MaxFecha) As Boolean
|
||||
Public Function GetExportacion(Optional CveExportacion As Integer = -1, Optional CveEmpresa As Integer = -1, Optional EsExportacion As Integer = 1, Optional FechaInicio As Date = MinFecha, Optional FechaFin As Date = MaxFecha) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
DataAdapter("PA_Exp_ExportacionesRep")
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("@CveExportacion", SqlDbType.Int).Value = CveExportacion
|
||||
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
|
||||
.Add("@EsExportacion", SqlDbType.Bit).Value = EsExportacion
|
||||
.Add("@FechaInicio", SqlDbType.Date).Value = FechaInicio
|
||||
.Add("@FechaFin", SqlDbType.Date).Value = FechaFin
|
||||
End With
|
||||
@@ -142,7 +143,7 @@ Public Class ClsExportaciones
|
||||
CveClienteExportador As Integer, CveClienteImportador As Integer, CveClienteConsignatario As Integer, CveAgente As Integer, ClaveAduana As Integer,
|
||||
CveProveedor As Integer, MedioTransporte As Integer, TipoContenedor As Integer, Sello1 As String, Sello2 As String, Sello3 As String, SCAC As String,
|
||||
CAAT As String, ContenedorPlaca As String, CveEmpresa As Integer, CveUsuario As Integer, CveDirExportador As Integer, CveDirConsignatario As Integer,
|
||||
CveIncoterm As Integer, Notas As String, CvePedimento As Integer, CveAgenteExtranjero As Integer) As Integer
|
||||
CveIncoterm As Integer, Notas As String, CvePedimento As Integer, CveAgenteExtranjero As Integer, ITN As String, Vinculacion As Boolean) As Integer
|
||||
Dim Retorno As Integer = -1
|
||||
DataAdapter("PA_Exp_ExportacionesAdd")
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
@@ -174,6 +175,8 @@ Public Class ClsExportaciones
|
||||
.Add("@Notas", SqlDbType.VarChar).Value = Notas
|
||||
.Add("@CvePedimento", SqlDbType.Int).Value = CvePedimento
|
||||
.Add("@CveAgenteExtranjero", SqlDbType.Int).Value = CveAgenteExtranjero
|
||||
.Add("@ITN", SqlDbType.VarChar).Value = ITN
|
||||
.Add("@Vinculacion", SqlDbType.Bit).Value = Vinculacion
|
||||
|
||||
.Add("@CveExportacion", SqlDbType.Int).Direction = ParameterDirection.Output
|
||||
End With
|
||||
@@ -191,7 +194,7 @@ Public Class ClsExportaciones
|
||||
CveClienteExportador As Integer, CveClienteImportador As Integer, CveClienteConsignatario As Integer, CveAgente As Integer, ClaveAduana As Integer,
|
||||
CveProveedor As Integer, MedioTransporte As Integer, TipoContenedor As Integer, Sello1 As String, Sello2 As String, Sello3 As String, SCAC As String,
|
||||
CAAT As String, ContenedorPlaca As String, CveEmpresa As Integer, CveUsuario As Integer, CveDirExportador As Integer, CveDirConsignatario As Integer,
|
||||
CveIncoterm As Integer, Notas As String, CvePedimento As Integer, CveAgenteExtranjero As Integer) As Boolean
|
||||
CveIncoterm As Integer, Notas As String, CvePedimento As Integer, CveAgenteExtranjero As Integer, ITN As String, Vinculacion As Boolean) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
DataAdapter("PA_Exp_ExportacionesUpdate")
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
@@ -224,6 +227,8 @@ Public Class ClsExportaciones
|
||||
.Add("@Notas", SqlDbType.VarChar).Value = Notas
|
||||
.Add("@CvePedimento", SqlDbType.Int).Value = CvePedimento
|
||||
.Add("@CveAgenteExtranjero", SqlDbType.Int).Value = CveAgenteExtranjero
|
||||
.Add("@ITN", SqlDbType.VarChar).Value = ITN
|
||||
.Add("@Vinculacion", SqlDbType.Bit).Value = Vinculacion
|
||||
End With
|
||||
Try
|
||||
SqlAdapter.Fill(Data)
|
||||
|
||||
@@ -10591,7 +10591,7 @@ Public Class ClsPaginas
|
||||
PaginaDict.Add("/CxC/RepCxCPeriodo.aspx".ToUpper(), 887)
|
||||
#End Region
|
||||
#Region "Exportaciones"
|
||||
PaginaDict.Add("/Export/RepExportaciones.aspx".ToUpper(), 77)
|
||||
'PaginaDict.Add("/Export/RepExportaciones.aspx".ToUpper(), 77)
|
||||
PaginaDict.Add("/Export/ExpDetalle.aspx".ToUpper(), 77)
|
||||
#End Region
|
||||
#Region "Finanzas"
|
||||
@@ -11362,6 +11362,12 @@ Public Class ClsPaginas
|
||||
Case Else : Retorno = 9
|
||||
End Select
|
||||
End If
|
||||
If Pagina.ToUpper() = ("/Export/RepExportaciones.aspx").ToUpper() Then
|
||||
Select Case Request("Opcion")
|
||||
Case "I" : Retorno = 85
|
||||
Case Else : Retorno = 77
|
||||
End Select
|
||||
End If
|
||||
Return Retorno
|
||||
End Function
|
||||
#End Region
|
||||
|
||||
@@ -5042,7 +5042,7 @@
|
||||
<asp:BoundField HeaderText="Producto" DataField="CodigoPS" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="30%" />
|
||||
<asp:TemplateField HeaderText="P.U." ItemStyle-HorizontalAlign="Right" FooterStyle-HorizontalAlign="Right" ItemStyle-Width="7.5%">
|
||||
<ItemTemplate>
|
||||
<asp:Textbox ID="TxtPU" Width="60px" Text='<%# Eval("PU", "{0:N2}") %>' CssClass="textaslabel" runat="server"></asp:Textbox>
|
||||
<asp:Textbox ID="TxtPU" Width="60px" Text='<%# Eval("PU", "{0:N5}") %>' CssClass="textaslabel" runat="server"></asp:Textbox>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Total" ItemStyle-HorizontalAlign="Right" FooterStyle-HorizontalAlign="Right" ItemStyle-Width="7.5%">
|
||||
|
||||
@@ -15524,6 +15524,9 @@ Partial Class Compras_Compras
|
||||
End If
|
||||
End If
|
||||
|
||||
Dim ivaPorcentaje As Decimal = DTOCGV.MAX("IVAPorcentaje").ToDecimal
|
||||
Dim IVAPorcentajeTmp As Decimal = TmpDT.MAX("IVAPorcentaje").ToDecimal
|
||||
|
||||
If DTOCGV.MAX("IVAPorcentaje").ToDecimal <> TmpDT.MAX("IVAPorcentaje").ToDecimal Then
|
||||
Alert("La orden de compra(s) tiene diferentes tasa de IVA.", TipoMensaje.MsgAdvertencia)
|
||||
End If
|
||||
|
||||
@@ -5890,7 +5890,14 @@ Partial Class Compras_Proveedores
|
||||
|
||||
|
||||
Private Sub CargaTipoTransaccion()
|
||||
|
||||
|
||||
If GlobalDTDIOTTipoOperacion IsNot Nothing AndAlso GlobalDTDIOTTipoOperacion.Rows.Count = 0 Then
|
||||
GlobalDTDIOTTipoOperacion = Nothing
|
||||
End If
|
||||
|
||||
Dim Filtro As String = ""
|
||||
|
||||
Select Case DDlDIOTTipoTercero.SelectedValue
|
||||
Case "1"
|
||||
Filtro = "AplicaProvNacional = 1"
|
||||
@@ -5900,8 +5907,11 @@ Partial Class Compras_Proveedores
|
||||
Filtro = "AplicaProvGlobal = 1"
|
||||
End Select
|
||||
|
||||
GlobalDTDIOTTipoOperacion.FiltraParametros(Filtro)
|
||||
|
||||
DdlDIOTTipoOperacion.DataSource = GlobalDTDIOTTipoOperacion.FiltraParametros(Filtro)
|
||||
DdlDIOTTipoOperacion.DataBind()
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
@@ -695,6 +695,7 @@
|
||||
<asp:HiddenField ID="HdnCompraIdPoliza" runat="server" Value='<%# Eval("CompraIdPoliza")%>' />
|
||||
<asp:HiddenField ID="HdnIdSegNeg" runat="server" Value='<%# Eval("IdSegNeg")%>' />
|
||||
<asp:HiddenField ID="HdnPorcentajeIVA" runat="server" Value='<%# Eval("PorcentajeIVA")%>' />
|
||||
<asp:HiddenField ID="HdnCveMonedaCompra" runat="server" Value='<%# Eval("CveMonedaCompra")%>' />
|
||||
|
||||
<table width="100%" cellpadding="0" cellspacing="0" runat="server" id="TbCompra">
|
||||
<tr class="SubTotales">
|
||||
|
||||
@@ -174,6 +174,13 @@
|
||||
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlCon" Width="100%" data-metodo="getproveedores" UsaWebService="true" runat="server" DataTextField="RazonSocial" DataValueField="CveProveedor" CssStyle="width: 100%;"></ADS:Dropdownlost>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-4" Text="ITN:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 300px;">
|
||||
<asp:TextBox ID="TxtITN" runat="server" CssClass="form-control input-sm" MaxLength="15" Width="100%" Text=""></asp:TextBox>
|
||||
<label for="<%= TxtITN.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
@@ -210,6 +217,13 @@
|
||||
<ajax:ValidatorCalloutExtender ID="VCEDirCon" runat="server" HighlightCssClass="vco" TargetControlID="RFVDirCon" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-4" Text="Vinculación:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 300px;">
|
||||
<asp:CheckBox ID="CkbVinculacion" runat="server"/>
|
||||
<label for="<%= CkbVinculacion.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
@@ -453,48 +467,48 @@
|
||||
</div>
|
||||
<div class="portlet-body form-horizontal form-row-sepe formnombottom" style="padding-left:8px">
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Gastos Transp.:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-6" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Gastos Transp.:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtIncFletes" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEIncFletes" runat="server" TargetControlID="TxtIncFletes" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtIncFletes.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Gastos Seguros:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Gastos Seguros:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtIncSeguro" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEIncSeguro" runat="server" TargetControlID="TxtIncSeguro" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtIncSeguro.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Gastos Embalaje:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Gastos Embalaje:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtIncEmbalajes" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEIncEmbalajes" runat="server" TargetControlID="TxtIncEmbalajes" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtIncEmbalajes.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Costo Envases:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Costo Envases:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtIncEmbalaje" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEIncEmbalaje" runat="server" TargetControlID="TxtIncEmbalaje" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtIncEmbalaje.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Gastos Conexos:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Gastos Conexos:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtIncConexos" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEIncConexos" runat="server" TargetControlID="TxtIncConexos" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtIncConexos.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Total:"></asp:Label>
|
||||
<div class="whitoutcol whitoutcol" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-5" Text="Total:"></asp:Label>
|
||||
<div class="whitoutcol whitoutcol col-md-6">
|
||||
<asp:TextBox ID="TxtTotalInc" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text="" ReadOnly="true" Enabled="false"></asp:TextBox>
|
||||
</div>
|
||||
</div>
|
||||
@@ -521,48 +535,48 @@
|
||||
</div>
|
||||
<div class="portlet-body form-horizontal form-row-sepe formnombottom" style="padding-left:8px">
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Gastos Transp.:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Gastos Transp.:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtDecFlete" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEDecFlete" runat="server" TargetControlID="TxtDecFlete" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtDecFlete.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Gastos Seguros:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Gastos Seguros:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtDecSeguro" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEDecSeguro" runat="server" TargetControlID="TxtDecSeguro" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtDecSeguro.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Gastos Carga:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Gastos Carga:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtDecCarga" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEDecCarga" runat="server" TargetControlID="TxtDecCarga" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtDecCarga.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Gastos Descarga:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Gastos Descarga:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtDecDescarga" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEDecDescarga" runat="server" TargetControlID="TxtDecDescarga" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtDecDescarga.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Otros Gastos:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-6" Text="Otros Gastos:"></asp:Label>
|
||||
<div class="form-group form-md-line-input linewhitsize col-md-5">
|
||||
<asp:TextBox ID="TxtDecOtros" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text=""></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="FTEDecOtros" runat="server" TargetControlID="TxtDecOtros" FilterType="Custom, Numbers" ValidChars="." />
|
||||
<label for="<%= TxtDecOtros.ClientID.ToString()%>"></label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group row" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-3" Text="Total:"></asp:Label>
|
||||
<div class="whitoutcol whitoutcol" style="width: 100%;">
|
||||
<asp:Label runat="server" CssClass="col-sm-5" Text="Total:"></asp:Label>
|
||||
<div class="whitoutcol whitoutcol col-md-6">
|
||||
<asp:TextBox ID="TxtTotalDec" runat="server" CssClass="form-control input-sm" MaxLength="300" Width="100%" Text="" ReadOnly="true" Enabled="false"></asp:TextBox>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
@@ -1,9 +1,10 @@
|
||||
using ADSNetLibrary.Helpers;
|
||||
using CrystalDecisions.ReportAppServer.DataDefModel;
|
||||
|
||||
//using DocumentFormat.OpenXml.Wordprocessing;
|
||||
using Extensiones;
|
||||
using HigLabo.Core;
|
||||
using iText.IO.Font.Otf;
|
||||
using Microsoft.Reporting.WebForms;
|
||||
using Profact.TimbraCFDI;
|
||||
using Profact.TimbraCFDI.Complementos.ComercioExterior10;
|
||||
using StackExchange.Redis;
|
||||
@@ -13,6 +14,7 @@ using System.Activities.Expressions;
|
||||
using System.Activities.Statements;
|
||||
using System.Collections.Generic;
|
||||
using System.Data;
|
||||
using System.Globalization;
|
||||
using System.IO;
|
||||
using System.Linq;
|
||||
using System.Web;
|
||||
@@ -122,12 +124,12 @@ public partial class Export_ExpDetalle : ClsPaginas
|
||||
{
|
||||
LblExp.Text = DTExportaciones.FiltroPrimeroValor("CveExportacion");
|
||||
|
||||
string CveVenta = Exportaciones.DtResultados.FiltroPrimeroValor("CveVenta");
|
||||
string CveVenta = DTExportaciones.FiltroPrimeroValor("CveVenta");
|
||||
if (CveVenta != "" && CveVenta != "-1")
|
||||
{
|
||||
if (DdlVentas.Items.FindByValue(CveVenta) == null)
|
||||
{
|
||||
string Folio = Exportaciones.DtResultados.FiltroPrimeroValor("SerieFolio");
|
||||
string Folio = DTExportaciones.FiltroPrimeroValor("SerieFolio");
|
||||
DdlVentas.Items.Insert(1, new ListItem(Folio, CveVenta));
|
||||
}
|
||||
DdlVentas.SelectedValue = CveVenta;
|
||||
@@ -148,8 +150,10 @@ public partial class Export_ExpDetalle : ClsPaginas
|
||||
DdlExp.SelectedText = DTExportaciones.FiltroPrimeroValor("ClienteExportador");
|
||||
DdlImp.SelectedValue = DTExportaciones.FiltroPrimeroValor("CveClienteImportador");
|
||||
DdlImp.SelectedText = DTExportaciones.FiltroPrimeroValor("ClienteImportador");
|
||||
TxtITN.Text = DTExportaciones.FiltroPrimeroValor("ITN");
|
||||
DdlCon.SelectedValue = DTExportaciones.FiltroPrimeroValor("CveClienteConsignatario");
|
||||
DdlCon.SelectedText = DTExportaciones.FiltroPrimeroValor("ClienteConsignatario");
|
||||
CkbVinculacion.Checked = ModExtensiones.ToBool(DTExportaciones.FiltroPrimeroValor("Vinculacion"));
|
||||
|
||||
DdlAgenteMex.SelectedValue = DTExportaciones.FiltroPrimeroValor("CveAgente");
|
||||
DdlAgenteExt.SelectedValue = DTExportaciones.FiltroPrimeroValor("CveAgenteExtranjero");
|
||||
@@ -172,16 +176,16 @@ public partial class Export_ExpDetalle : ClsPaginas
|
||||
DataTable DTGastos = Gastos.DtResultados;
|
||||
if (DTGastos.Rows.Count > 0)
|
||||
{
|
||||
TxtIncFletes.Text = DTGastos.FiltroPrimeroValor("IncFletes");
|
||||
TxtIncSeguro.Text = DTGastos.FiltroPrimeroValor("IncSeguro");
|
||||
TxtIncEmbalajes.Text = DTGastos.FiltroPrimeroValor("IncEmbalajes");
|
||||
TxtIncEmbalaje.Text = DTGastos.FiltroPrimeroValor("IncEmbalaje");
|
||||
TxtIncConexos.Text = DTGastos.FiltroPrimeroValor("IncConexos");
|
||||
TxtDecFlete.Text = DTGastos.FiltroPrimeroValor("DecFlete");
|
||||
TxtDecSeguro.Text = DTGastos.FiltroPrimeroValor("DecSeguro");
|
||||
TxtDecCarga.Text = DTGastos.FiltroPrimeroValor("DecCarga");
|
||||
TxtDecDescarga.Text = DTGastos.FiltroPrimeroValor("DecDescarga");
|
||||
TxtDecOtros.Text = DTGastos.FiltroPrimeroValor("DecOtros");
|
||||
TxtIncFletes.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncFletes")).ToString("#,###.####");
|
||||
TxtIncSeguro.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncSeguro")).ToString("#,###.####");
|
||||
TxtIncEmbalajes.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncEmbalajes")).ToString("#,###.####");
|
||||
TxtIncEmbalaje.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncEmbalaje")).ToString("#,###.####");
|
||||
TxtIncConexos.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncConexos")).ToString("#,###.####");
|
||||
TxtDecFlete.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecFlete")).ToString("#,###.####");
|
||||
TxtDecSeguro.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecSeguro")).ToString("#,###.####");
|
||||
TxtDecCarga.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecCarga")).ToString("#,###.####");
|
||||
TxtDecDescarga.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecDescarga")).ToString("#,###.####");
|
||||
TxtDecOtros.Text = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecOtros")).ToString("#,###.####");
|
||||
}
|
||||
}
|
||||
Gastos.Dispose();
|
||||
@@ -327,6 +331,7 @@ public partial class Export_ExpDetalle : ClsPaginas
|
||||
return;
|
||||
}
|
||||
|
||||
string ITN = TxtITN.Text;
|
||||
string NumeroPedimento = TxtNumPed.Text;
|
||||
DateTime FechaPedimento = TxtFechaPedim.Text.ToDate();
|
||||
int CveVenta = DdlVentas.Text.ToEntero();
|
||||
@@ -348,6 +353,7 @@ public partial class Export_ExpDetalle : ClsPaginas
|
||||
int CveUsuario = UsuarioActual.CveUsuario;
|
||||
int CveDirExportador = DdlDirExp.Text.ToEntero();
|
||||
int CveDirConsignatario = DdlDirCon.Text.ToEntero();
|
||||
bool Vinculacion = CkbVinculacion.Checked;
|
||||
int CveIncoterm = DdlIncoterm.Text.ToEntero();
|
||||
string Notas = TxtNotas.Text;
|
||||
int CvePedimento = DdlClavePedimento.Text.ToEntero();
|
||||
@@ -396,7 +402,9 @@ public partial class Export_ExpDetalle : ClsPaginas
|
||||
CveIncoterm,
|
||||
Notas,
|
||||
CvePedimento,
|
||||
CveAgenteExtranjero
|
||||
CveAgenteExtranjero,
|
||||
ITN,
|
||||
Vinculacion
|
||||
);
|
||||
if (ExportacionGuardada != -1)
|
||||
{
|
||||
@@ -470,7 +478,9 @@ public partial class Export_ExpDetalle : ClsPaginas
|
||||
CveIncoterm,
|
||||
Notas,
|
||||
CvePedimento,
|
||||
CveAgenteExtranjero
|
||||
CveAgenteExtranjero,
|
||||
ITN,
|
||||
Vinculacion
|
||||
);
|
||||
if (Continuar)
|
||||
{
|
||||
@@ -899,9 +909,192 @@ public partial class Export_ExpDetalle : ClsPaginas
|
||||
UpPSS.Update();
|
||||
}
|
||||
|
||||
protected void ImprimirReporte(string Formato = "PDF")
|
||||
protected void ImprimirReporte()
|
||||
{
|
||||
FileInfo Archivo = new FileInfo(string.Format("{0}Empresas/Grales/Formatos/FacturaImportacion.mrt", UsuarioActual.Empresa.Ruta));
|
||||
//FileInfo Archivo = new FileInfo(string.Format("{0}Empresas/Grales/Formatos/FacturaImportacion.mrt", UsuarioActual.Empresa.Ruta));
|
||||
|
||||
int CveEmpresa = UsuarioActual.CveEmpresa;
|
||||
DataTable DTExportaciones = new DataTable();
|
||||
ClsExportaciones Exportaciones = new ClsExportaciones();
|
||||
if (Exportaciones.GetExportacion(CveExportacion, CveEmpresa))
|
||||
{
|
||||
DTExportaciones = Exportaciones.DtResultados;
|
||||
if (DTExportaciones.Rows.Count > 0)
|
||||
{
|
||||
DataRow RowExp = DTExportaciones.Rows[0];
|
||||
string ClienteExportador = DTExportaciones.FiltroPrimeroValor("ClienteExportador");
|
||||
string DirExportador = DTExportaciones.FiltroPrimeroValor("DirExportador");
|
||||
string ClienteImortador = DTExportaciones.FiltroPrimeroValor("ClienteImportador");
|
||||
string RFCImp = DTExportaciones.FiltroPrimeroValor("RFCImp");
|
||||
string NumFactura = DTExportaciones.FiltroPrimeroValor("SerieFolio");
|
||||
string ClaveSATPedimento = DTExportaciones.FiltroPrimeroValor("ClaveSATPedimento");
|
||||
string ITN = DTExportaciones.FiltroPrimeroValor("ITN");
|
||||
string Vinculacion = DTExportaciones.FiltroPrimeroValor("Vinculacion") == "True" ? "SI" : "NO";
|
||||
string FechaFact = "";
|
||||
string NumSemana = "";
|
||||
if (RowExp["FechaFact"] != DBNull.Value)
|
||||
{
|
||||
DateTime fechaf = Convert.ToDateTime(RowExp["FechaFact"]);
|
||||
FechaFact = fechaf.ToString("dd/MM/yyyy");
|
||||
|
||||
CultureInfo cultura = CultureInfo.CurrentCulture;
|
||||
System.Globalization.Calendar calendario = cultura.Calendar;
|
||||
int numeroSemana = calendario.GetWeekOfYear(
|
||||
fechaf,
|
||||
cultura.DateTimeFormat.CalendarWeekRule,
|
||||
cultura.DateTimeFormat.FirstDayOfWeek
|
||||
);
|
||||
NumSemana = numeroSemana.ToString();
|
||||
}
|
||||
string TipoCambio = ModExtensiones.ToDecimal(DTExportaciones.FiltroPrimeroValor("TipoCambio")).ToString("#,###.####");
|
||||
string MedioTransporte = DTExportaciones.FiltroPrimeroValor("MedioTransporte");
|
||||
string TipoContenedor = DTExportaciones.FiltroPrimeroValor("TipoContenedor");
|
||||
string ClienteConsignatario = DTExportaciones.FiltroPrimeroValor("ClienteConsignatario");
|
||||
string DirConsignatario = DTExportaciones.FiltroPrimeroValor("DirConsignatario");
|
||||
string RFCCon = DTExportaciones.FiltroPrimeroValor("RFCCon");
|
||||
|
||||
decimal IncFletes = 0.00m;
|
||||
decimal IncSeguro = 0.00m;
|
||||
decimal IncEmbalajes = 0.00m;
|
||||
decimal IncEmbalaje = 0.00m;
|
||||
decimal IncConexos = 0.00m;
|
||||
decimal DecFlete = 0.00m;
|
||||
decimal DecSeguro = 0.00m;
|
||||
decimal DecCarga = 0.00m;
|
||||
decimal DecDescarga = 0.00m;
|
||||
decimal DecOtros = 0.00m;
|
||||
decimal TotalInc = 0.00m;
|
||||
decimal TotalDec = 0.00m;
|
||||
|
||||
string ContenedorPlaca = DTExportaciones.FiltroPrimeroValor("ContenedorPlaca");
|
||||
string Proveedor = DTExportaciones.FiltroPrimeroValor("Proveedor");
|
||||
string SCAC = DTExportaciones.FiltroPrimeroValor("SCAC");
|
||||
string CAAT = DTExportaciones.FiltroPrimeroValor("CAAT");
|
||||
string ClaveAduana = DTExportaciones.FiltroPrimeroValor("ClaveSATAduanaSeccionDescripcion");
|
||||
ClaveAduana = ClaveAduana != " - - " ? ClaveAduana : "";
|
||||
string ClaveSATIncoterm = DTExportaciones.FiltroPrimeroValor("ClaveSATIncoterm");
|
||||
string Patente = DTExportaciones.FiltroPrimeroValor("Patente");
|
||||
string AgenteExt = DTExportaciones.FiltroPrimeroValor("AgenteExt");
|
||||
string TaxId = DTExportaciones.FiltroPrimeroValor("TaxId");
|
||||
|
||||
List <ReportParameter> para = new List<ReportParameter>();
|
||||
para.Add(new ReportParameter("CveExportacion", CveExportacion.ToString()));
|
||||
para.Add(new ReportParameter("ClienteExportador", ClienteExportador));
|
||||
para.Add(new ReportParameter("DirExportador", DirExportador));
|
||||
para.Add(new ReportParameter("ClienteImportador", ClienteImortador));
|
||||
para.Add(new ReportParameter("RFCImp", RFCImp));
|
||||
para.Add(new ReportParameter("NumFactura", NumFactura));
|
||||
para.Add(new ReportParameter("ClaveSATPedimento", ClaveSATPedimento));
|
||||
para.Add(new ReportParameter("ITN", ITN));
|
||||
para.Add(new ReportParameter("Vinculacion", Vinculacion));
|
||||
para.Add(new ReportParameter("FechaFact", FechaFact));
|
||||
para.Add(new ReportParameter("NumSemana", NumSemana));
|
||||
para.Add(new ReportParameter("TipoCambio", TipoCambio));
|
||||
para.Add(new ReportParameter("MedioTransporte", MedioTransporte));
|
||||
para.Add(new ReportParameter("TipoContenedor", TipoContenedor));
|
||||
para.Add(new ReportParameter("ClienteConsignatario", ClienteConsignatario));
|
||||
para.Add(new ReportParameter("DirConsignatario", DirConsignatario));
|
||||
para.Add(new ReportParameter("RFCCon", RFCCon));
|
||||
|
||||
ClsExportaciones Gastos = new ClsExportaciones();
|
||||
if (Gastos.GetGastos(CveExportacion))
|
||||
{
|
||||
DataTable DTGastos = Gastos.DtResultados;
|
||||
if (DTGastos.Rows.Count > 0)
|
||||
{
|
||||
IncFletes = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncFletes"));
|
||||
IncSeguro = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncSeguro"));
|
||||
IncEmbalajes = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncEmbalajes"));
|
||||
IncEmbalaje = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncEmbalaje"));
|
||||
IncConexos = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("IncConexos"));
|
||||
DecFlete = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecFlete"));
|
||||
DecSeguro = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecSeguro"));
|
||||
DecCarga = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecCarga"));
|
||||
DecDescarga = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecDescarga"));
|
||||
DecOtros = ModExtensiones.ToDecimal(DTGastos.FiltroPrimeroValor("DecOtros"));
|
||||
TotalInc = IncFletes + IncSeguro + IncEmbalajes + IncEmbalaje + IncConexos;
|
||||
TotalDec = DecFlete + DecSeguro + DecCarga + DecDescarga + DecOtros;
|
||||
}
|
||||
}
|
||||
Gastos.Dispose();
|
||||
|
||||
para.Add(new ReportParameter("IncFletes", IncFletes.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("IncSeguro", IncSeguro.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("IncEmbalajes", IncEmbalajes.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("IncEmbalaje", IncEmbalaje.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("IncConexos", IncConexos.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("TotalInc", TotalInc.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("DecFlete", DecFlete.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("DecSeguro", DecSeguro.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("DecCarga", DecCarga.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("DecDescarga", DecDescarga.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("DecOtros", DecOtros.ToString("#,###.####")));
|
||||
para.Add(new ReportParameter("TotalDec", TotalDec.ToString("#,###.####")));
|
||||
|
||||
para.Add(new ReportParameter("ContenedorPlaca", ContenedorPlaca));
|
||||
para.Add(new ReportParameter("Proveedor", Proveedor));
|
||||
para.Add(new ReportParameter("SCAC", SCAC));
|
||||
para.Add(new ReportParameter("CAAT", CAAT));
|
||||
para.Add(new ReportParameter("ClaveAduana", ClaveAduana));
|
||||
para.Add(new ReportParameter("ClaveSATIncoterm", ClaveSATIncoterm));
|
||||
para.Add(new ReportParameter("Patente", Patente));
|
||||
para.Add(new ReportParameter("AgenteExt", AgenteExt));
|
||||
para.Add(new ReportParameter("TaxId", TaxId));
|
||||
|
||||
List <ReportDataSource> lrds = new List<ReportDataSource>();
|
||||
ReportDataSource RDSExportaciones = new ReportDataSource();
|
||||
RDSExportaciones.Name = "DsExportaciones";
|
||||
RDSExportaciones.Value = DTExportaciones;
|
||||
lrds.Add(RDSExportaciones);
|
||||
|
||||
DataTable DTPartidas = new DataTable();
|
||||
ClsExportaciones Partidas = new ClsExportaciones();
|
||||
if (Partidas.GetPartidas(UsuarioActual.CveEmpresa, CveExportacion))
|
||||
{
|
||||
DTPartidas = Partidas.DtResultados;
|
||||
if (DTPartidas.Rows.Count > 0)
|
||||
{
|
||||
DTPartidas.Columns.Add("ValorUnitarioUSD", typeof(decimal));
|
||||
DTPartidas.Columns.Add("ValorUnitarioMN", typeof(decimal));
|
||||
DTPartidas.Columns["ValorUnitarioUSD"].DefaultValue = 0.0m;
|
||||
DTPartidas.Columns["ValorUnitarioMN"].DefaultValue = 0.0m;
|
||||
DataRow RowPartida = DTPartidas.Rows[0];
|
||||
decimal cantidad = Convert.ToDecimal(RowPartida["Cantidad"]);
|
||||
if (cantidad > 0)
|
||||
{
|
||||
RowPartida["ValorUnitarioUSD"] = Convert.ToDecimal(RowPartida["Precio"]) / cantidad;
|
||||
RowPartida["ValorUnitarioMN"] = Convert.ToDecimal(RowPartida["ValorTotalMXP"]) / cantidad;
|
||||
}
|
||||
ReportDataSource RDSPartidas = new ReportDataSource();
|
||||
RDSPartidas.Name = "DsPartidas";
|
||||
RDSPartidas.Value = DTPartidas;
|
||||
lrds.Add(RDSPartidas);
|
||||
}
|
||||
}
|
||||
|
||||
string NombreArchivo = $"Exportacion_{CveExportacion}";
|
||||
string CveVenta = DTExportaciones.FiltroPrimeroValor("CveVenta"); ;
|
||||
if (CveVenta != "" && CveVenta != "-1")
|
||||
{
|
||||
NombreArchivo = NumFactura;
|
||||
}
|
||||
|
||||
string Formato = "FormatoExportacion.mrt";
|
||||
para.Add(new ReportParameter("Formato", "PDF"));
|
||||
string Ruta = ModExtensiones.DirectorioBaseEmpresas + $@"Empresas\{UsuarioActual.CveEmpresa}\Formatos\{Formato}";
|
||||
|
||||
var bytes = StreamBytesStimul("Facturas", Ruta, lrds, para, NombreArchivo: NombreArchivo, Formato: "PDF", NombreDataSource: "Datos");
|
||||
|
||||
string Extension = "pdf";
|
||||
ImprimirbytesPDF(bytes, NombreArchivo, Formato, Content_Disposition: "attachment", Extension: Extension);
|
||||
Ruta.GuardaLogAD();
|
||||
}
|
||||
else
|
||||
{
|
||||
Alert("No se encontró la exportación", ModExtensiones.TipoMensaje.MsgAdvertencia);
|
||||
}
|
||||
}
|
||||
Exportaciones.Dispose();
|
||||
}
|
||||
protected void LBImprimir_Click(object sender, EventArgs e)
|
||||
{
|
||||
|
||||
@@ -1,11 +1,13 @@
|
||||
using DocumentFormat.OpenXml.Wordprocessing;
|
||||
using Extensiones;
|
||||
using HigLabo.Core;
|
||||
using StackExchange.Redis;
|
||||
using System;
|
||||
using System.Activities;
|
||||
using System.Activities.Expressions;
|
||||
using System.Activities.Statements;
|
||||
using System.Collections.Generic;
|
||||
using System.EnterpriseServices.Internal;
|
||||
using System.Linq;
|
||||
using System.Web;
|
||||
using System.Web.UI;
|
||||
@@ -13,6 +15,7 @@ using System.Web.UI.WebControls;
|
||||
using static Microsoft.EntityFrameworkCore.DbLoggerCategory;
|
||||
using static Stimulsoft.Report.Export.DeflaterHuffman;
|
||||
|
||||
|
||||
public partial class Export_RepExportaciones : ClsPaginas
|
||||
{
|
||||
#region Propiedades
|
||||
@@ -21,18 +24,33 @@ public partial class Export_RepExportaciones : ClsPaginas
|
||||
get { return (ViewState["CveExportacion"] == null) ? -1 : Convert.ToInt32(ViewState["CveExportacion"]); }
|
||||
set { ViewState["CveExportacion"] = value; }
|
||||
}
|
||||
|
||||
private bool EsImportacion
|
||||
{
|
||||
get{ return (ViewState["EsImportacion"] == null) ? false : Boolean.Parse(ViewState["EsImportacion"].ToString()); }
|
||||
set { ViewState["EsImportacion"] = value; }
|
||||
}
|
||||
#endregion
|
||||
protected void Page_Load(object sender, EventArgs e)
|
||||
{
|
||||
if (!IsPostBack)
|
||||
{
|
||||
EsImportacion = false;
|
||||
|
||||
if (Request["Opcion"] != null)
|
||||
{
|
||||
if (Request["Opcion"] == "I")
|
||||
EsImportacion = true;
|
||||
}
|
||||
LtlPeriodoseleccionado.Text = EsImportacion ? "Importaciones" : "Exportaciones";
|
||||
CargaExportaciones();
|
||||
}
|
||||
}
|
||||
protected void CargaExportaciones()
|
||||
{
|
||||
ClsExportaciones Exportaciones = new ClsExportaciones();
|
||||
if (Exportaciones.GetExportacion(-1, UsuarioActual.CveEmpresa))
|
||||
int EsExportacion = EsImportacion ? 0 : 1; // 0 = importación, 1 = exportación
|
||||
if (Exportaciones.GetExportacion(-1, UsuarioActual.CveEmpresa, EsExportacion))
|
||||
{
|
||||
GVExportaciones.DataSource = Exportaciones.DtResultados;
|
||||
GVExportaciones.DataBind();
|
||||
|
||||
@@ -794,7 +794,7 @@ Partial Class General_SaldosIniciales
|
||||
|
||||
Dim DTCuentasContables As New DataTable
|
||||
|
||||
If UsuarioActual.Empresa.TipoContabilizacion = 1 Or UsuarioActual.CveEmpresa.Contiene(172, 174) Then
|
||||
If UsuarioActual.Empresa.TipoContabilizacion = 1 Or UsuarioActual.CveEmpresa.Contiene(172, 174, 184) Then
|
||||
|
||||
Dim ObjConta As New ClsContabilidad
|
||||
If ObjConta.GetCuentas(-1, "-1", -1, UsuarioActual.CveEmpresa) Then
|
||||
|
||||
@@ -2569,7 +2569,8 @@
|
||||
<div class="portlet-body ">
|
||||
<asp:UpdatePanel ID="UpCuentasBancos" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<asp:GridView ID="GvBancosCuentas" GridLines="None" BorderColor="#D3D3D3" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" data-sort="true" runat="server" DataKeyNames="CveCuentaDeposito,BancoNombre,Sucursal,Cuenta,CLABE,SWIFT,Plaza,CIE,Referencia,CveMoneda,Estatus,EstatusTexto" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros" ToolTip="Listado de Cuentas Bancarias">
|
||||
<asp:GridView ID="GvBancosCuentas" GridLines="None" BorderColor="#D3D3D3" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" data-sort="true" runat="server"
|
||||
DataKeyNames="CveCuentaDeposito,BancoNombre,Sucursal,Cuenta,CLABE,SWIFT,Plaza,CIE,Referencia,CveMoneda,Estatus,EstatusTexto,CveSATBanco" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros" ToolTip="Listado de Cuentas Bancarias">
|
||||
<Columns>
|
||||
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Banco" ItemStyle-CssClass="Excede">
|
||||
<ItemTemplate>
|
||||
@@ -6028,54 +6029,104 @@
|
||||
<h4 class="modal-title" id="H2" runat="server">Cuenta Bancaria</h4>
|
||||
</div>
|
||||
<div class="modal-body">
|
||||
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright" runat="server" id="DVDdlSatBanco" visible="true">
|
||||
|
||||
<asp:DropDownList CssClass="form-control select2me" Width="50%" ID="DdlSatBanco" runat="server" DataTextField="Banco" DataValueField="CveSATBanco">
|
||||
<asp:ListItem Value="-1">Seleccione uno</asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
<asp:RequiredFieldValidator ID="RFVDdlSatBanco" runat="server" InitialValue="-1" ControlToValidate="DdlSatBanco" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Banco''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgregarBanco"></asp:RequiredFieldValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VCRFVDdlSatBanco" runat="server" HighlightCssClass="vco" TargetControlID="RFVDdlSatBanco" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
<label for="<%= DdlSatBanco.ClientID.ToString()%>">Banco:</label>
|
||||
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtNombreBanco" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="100" ValidationGroup="GrpAgregarBanco"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RFVNombreBanco" runat="server" ControlToValidate="TxtNombreBanco" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Banco''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgregarBanco"></asp:RequiredFieldValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VCENombreBanco" runat="server" HighlightCssClass="vco" TargetControlID="RFVNombreBanco" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
<label for="<%= TxtNombreBanco.ClientID.ToString()%>">Nombre del Banco:</label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtNumeroSucursal" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10" ValidationGroup="GrpAgregarBanco"></asp:TextBox>
|
||||
<label for="<%= TxtNumeroSucursal.ClientID.ToString()%>">Numero de la Sucursal:</label>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtNumeroCuenta2" runat="server" CssClass="form-control" CausesValidation="true" ValidationGroup="GrpAgregarBanco"></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="SoloNumeros" runat="server" TargetControlID="TxtNumeroCuenta2" FilterType="Numbers" />
|
||||
<label for="<%= TxtNumeroCuenta2.ClientID.ToString()%>">Numero de Cuenta:</label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtCLABE" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="18" ValidationGroup="GrpAgregarBanco"></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="SoloNumeros2" runat="server" TargetControlID="TxtCLABE" FilterType="Numbers" />
|
||||
<label for="<%= TxtCLABE.ClientID.ToString()%>">CLABE:</label>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtSWIFT" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="100" ValidationGroup="GrpAgregarBanco"></asp:TextBox>
|
||||
<label for="<%= TxtSWIFT.ClientID.ToString()%>">SWIFT:</label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtPlaza" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="100" ValidationGroup="GrpAgregarBanco"></asp:TextBox>
|
||||
<label for="<%= TxtPlaza.ClientID.ToString()%>">Plaza:</label>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtConvenioCIE2" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="8" ValidationGroup="GrpAgregarBanco"></asp:TextBox>
|
||||
<label for="<%= TxtConvenioCIE2.ClientID.ToString()%>">CIE:</label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtReferencia2" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="20" ValidationGroup="GrpAgregarBanco"></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="SoloNumeros33" runat="server" TargetControlID="TxtReferencia2" FilterType="Numbers" />
|
||||
<label for="<%= TxtReferencia2.ClientID.ToString()%>">Referencia:</label>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList CssClass="form-control select2me" Width="50%" ID="DdlMoneda" runat="server" DataTextField="Moneda" DataValueField="CveMoneda"></asp:DropDownList>
|
||||
<asp:RequiredFieldValidator ID="RFVMoneda" runat="server" InitialValue="-1" ControlToValidate="DdlMoneda" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Moneda''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgregarBanco"></asp:RequiredFieldValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VCEMoneda" runat="server" HighlightCssClass="vco" TargetControlID="RFVMoneda" Width="300px"></ajax:ValidatorCalloutExtender>
|
||||
<label for="<%= DdlMoneda.ClientID.ToString()%>">Moneda:</label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright" id="divestatus" runat="server">
|
||||
<asp:CheckBox ID="ChkEstatus2" runat="server"></asp:CheckBox>
|
||||
<label for="<%= ChkEstatus2.ClientID.ToString()%>">Estatus:</label>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
|
||||
@@ -1268,8 +1268,6 @@ Partial Class Clientes
|
||||
CargaMetodosPago()
|
||||
CargaPrecioLista()
|
||||
CargaVendedores()
|
||||
|
||||
|
||||
'CargaCorporativo()
|
||||
|
||||
CargaMetodosPago33()
|
||||
@@ -1278,12 +1276,30 @@ Partial Class Clientes
|
||||
|
||||
CargaClasificaciones()
|
||||
|
||||
|
||||
DdlRegimenFiscal.DataSource = GlobalDTRegimenesFiscales
|
||||
DdlRegimenFiscal.DataBind()
|
||||
|
||||
CargaCombosComercioExterior()
|
||||
|
||||
CargaBancosSAT()
|
||||
CargaMonedas()
|
||||
End Sub
|
||||
|
||||
Private Sub CargaBancosSAT()
|
||||
|
||||
Dim ObjBancos As New ClsBancos
|
||||
|
||||
If ObjBancos.GetBancosSAT Then
|
||||
DdlSatBanco.DataSource = ObjBancos.DtResultados
|
||||
End If
|
||||
|
||||
ObjBancos.Dispose()
|
||||
|
||||
DdlSatBanco.DataBind()
|
||||
DdlSatBanco.Items.Insert(0, New ListItem("Seleccione uno", "-1"))
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
Private Sub CargaSubProyectos()
|
||||
CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, Nothing, AplicaTodos:="Seleccione")
|
||||
@@ -6792,12 +6808,14 @@ Partial Class Clientes
|
||||
ObjCuentasBancos.Dispose()
|
||||
CargaPSGridCuentasBancos()
|
||||
|
||||
CargaMonedas()
|
||||
|
||||
End Sub
|
||||
Protected Sub LbAgregarCuentaBanco_Click(sender As Object, e As EventArgs)
|
||||
Dim EsBancomer As Boolean = False
|
||||
|
||||
If TxtNombreBanco.Text.ToUpper.Contains("BBVA") Or TxtNombreBanco.Text.ToUpper.Contains("BANCOMER") Or (TxtCLABE.Text.Length = 18 AndAlso TxtCLABE.Text.Substring(0, 3) = "012") Then
|
||||
If TxtNombreBanco.Text.ToUpper.Contains("BBVA") Or TxtNombreBanco.Text.ToUpper.Contains("BANCOMER") Or
|
||||
DdlSatBanco.SelectedItem.Text.ToUpper.Contains("BBVA") Or
|
||||
DdlSatBanco.SelectedItem.Text.ToUpper.Contains("BANCOMER") Or (TxtCLABE.Text.Length = 18 AndAlso TxtCLABE.Text.Substring(0, 3) = "012") Then
|
||||
EsBancomer = True
|
||||
End If
|
||||
|
||||
@@ -6852,15 +6870,19 @@ Partial Class Clientes
|
||||
Dim Estatus As Boolean
|
||||
If ChkEstatus2.Checked = True Then Estatus = True Else Estatus = False
|
||||
|
||||
AgregarCuentaBanco(TxtNombreBanco.Text.Trim, TxtNumeroSucursal.Text.Trim, TxtCLABE.Text.Trim, TxtSWIFT.Text.Trim, TxtPlaza.Text.Trim, TxtNumeroCuenta2.Text.Trim, TxtConvenioCIE2.Text.Trim, TxtReferencia2.Text.Trim, "", DdlMoneda.SelectedValue.ToEntero(), DdlMoneda.SelectedItem.Text, Estatus)
|
||||
AgregarCuentaBanco(TxtNombreBanco.Text.Trim, TxtNumeroSucursal.Text.Trim, TxtCLABE.Text.Trim, TxtSWIFT.Text.Trim, TxtPlaza.Text.Trim, TxtNumeroCuenta2.Text.Trim, TxtConvenioCIE2.Text.Trim, TxtReferencia2.Text.Trim, "",
|
||||
DdlMoneda.SelectedValue.ToEntero(), DdlMoneda.SelectedItem.Text, Estatus, DdlSatBanco.SelectedValue.ToEntero)
|
||||
End Sub
|
||||
Private Sub AgregarCuentaBanco(NombreBanco As String, NumeroSucursal As String, CLABE As String, SWIFT As String, Plaza As String, NumeroCuenta As String, ConvenioCIE As String, Referencia As String, RefCrediProveedor As String, CveMoneda As Integer, Moneda As String, Estatus As Boolean)
|
||||
Private Sub AgregarCuentaBanco(NombreBanco As String, NumeroSucursal As String, CLABE As String, SWIFT As String, Plaza As String, NumeroCuenta As String, ConvenioCIE As String, Referencia As String, RefCrediProveedor As String,
|
||||
CveMoneda As Integer, Moneda As String, Estatus As Boolean, CveSATBanco As Integer)
|
||||
|
||||
Dim ObjCuentasBancos As New ClsGenerales
|
||||
|
||||
If Modalidad = "A" Then
|
||||
|
||||
If CveCliente > 0 Then
|
||||
|
||||
If ObjCuentasBancos.AddCuentasDepositos(NombreBanco, Plaza, NumeroSucursal, NumeroCuenta, CLABE, ConvenioCIE, SWIFT, Referencia, RefCrediProveedor, UsuarioActual.CveUsuario, CveMoneda, UsuarioActual.CveEmpresa, CveCliente:=CveCliente) Then
|
||||
If ObjCuentasBancos.AddCuentasDepositos(NombreBanco, Plaza, NumeroSucursal, NumeroCuenta, CLABE, ConvenioCIE, SWIFT, Referencia, RefCrediProveedor, UsuarioActual.CveUsuario, CveMoneda, UsuarioActual.CveEmpresa, CveCliente:=CveCliente, CveSATBanco:=CveSATBanco) Then
|
||||
DTCuentasBancos.Clear()
|
||||
Alert("Cuenta Bancaria agregada con éxito.", TipoMensaje.MsgInformacion)
|
||||
RegistraScript(String.Format("$('#{0}').modal('hide');", "DivAddCuentasBancarias"))
|
||||
@@ -6871,6 +6893,31 @@ Partial Class Clientes
|
||||
|
||||
Else
|
||||
Dim Row As DataRow
|
||||
|
||||
If TempDTCuentasBancos Is Nothing Then
|
||||
TempDTCuentasBancos = New DataTable
|
||||
TempDTCuentasBancos.Columns.Add("CveCuentaDeposito", GetType(Integer))
|
||||
TempDTCuentasBancos.Columns.Add("BancoNombre", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("Sucursal", GetType(String))
|
||||
|
||||
TempDTCuentasBancos.Columns.Add("CLABE", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("SWIFT", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("Plaza", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("Cuenta", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("CIE", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("Referencia", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("RefCrediProveedor", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("CveMoneda", GetType(Integer))
|
||||
TempDTCuentasBancos.Columns.Add("Moneda", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("EstatusPagoElectronico", GetType(Integer))
|
||||
TempDTCuentasBancos.Columns.Add("Estatus", GetType(String))
|
||||
TempDTCuentasBancos.Columns.Add("CveSATBanco", GetType(Integer))
|
||||
TempDTCuentasBancos.Columns.Add("EstatusTexto", GetType(String))
|
||||
|
||||
|
||||
|
||||
End If
|
||||
|
||||
Row = TempDTCuentasBancos.NewRow
|
||||
|
||||
Row("BancoNombre") = NombreBanco
|
||||
@@ -6886,6 +6933,7 @@ Partial Class Clientes
|
||||
Row("Moneda") = Moneda
|
||||
Row("EstatusPagoElectronico") = 0
|
||||
Row("Estatus") = "True"
|
||||
Row("CveSATBanco") = CveSATBanco
|
||||
TempDTCuentasBancos.Rows.Add(Row)
|
||||
Alert("Cuenta Bancaria agregada con éxito.", TipoMensaje.MsgInformacion)
|
||||
RegistraScript(String.Format("$('#{0}').modal('hide');", "DivAddCuentasBancarias"))
|
||||
@@ -6896,7 +6944,8 @@ Partial Class Clientes
|
||||
|
||||
If CveCliente > 0 Then
|
||||
|
||||
If ObjCuentasBancos.UpdateCuentasDepositos(GvBancosCuentas.DataKeys(CveCuentaBancaria)("CveCuentaDeposito").ToString().ToEntero(), NombreBanco, Plaza, NumeroSucursal, NumeroCuenta, CLABE, ConvenioCIE, SWIFT, Referencia, "", False, Estatus, CveMoneda, UsuarioActual.CveEmpresa) Then
|
||||
If ObjCuentasBancos.UpdateCuentasDepositos(GvBancosCuentas.DataKeys(CveCuentaBancaria)("CveCuentaDeposito").ToString().ToEntero(), NombreBanco, Plaza, NumeroSucursal, NumeroCuenta, CLABE, ConvenioCIE, SWIFT, Referencia, "", False, Estatus, CveMoneda, UsuarioActual.CveEmpresa,
|
||||
CveSATBanco:=CveSATBanco) Then
|
||||
DTCuentasBancos.Clear()
|
||||
CargaCuentasBancarias()
|
||||
Alert("Cuenta actualizada con éxito.", TipoMensaje.MsgInformacion)
|
||||
@@ -6920,6 +6969,7 @@ Partial Class Clientes
|
||||
Row("CveMoneda") = CveMoneda
|
||||
Row("Moneda") = Moneda
|
||||
Row("Estatus") = Estatus
|
||||
Row("CveSATBanco") = CveSATBanco
|
||||
TempDTCuentasBancos.AcceptChanges()
|
||||
Alert("Cuenta actualizada con éxito.", TipoMensaje.MsgInformacion)
|
||||
RegistraScript(String.Format("$('#{0}').modal('hide');", "DivAddCuentasBancarias"))
|
||||
@@ -6932,6 +6982,7 @@ Partial Class Clientes
|
||||
RecargaGlobalCuentasBancarias()
|
||||
End Sub
|
||||
Private Sub LimpiaCuentasBancarias()
|
||||
DdlSatBanco.SelectedValueExist(-1)
|
||||
TxtNombreBanco.Text = ""
|
||||
TxtNumeroSucursal.Text = ""
|
||||
TxtCLABE.Text = ""
|
||||
@@ -7015,6 +7066,7 @@ Partial Class Clientes
|
||||
|
||||
Private Sub LnkCuentasBancarias_Click(sender As Object, e As EventArgs) Handles LnkCuentasBancarias.Click
|
||||
Modalidad = "A"
|
||||
DdlSatBanco.SelectedValueExist(-1)
|
||||
TxtNombreBanco.Text = ""
|
||||
LbAgregarCuentaBanco.Text = "Agregar"
|
||||
TxtNumeroSucursal.Text = ""
|
||||
@@ -7033,6 +7085,9 @@ Partial Class Clientes
|
||||
|
||||
Public Sub Edit_Click2(sender As Object, e As EventArgs)
|
||||
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
|
||||
|
||||
|
||||
DdlSatBanco.SelectedValueExist(GvRow.DataKey("CveSATBanco"))
|
||||
TxtNombreBanco.Text = GvRow.DataKey("BancoNombre")
|
||||
Modalidad = "U"
|
||||
LbAgregarCuentaBanco.Text = "Actualizar"
|
||||
|
||||
Reference in New Issue
Block a user