Pago Electronico Grupos

This commit is contained in:
Rakcsle Supertramp
2020-06-08 21:42:43 -07:00
parent 5a9bcf1f32
commit 7b0eab0433
6 changed files with 1014 additions and 963 deletions

View File

@@ -138,6 +138,8 @@ Public Class ClsBancos
Public Property LimiteCredito As Double
Public Property ConvenioPagoElectronico As String
Public Property UsaLayout As Boolean
Public Property UsaLayoutGrupos As Boolean
Public Property UsaTarjeta As Boolean
#End Region
@@ -424,6 +426,7 @@ Public Class ClsBancos
Me.LimiteCredito = Data.Rows(0)("LimiteCredito").ToString.ToDouble
Me.ConvenioPagoElectronico = Data.Rows(0)("ConvenioPagoElectronico").ToString
Me.UsaLayout = If(Data.Rows(0)("UsaLayout").ToString = "True", True, False)
Me.UsaLayoutGrupos = If(Data.Rows(0)("UsaLayoutGrupos").ToString = "True", True, False)
Me.UsaTarjeta = If(Data.Rows(0)("UsaTarjeta").ToString = "True", True, False)
End If
@@ -457,7 +460,9 @@ Public Class ClsBancos
Return Retorno + 1
End Function
Public Function AddBancosCuentas(CveBanco As Integer, CveTipoCuenta As Integer, NumCuenta As String, CLABE As String, CveMoneda As Integer, DiaCorte As Integer, FInicial As Integer, FActual As Integer, FFinal As Integer, LimiteCredito As Double, IdCtaContable As Integer, IdCtaContableComplementaria As Integer, FormatoCheque As String, CveUsuario As Integer, CveEmpresa As Integer, ConvenioPagoElectronico As String, UsaLayout As Boolean, UsaTarjeta As Boolean, Optional SaldoInicial As Double = 0) As Boolean
Public Function AddBancosCuentas(CveBanco As Integer, CveTipoCuenta As Integer, NumCuenta As String, CLABE As String, CveMoneda As Integer, DiaCorte As Integer, FInicial As Integer, FActual As Integer, FFinal As Integer,
LimiteCredito As Double, IdCtaContable As Integer, IdCtaContableComplementaria As Integer, FormatoCheque As String, CveUsuario As Integer, CveEmpresa As Integer, ConvenioPagoElectronico As String,
UsaLayout As Boolean, UsaTarjeta As Boolean, Optional SaldoInicial As Double = 0, Optional UsaLayoutGrupos As Boolean = False) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Banc_BancosCuentasAdd")
@@ -483,6 +488,10 @@ Public Class ClsBancos
.Add("@UsaLayout", SqlDbType.Bit).Value = UsaLayout
.Add("@UsaTarjeta", SqlDbType.Bit).Value = UsaTarjeta
.Add("@SaldoInicial", SqlDbType.Money).Value = SaldoInicial
.Add("@UsaLayoutGrupos", SqlDbType.Bit).Value = UsaLayoutGrupos
End With
Try
@@ -502,7 +511,9 @@ Public Class ClsBancos
Return Retorno
End Function
Public Function UpdateBancosCuentas(CveBanco As Integer, CveTipoCuenta As Integer, NumCuenta As String, CLABE As String, CveMoneda As Integer, DiaCorte As Integer, FInicial As Integer, FActual As Integer, FFinal As Integer, LimiteCredito As Double, IdCtaContable As Integer, IdCtaContableComplementaria As Integer, FormatoCheque As String, Estatus As Boolean, CveCuenta As Integer, ConvenioPagoElectronico As String, UsaLayout As Boolean, UsaTarjeta As Boolean) As Boolean
Public Function UpdateBancosCuentas(CveBanco As Integer, CveTipoCuenta As Integer, NumCuenta As String, CLABE As String, CveMoneda As Integer, DiaCorte As Integer, FInicial As Integer, FActual As Integer, FFinal As Integer,
LimiteCredito As Double, IdCtaContable As Integer, IdCtaContableComplementaria As Integer, FormatoCheque As String, Estatus As Boolean, CveCuenta As Integer, ConvenioPagoElectronico As String,
UsaLayout As Boolean, UsaTarjeta As Boolean, Optional UsaLayoutGrupos As Boolean = False) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Banc_BancosCuentasUpdate")
@@ -526,6 +537,9 @@ Public Class ClsBancos
.Add("@ConvenioPagoElectronico", SqlDbType.VarChar).Value = ConvenioPagoElectronico
.Add("@UsaLayout", SqlDbType.Bit).Value = UsaLayout
.Add("@UsaTarjeta", SqlDbType.Bit).Value = UsaTarjeta
.Add("@UsaLayoutGrupos", SqlDbType.Bit).Value = UsaLayoutGrupos
End With
Try
@@ -3065,7 +3079,7 @@ Public Class ClsBancos
Return Retorno
End Function
Public Function UpdateLayoutEnviosDetalle(CveLayoutEnvioDetalle As Integer, CveLayoutEnvio As Integer, CveIE As Integer, CveProveedor As Integer, Estatus As Integer, Observaciones As String) As Boolean
Public Function UpdateLayoutEnviosDetalle(CveLayoutEnvioDetalle As Integer, CveLayoutEnvio As Integer, CveIE As Integer, CveProveedor As Integer, Estatus As Integer, Observaciones As String, Optional Confirmado As Boolean = False) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Banc_LayoutEnviosDetalleUpdate")
@@ -3077,6 +3091,7 @@ Public Class ClsBancos
.Add("@Estatus", SqlDbType.SmallInt).Value = Estatus
.Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones
.Add("@CveLayoutEnvioDetalle", SqlDbType.Int).Value = CveLayoutEnvioDetalle
.Add("@Confirmado", SqlDbType.Bit).Value = Confirmado
End With
Try
@@ -3089,6 +3104,29 @@ Public Class ClsBancos
Return Retorno
End Function
Public Function UpdateBancos_IEFolio(CveIE As Integer, NuevoFolio As String, Comprobante As String) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Banc_LayoutIEFolioUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveIE", SqlDbType.Int).Value = CveIE
.Add("@NuevoFolio", SqlDbType.Char).Value = NuevoFolio
.Add("@Comprobante", SqlDbType.Char).Value = Comprobante
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar El movimiento Bancario", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
'ESTE SE PUEDE ELIMINAR YA NO SE USA
'Public Function UpdateProveedorPagoElectronico(CveProveedor As Integer, CveEmpresa As Integer) As Boolean
' Dim Retorno As Boolean = False

View File

@@ -88,6 +88,11 @@
<td>Layout:</td>
<td>
<asp:CheckBox ID="ChkLayout" runat="server" OnCheckedChanged="ChkLayout_CheckedChanged" AutoPostBack="true" /></td>
</tr>
<tr>
<td>Layout Grupos:</td>
<td>
<asp:CheckBox ID="ChkLayoutGrupos" runat="server" /></td>
</tr>
<tr id="TrConvenio" runat="server" visible="false">
<td>Convenio:</td>

View File

@@ -147,10 +147,12 @@ Partial Class Bancos_CuentasBancariasDetalle
TxtCLABE.Text = ObjCuentasBancariasDetalle.CLABE
DdlMoneda.SelectedValue = ObjCuentasBancariasDetalle.CveMoneda.ToString
ChkEstatus.Checked = If((ObjCuentasBancariasDetalle.Estatus) = "Activo", True, False)
ChkEstatus.Checked = If((ObjCuentasBancariasDetalle.Estatus) = "Activo", True, False)
LblFecha.Text = ObjCuentasBancariasDetalle.Fecha.ToShortDateString
LblUsuario.Text = ObjCuentasBancariasDetalle.Usuario
TxtConvenio.Text = ObjCuentasBancariasDetalle.ConvenioPagoElectronico.ToString
ChkLayout.Checked = ObjCuentasBancariasDetalle.UsaLayout
ChkLayoutGrupos.Checked = ObjCuentasBancariasDetalle.UsaLayoutGrupos
ChkUsaTarjeta.Checked = ObjCuentasBancariasDetalle.UsaTarjeta
ChkUsaTarjeta_CheckedChanged(Nothing, Nothing)
@@ -187,7 +189,7 @@ Partial Class Bancos_CuentasBancariasDetalle
If ObjCuentasBancariasDetalle.AddBancosCuentas(DdlBanco.SelectedValue.ToEntero, DdlTipoCuenta.SelectedValue.ToEntero, TxtNumCuenta.Text.Trim,
TxtCLABE.Text.Trim, DdlMoneda.SelectedValue.ToEntero, 0, TxtFInicial.Text.Trim.ToEntero, 0, 0, TxtLimiteCredito.Text.Trim.ToDouble, DDlCuentaContable.SelectedValue.ToEntero,
DdlCuentaContableComplementaria.SelectedValue.ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, If(ChkLayout.Checked, TxtConvenio.Text, ""), ChkLayout.Checked, ChkUsaTarjeta.Checked) Then
DdlCuentaContableComplementaria.SelectedValue.ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, If(ChkLayout.Checked, TxtConvenio.Text, ""), ChkLayout.Checked, ChkUsaTarjeta.Checked, UsaLayoutGrupos:=ChkLayoutGrupos.Checked) Then
ViewState("CveCuenta") = ObjCuentasBancariasDetalle.TCveCuenta
Else
ErrorUsuarios = True
@@ -217,7 +219,7 @@ Partial Class Bancos_CuentasBancariasDetalle
End If
Else
If ObjCuentasBancariasDetalle.UpdateBancosCuentas(DdlBanco.SelectedValue.ToEntero, DdlTipoCuenta.SelectedValue.ToEntero, TxtNumCuenta.Text.Trim, TxtCLABE.Text.Trim, DdlMoneda.SelectedValue.ToEntero, 0, TxtFInicial.Text.Trim.ToEntero, 0, 0, TxtLimiteCredito.Text.Trim.ToDouble, DDlCuentaContable.SelectedValue.ToEntero, DdlCuentaContableComplementaria.SelectedValue.ToEntero, "", ChkEstatus.Checked, CveCuenta, TxtConvenio.Text, ChkLayout.Checked, ChkUsaTarjeta.Checked) Then
If ObjCuentasBancariasDetalle.UpdateBancosCuentas(DdlBanco.SelectedValue.ToEntero, DdlTipoCuenta.SelectedValue.ToEntero, TxtNumCuenta.Text.Trim, TxtCLABE.Text.Trim, DdlMoneda.SelectedValue.ToEntero, 0, TxtFInicial.Text.Trim.ToEntero, 0, 0, TxtLimiteCredito.Text.Trim.ToDouble, DDlCuentaContable.SelectedValue.ToEntero, DdlCuentaContableComplementaria.SelectedValue.ToEntero, "", ChkEstatus.Checked, CveCuenta, TxtConvenio.Text, ChkLayout.Checked, ChkUsaTarjeta.Checked, UsaLayoutGrupos:=ChkLayoutGrupos.Checked) Then
'CargaDatos()
If ObjCuentasBancariasDetalle.GetBancosCuentasUsuarios(-1) Then
GlobalDTBancosCuentas(-1) = ObjCuentasBancariasDetalle.DtResultados

View File

@@ -15,6 +15,7 @@
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
<ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%">
<ajax:TabPanel ID="TabGenerales" runat="server" HeaderText="Generación">
<ContentTemplate>
@@ -262,35 +263,7 @@
</asp:GridView>
</div>
<div class="col-md-6">
<center>
<b>Layouts Enviados</b>
</center>
<asp:GridView ID="GvEnviadas" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros enviados" ToolTip="Tabla de pagos electronicos" OnRowDataBound="GvEnviadas_RowDataBound" CssClass="table table-striped table-hover Widthall ScrollAD" data-heigth="350px" data-freezerows="1" Style="text-align: center;" GridLines="None">
<Columns>
<asp:BoundField DataField="Fecha" HeaderText="Fecha Envio" DataFormatString="{0:d}" />
<asp:BoundField DataField="Tipo" HeaderText="Tipo" />
<asp:TemplateField HeaderText="Proveedor" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:HyperLink ID="HLProveedor" Text='<%# Eval("RazonSocial") %>' Target="_blank" runat="server" CssClass="Texto" />
</ItemTemplate>
</asp:TemplateField>
<%--<asp:BoundField DataField="RazonSocial" HeaderText="Proveedor" />--%>
<asp:TemplateField HeaderText="Detalle" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<%--<asp:Literal ID="LtDetalle" Text='<%# Eval("Observaciones") %>' runat="server" />--%>
<asp:HyperLink ID="HLDetalle" Text='<%# Eval("Observaciones") %>' Target="_blank" CssClass="Texto" runat="server" />
<asp:LinkButton Text="Regenerar" CommandArgument='<%# Eval("CveLayoutEnvio")%>' OnClick="LBRegenerar_Click" CssClass="Texto" ID="LBRegenerar" runat="server" Visible="false" />
</ItemTemplate>
</asp:TemplateField>
<%--<asp:BoundField DataField="Observaciones" HeaderText="Detalle" />--%>
<asp:BoundField DataField="Abonado" HeaderText="Importe" DataFormatString="{0:N2}&nbsp;&nbsp;" ItemStyle-HorizontalAlign="Right" />
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</div>
</div>
</ContentTemplate>
@@ -305,59 +278,10 @@
<ajax:TabPanel ID="TabReportes" runat="server" HeaderText="Reportes">
<ContentTemplate>
<%--<asp:UpdatePanel runat="server" ID="UpFiltrosReporte" UpdateMode="Conditional">
<ContentTemplate>
<div class="portlet solid grey-cascade portlet-filter" style="">
<div class="portlet-title portlet-filterT" style="">
<div class="titlefiltros caption ">
<ul class="list-inline">
<li>Cuenta:
<asp:DropDownList ID="DdlCuentaReportes" runat="server" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="200px"></asp:DropDownList>
</li>
<li>Estatus:
<asp:DropDownList ID="DdlEstatus" runat="server" Width="100px">
<asp:ListItem Text="Todos" Value="-1" />
<asp:ListItem Text="Enviado" Value="1" />
<asp:ListItem Text="Aceptado" Value="2" />
<asp:ListItem Text="Rechazado" Value="3" />
</asp:DropDownList>
</li>
<li>Fecha.I.:
<asp:TextBox ID="txtFechaI" runat="server" Width="70px"></asp:TextBox>
<asp:ImageButton runat="server" ID="imgCalendario" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="Calendario" TargetControlID="txtFechaI" PopupButtonID="ImgCalendario" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="rfvFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="cvFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="vcoFfvFI" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="vcoCvFI" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
<asp:ImageButton ID="ImgGuardar" runat="server" ClientIDMode="Static" ImageUrl="/Imagenes/accept.png" ToolTip="Aplicar Cambios" Style="display: none;" />
</li>
<li>Fecha.F.:
<asp:TextBox ID="txtFechaF" runat="server" Width="70px"></asp:TextBox>
<asp:ImageButton runat="server" ID="imgCalendarioF" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
<ajax:MaskedEditExtender ID="MEEFechaF" runat="server" TargetControlID="txtFechaF" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="Calendario2" TargetControlID="txtFechaF" PopupButtonID="imgCalendarioF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="rfvFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="cvFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="vcoRfvFF" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="vcoCvFF" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
</li>
</ul>
</div>
<div class="tools">
<asp:Button ID="BtnConsultarReportes" runat="server" Text="Consultar" OnClick="BtnConsultarReportes_Click" class="btn btn-primary" />
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>--%>
<asp:UpdatePanel runat="server" ID="UpFiltrosReporte" UpdateMode="Conditional">
<ContentTemplate>
<asp:Panel ID="Panel3" runat="server" DefaultButton="BtnConsultarReportes">
<div class="portlet solid grey-cascade portlet-filter">
@@ -424,56 +348,12 @@
</div>
</div>
<%-- <div class="portlet solid grey-cascade portlet-filter" style="">
<div class="portlet-title portlet-filterT" style="">
<div class="titlefiltros caption">
<div class="row">
<div class="col-md-1 truncate">Cuenta:</div>
<div class="col-md-2 ">
</div>
<div class="col-md-1 truncate">Estatus:</div>
<div class="col-md-1 ">
</div>
<div class="col-md-1 truncate">Fecha I:</div>
<div class="col-md-2 ">
</div>
<div class="col-md-1 truncate">Fecha F:</div>
<div class="col-md-1 ">
</div>
</div>
</div>
</div>
</div>--%>
</asp:Panel>
</ContentTemplate>
</asp:UpdatePanel>
<%-- <asp:UpdatePanel runat="server" ID="UpFiltrosReporte" UpdateMode="Conditional">
<ContentTemplate>
<table class="SubTotales3" width="100%">
<tr>
<td width="50px">Cuenta:</td>
<td width="220px"></td>
<td width="50px">Estatus:</td>
<td width="100px"></td>
<td width="50px">&nbsp;Fecha.I.:&nbsp;</td>
<td width="140px" valign="middle">
</td>
<td width="50px">&nbsp;Fecha.F.:&nbsp;</td>
<td width="140px" valign="middle">
</td>
<td></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>--%>
</asp:UpdatePanel>
<br />
<br />
@@ -578,6 +458,186 @@
</asp:UpdatePanel>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabEnviados" runat="server" HeaderText="Layout Enviados">
<ContentTemplate>
<asp:UpdatePanel runat="server" ID="UpFiltroEnviados" UpdateMode="Conditional">
<ContentTemplate>
<asp:Panel ID="Panel4" runat="server" DefaultButton="BtnConsultaEnviados">
<div class="portlet solid grey-cascade portlet-filter">
<div class="portlet-title portlet-filterT">
<div class="tools">
<asp:Button ID="BtnConsultaEnviados" CssClass="btn btn-primary" runat="server" Text="Consultar" OnClick="BtnConsultaEnviados_Click" />
<a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a>
<asp:CheckBox ID="CheckBox1" CssClass="hidden" runat="server" />
</div>
<div class="titlefiltros caption ">
<ul class="list-inline">
<li >Cuenta
<asp:DropDownList ID="DdlCuentaEnviados" runat="server" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="100px" CssClass="form-control input-sm select2me"></asp:DropDownList>
</li>
<li >Estatus
<asp:DropDownList ID="DdlEstatusEnviados" runat="server" Width="100px" CssClass="form-control input-sm select2me">
<asp:ListItem Text="Todos" Value="-1" />
<asp:ListItem Selected="True" Text="Enviado" Value="1" />
<asp:ListItem Text="Confirmado" Value="2" />
<asp:ListItem Text="Cancelado" Value="3" />
</asp:DropDownList>
</li>
<li >F.I.&nbsp;&nbsp;
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="float:right; width: 120px !important; padding: 0px;">
<asp:TextBox ID="txtFechaIEnviados" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 85px !important" MaxLength="10"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton ID="LnktxtFechaIEnviados" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</span>
<ajax:MaskedEditExtender ID="MEtxtFechaIEnviados" runat="server" TargetControlID="txtFechaIEnviados" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="txtFechaIEnviados" PopupButtonID="LnktxtFechaIEnviados" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVtxtFechaIEnviados" runat="server" ControlToValidate="txtFechaIEnviados" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpEnviados"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="COtxtFechaIEnviados" runat="server" ControlToValidate="txtFechaIEnviados" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpEnviados"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VCRFVtxtFechaIEnviados" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaIEnviados" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="VCCOtxtFechaIEnviados" runat="server" HighlightCssClass="vco" TargetControlID="COtxtFechaIEnviados" Width="350px"></ajax:ValidatorCalloutExtender>
<%--<asp:ImageButton ID="ImageButton1" runat="server" ClientIDMode="Static" ImageUrl="/Imagenes/accept.png" ToolTip="Aplicar Cambios" Style="display: none;" />--%>
</div>
</li>
<li>F.F &nbsp;&nbsp;
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="float:right; width: 120px !important; padding: 0px;">
<asp:TextBox ID="txtFechaFEnviados" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 85px !important" MaxLength="10"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton ID="LnktxtFechaFEnviados" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</span>
<ajax:MaskedEditExtender ID="MEtxtFechaFEnviados" runat="server" TargetControlID="txtFechaFEnviados" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CalendarExtender2" TargetControlID="txtFechaFEnviados" PopupButtonID="LnktxtFechaFEnviados" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVtxtFechaFEnviados" runat="server" ControlToValidate="txtFechaFEnviados" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpEnviados"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="COtxtFechaFEnviados" runat="server" ControlToValidate="txtFechaFEnviados" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpEnviados"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VCRFVtxtFechaFEnviados" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaFEnviados" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="VCCOtxtFechaFEnviados" runat="server" HighlightCssClass="vco" TargetControlID="COtxtFechaFEnviados" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
</li>
</ul>
</div>
<div class="portlet-body" style="display: none;">
</div>
</div>
</div>
</asp:Panel>
</ContentTemplate>
</asp:UpdatePanel>
<asp:UpdatePanel runat="server" ID="UpEnviados" UpdateMode="Conditional">
<ContentTemplate>
<div class="row">
<div class="col-md-12">
<div class="row">
<div class="col-md-6" style="text-align:right!important">
Prefijo Folio:
</div>
<div class="col-md-6" style="text-align:left!important">
<asp:TextBox ID="TxtFolio" MaxLength="25" runat="server" CssClass="CSSPrefijo form-control" Style="width:150px!important;height:28px!important" onkeyup="PrefijoFolioEnviados(this)" ></asp:TextBox>
</div>
</div>
<asp:GridView ID="GvEnviadas" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros enviados" ToolTip="Tabla de pagos electronicos"
DataKeyNames="CveLayoutEnvioDetalle,CveIE,CveLayoutEnvio,CveProveedor,Archivo,Estatus"
OnRowDataBound="GvEnviadas_RowDataBound" CssClass="table table-striped table-hover Widthall ScrollAD" data-heigth="350px" data-freezerows="1" Style="text-align: center;" GridLines="None">
<Columns>
<asp:BoundField DataField="Fecha" HeaderText="Fecha Envio" DataFormatString="{0:d}" />
<asp:BoundField DataField="Tipo" HeaderText="Tipo" />
<asp:TemplateField HeaderText="Proveedor" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:HyperLink ID="HLProveedor" Text='<%# Eval("RazonSocial") %>' Target="_blank" runat="server" CssClass="Texto" />
<asp:label runat="server" ID="LblArchivo" Visible="false" Text=""></asp:label>
<asp:TextBox runat="server" ID="TxtComprobante" Text="" style="display:none" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Detalle" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:HyperLink ID="HLDetalle" Text='<%# Eval("Observaciones") %>' Target="_blank" CssClass="Texto" runat="server" />
<asp:LinkButton Text="Regenerar" CommandArgument='<%# Eval("CveLayoutEnvio")%>' OnClick="LBRegenerar_Click" CssClass="Texto" ID="LBRegenerar" runat="server" Visible="false" />
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField DataField="Abonado" HeaderText="Importe" DataFormatString="{0:N2}&nbsp;&nbsp;" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField DataField="StrEstatusGrupos" HeaderText="Estatus" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Folio" DataField="Folio" ItemStyle-Width="100" ItemStyle-HorizontalAlign="Right" />
<asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px" HeaderText="Nuevo Folio">
<ItemTemplate>
<asp:TextBox ID="TxtFolio" MaxLength="25" runat="server" CssClass="CSSPrefijo form-control" CausesValidation="true" Style="width: 150px !important; height:25px!important" ></asp:TextBox>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="50px" HeaderText="Cargar">
<ItemTemplate>
<asp:LinkButton ID="ImgUpload" runat="server" AlternateText="Editar" CausesValidation="False" OnClick="ImgUpload_Click"
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-upload' title='Subir comprobante' ></i>" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="50px" HeaderText="Confirmar">
<ItemTemplate>
<asp:LinkButton ID="LnkGvConfirmar" runat="server" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-arrow-right'></i>"
data-toggle="confirmation" data-popout="true" data-original-title="¿Confirmar Pago?" data-btn-ok-label="si"
OnClick="LnkGvConfirmar_Click">
</asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="74px" HeaderText="Cancelar" HeaderStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:LinkButton ID="LnkGvCancelar" runat="server" CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-times'></i>"
data-toggle="confirmation" data-popout="true" data-original-title="¿Cancelar Pago?" data-btn-ok-label="si"
OnClick="LnkGvCancelar_Click">
</asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
@@ -651,13 +711,17 @@
<asp:BoundField HeaderText="Clabe" DataField="CLABEDestino" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Alias" DataField="BBVAAlias" ItemStyle-Width="100" ItemStyle-HorizontalAlign="Left" />
<asp:TemplateField HeaderText="Alta" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="40px">
<ItemTemplate>
<asp:CheckBox ID="ChkCuentasEstatus" runat="server" Checked='<%# Eval("EstatusPagoElectronicoGrupos") %>' />
</ItemTemplate>
</asp:TemplateField>
<%--________________________________________________________--%>
</Columns>
<RowStyle CssClass="Texto" />
@@ -682,6 +746,103 @@
</div>
</div>
<div id="ModalUploadComprobante" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<div class="modal-content">
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button>
<asp:UpdatePanel ID="UpModalTitleUploadComprobante" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<h4 class="modal-title">
<asp:Literal ID="LtlModalUploadTitulo" runat="server">Subir Comprobante</asp:Literal></h4>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="modal-body">
<asp:UpdatePanel runat="server" ID="UPModalUploadComprobante" UpdateMode="Conditional">
<ContentTemplate>
<div class="row">
<div class="col-md-12">
<asp:TextBox ID="TxtFileComprobante" ClientIDMode="Static" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server" data-maxFilesize="25" ></asp:TextBox>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="modal-footer">
<asp:UpdatePanel runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Button ID="btnUploadFileComprobante" runat="server" ClientIDMode="Static" Text="Guardar" CssClass="btn btn-primary" OnClick="btnUploadFileComprobante_Click" />
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</div>
</div>
<div id="ModalDescarga" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<div class="modal-content">
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button>
<asp:UpdatePanel ID="UpdatePanel1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<h4 class="modal-title">
<asp:Literal ID="LtlModalTituloDescarga" runat="server">Descarga Layout</asp:Literal></h4>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="modal-body">
<asp:UpdatePanel runat="server" ID="UpModalDescarga" UpdateMode="Conditional">
<ContentTemplate>
<div class="row">
<div class="col-md-12" runat="server" id="DVDescargaPagos" visible=" false" >
<p> Pagos Descarga <asp:LinkButton runat="server" ID="LnkDescarga" OnClick="LnkDescarga_Click" CssClass="Texto"></asp:LinkButton> </p>
</div>
<div class="col-md-12" runat="server" id="DVDescargaCuentas1" visible=" false" >
<p> Cuentas Bancomer <asp:LinkButton runat="server" ID="LnkDescargaCuentas1" OnClick="LnkDescargaCuentas1_Click" CssClass="Texto"></asp:LinkButton> </p>
</div>
<div class="col-md-12" runat="server" id="DVDescargaCuentas2" visible=" false">
<p> Cuentas Interbancarias <asp:LinkButton runat="server" ID="LnkDescargaCuentas2" OnClick="LnkDescargaCuentas2_Click" CssClass="Texto"></asp:LinkButton> </p>
</div>
</div>
</ContentTemplate>
<Triggers>
<asp:PostBackTrigger ControlID="LnkDescarga" />
<asp:PostBackTrigger ControlID="LnkDescargaCuentas1" />
<asp:PostBackTrigger ControlID="LnkDescargaCuentas2" />
</Triggers>
</asp:UpdatePanel>
</div>
<div class="modal-footer">
<asp:UpdatePanel runat="server" UpdateMode="Conditional">
<ContentTemplate>
<button type="button" class="btn btn-default" data-dismiss="modal">Cerrar</button>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</div>
</div>
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
@@ -693,5 +854,19 @@
function fncp() {
$get('BtnReportePago').click();
}
function PrefijoFolioEnviados(TxtPrefijo) {
$(`.CSSPrefijo`).each(function () {
$(this).val(TxtPrefijo.value)
});
}
</script>
</asp:Content>

File diff suppressed because it is too large Load Diff

View File

@@ -2162,9 +2162,9 @@ Partial Class Compras_Compras
DdlRetIVAConcepto.Items.Add(New ListItem("Arrendamiento", "4"))
If UsuarioActual.Empresa.Funcionalidad(577).ToEntero = 1 Then
DdlRetIVAConcepto.Items.Add(New ListItem("Ret IVA Servicios", "5"))
End If
'If UsuarioActual.Empresa.Funcionalidad(577).ToEntero = 1 Then
DdlRetIVAConcepto.Items.Add(New ListItem("Ret IVA Servicios", "5"))
'End If
End If
@@ -2313,23 +2313,23 @@ Partial Class Compras_Compras
'ASIGNA VALORES ORIGINALES PARA GUARDAR
AsignaValoresOriginales(SubtotalTemp, Subtotal2Temp, IVATemp, RetIVATemp, RetISRTemp, Total)
If UsuarioActual.Empresa.Funcionalidad(577).ToString = "1" Then
'If UsuarioActual.Empresa.Funcionalidad(577).ToString = "1" Then
If RetencionIVA = 0 And IVAOriginal > 0 Then
For Each dRow As DataRow In TmpDT.Rows
If dRow("CveTipoPS").ToString.ToEntero = 1 Then
' If RetencionIVA = 0 And IVAOriginal > 0 Then
' For Each dRow As DataRow In TmpDT.Rows
' If dRow("CveTipoPS").ToString.ToEntero = 1 Then
'comentado para reubicar el boton
'tdIVA6.Visible = True
' 'comentado para reubicar el boton
' 'tdIVA6.Visible = True
Exit For
End If
Next
End If
' Exit For
' End If
' Next
' End If
End If
'End If
End Sub
@@ -6043,7 +6043,12 @@ Partial Class Compras_Compras
End If
If UsuarioActual.Empresa.Funcionalidad(577).ToEntero = 1 Then
'Codigo anterior
'If UsuarioActual.Empresa.Funcionalidad(577).ToEntero = 1 Then
' IdCtaContable = UsuarioActual.Empresa.Funcionalidad(578).ToEntero
'End If
If DdlRetIVAConcepto.SelectedValue.ToEntero = 5 Then
IdCtaContable = UsuarioActual.Empresa.Funcionalidad(578).ToEntero
End If
@@ -8853,11 +8858,14 @@ Partial Class Compras_Compras
End If
If UsuarioActual.Empresa.Funcionalidad(577).ToEntero = 1 Then
'If UsuarioActual.Empresa.Funcionalidad(577).ToEntero = 1 Then
' IdCtaContable = UsuarioActual.Empresa.Funcionalidad(578).ToEntero
'End If
If DdlRetIVAConcepto.SelectedValue.ToEntero = 5 Then
IdCtaContable = UsuarioActual.Empresa.Funcionalidad(578).ToEntero
End If
End If
End If
@@ -15254,6 +15262,9 @@ Partial Class Compras_Compras
If Math.Abs(SubTotalGV - SubTotalCompra) < DiferenciaPermitida Then
LbSubTotalDif.Visible = False
Vinculacion()
ElseIf Math.Abs(SubTotalGV - SubTotalCompra) > DiferenciaPermitida And LblAmortizacion.Text.ToDecimal > 0 Then '2020-06-08 Oscar Permitir vincular cuando hay amortizacion de NC
LbSubTotalDif.Visible = False
Vinculacion()
ElseIf Math.Abs(SubTotalGV - (SubTotalCompra - LbAnticiposOC2.Text.ToDecimal)) < DiferenciaPermitida Then
LbSubTotalDif.Visible = False
Vinculacion()
@@ -17521,23 +17532,23 @@ Partial Class Compras_Compras
GuardaAC()
End If
If UsuarioActual.Empresa.Funcionalidad(577).ToString = "1" Then
'If UsuarioActual.Empresa.Funcionalidad(577).ToString = "1" Then
'If UsuarioActual.CveRol = 1 Then
' Alert($"Ok funcionalidad 577 RetencionIVA { RetencionIVA} IVAOriginal {IVAOriginal}")
'End If
' 'If UsuarioActual.CveRol = 1 Then
' ' Alert($"Ok funcionalidad 577 RetencionIVA { RetencionIVA} IVAOriginal {IVAOriginal}")
' 'End If
If RetencionIVA = 0 And IVAOriginal > 0 Then
For Each dRow As DataRow In TmpDT.Rows
If dRow("CveTipoPS").ToString.ToEntero = 1 Then
'Comnetado para reubicar el boton
'tdIVA6.Visible = True
Exit For
End If
Next
End If
' If RetencionIVA = 0 And IVAOriginal > 0 Then
' For Each dRow As DataRow In TmpDT.Rows
' If dRow("CveTipoPS").ToString.ToEntero = 1 Then
' 'Comnetado para reubicar el boton
' 'tdIVA6.Visible = True
' Exit For
' End If
' Next
' End If
End If
'End If