This commit is contained in:
2024-06-05 09:25:38 -07:00
15 changed files with 1606 additions and 1294 deletions

View File

@@ -1106,9 +1106,16 @@ Public Class ClsBancos
dttpagosimpuestos = DtResultados
End If
Dim FechaPago As Date = dr("FechaDocumento").ToString.ToDate
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
FechaPago = dr("FechaEmision").ToString.ToDate
End If
Timbre = Timbrado.PreparaTimbrePago40(RFCEmpresa, UsuarioActual.Empresa.Empresa, UsuarioActual.Empresa.CodigoRegimenFiscal,
RFCCliente, dr("NombreCliente").ToString, dr("ClienteCP").ToString, dr("CodigoRegimenFiscal").ToString, Serie, Folio.ToString, FechaTimbrado, Cuentapago,
dr("FechaDocumento").ToString.ToDate, dr("ClaveFormaPagoSAT").ToString, dr("AbreviaturaSAT").ToString, dr("VentasTotalPagado").ToString.ToDecimal,
FechaPago, dr("ClaveFormaPagoSAT").ToString, dr("AbreviaturaSAT").ToString, dr("VentasTotalPagado").ToString.ToDecimal,
UsuarioActual.Empresa.CP, CuentaBeneficiario, dr("TipoCambioPago").ToString.ToDecimal, dttpagos, dttpagosimpuestos, CFDIRelacionado:=CFDIRelacionado,
RfcACuentaTerceros:=dr("RfcACuentaTerceros").ToString, NombreACuentaTerceros:=dr("NombreACuentaTerceros").ToString, RegimenFiscalACuentaTerceros:=dr("RegimenFiscalACuentaTerceros").ToString, DomicilioFiscalACuentaTerceros:=dr("DomicilioFiscalACuentaTerceros").ToString)
@@ -1480,7 +1487,7 @@ Public Class ClsBancos
Optional CveCuentaDeposito As Integer = -1, Optional PagoElectronico As String = "-1", Optional CveEstatusIE As Integer = 1, Optional CveCuentaTarjeta As Integer = -1,
Optional Referencia As String = "-1", Optional CveCorte As Integer = -1, Optional CveProveedorIntermediario As Integer = -1, Optional FueConciliado As Boolean = False,
Optional MesesSinIntereses As Integer = -1, Optional Modulo As String = "", Optional ConceptoCIE As String = "", Optional CveOCAnticipo As Integer = -1, Optional ImporteDeduccionesPago As Decimal = -1,
Optional AnticipoPuntual As Boolean = False) As Integer
Optional AnticipoPuntual As Boolean = False, Optional FechaEmision As Date = MinFecha) As Integer
Dim Retorno As Integer = -1
DataAdapter("PA_Banc_IEAdd")
@@ -1522,6 +1529,7 @@ Public Class ClsBancos
.Add("@CveOCAnticipo", SqlDbType.Int).Value = CveOCAnticipo
.Add("@ImporteDeduccionesPago", SqlDbType.Money).Value = ImporteDeduccionesPago
.Add("@AnticipoPuntual", SqlDbType.Bit).Value = AnticipoPuntual
.Add("@FechaEmision", SqlDbType.Date).Value = FechaEmision
End With
Try

View File

@@ -488,7 +488,7 @@ Partial Class Bancos_DepositosCaja
Private Function ValidaCobranza() As Boolean
Dim Respuesta As Boolean = False
If UsuarioActual.CveEmpresa.Contiene(195) Then
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
Dim ObjMovtos As New ClsMovimientos()
Dim FechaI, FechaF As Date
@@ -504,7 +504,7 @@ Partial Class Bancos_DepositosCaja
Respuesta = True
Else
Respuesta = False
Alert("Se detectaron cobros pendientes.", TipoMensaje.MsgAdvertencia)
Alert("No se puede realizar el depósito, ya que hay cobros pendientes por aplicar.", TipoMensaje.MsgAdvertencia)
End If
Else

View File

@@ -535,10 +535,44 @@
<ContentTemplate>
<table>
<tr>
<td>
<asp:CheckBox Text=" Emitir complemento de pago" ID="ChkComplementoPago" Visible="true" CssClass="md-checksd" runat="server" />
<td style="width:66%">
<table>
<td>
<asp:CheckBox Text=" Emitir complemento de pago" ID="ChkComplementoPago" Visible="true" CssClass="md-checksd" runat="server" AutoPostBack="true" OnCheckedChanged="ChkComplementoPago_CheckedChanged" />
</td>
<td>
<div runat="server" id="DvFechaEmision" visible="false">
<table>
<td style="white-space: nowrap;">Fecha Emisión:</td>
<td>
<div class="input-group input-small date date-picker" data-date-format="dd/mm/yyyy">
<asp:TextBox ID="TxtFechaEmision" runat="server" CssClass="form-control"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton runat="server" ID="LnkImgTxtFechaEmision" class="btn default"><i class="fa fa-calendar"></i></asp:LinkButton>
</span>
</div>
<ajax:MaskedEditExtender ID="METxtFechaEmision" runat="server" TargetControlID="TxtFechaEmision" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left" ></ajax:MaskedEditExtender>
<ajax:CalendarExtender ID="CETxtFechaEmision" runat="server" TargetControlID="TxtFechaEmision" PopupButtonID="LnkImgTxtFechaEmision" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RfvTxtFechaEmision" runat="server" ControlToValidate="TxtFechaEmision" Display="None" ErrorMessage="El campo <b>''Fecha de Emisión''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVTxtFechaEmision" runat="server" ControlToValidate="TxtFechaEmision" Display="None" ErrorMessage="El campo <b>''Fecha de Emisión''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender4" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtFechaEmision" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender9" runat="server" HighlightCssClass="vco" TargetControlID="CVTxtFechaEmision" Width="350px"></ajax:ValidatorCalloutExtender>
</td>
</table>
</div>
</td>
</table>
</td>
<td>
<td style="width:34%">
<asp:Button ID="BtnGuardar" runat="server" Text="Guardar" ValidationGroup="GrpGuardar" CssClass="btn btn-primary" />
<asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" />
</td>

View File

@@ -1110,6 +1110,18 @@ Partial Class Bancos_PopIEVentas
#Region "G U A R D A R"
Private Sub BtnGuardar_Click(sender As Object, e As EventArgs) Handles BtnGuardar.Click
Dim FechaEmision As Date = MinFecha
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
FechaEmision = TxtFechaEmision.Text.ToDate
If FechaEmision <= MinFecha Then
Alert("Fecha de Emisión no valida", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
End If
If ChkComplementoPago.Checked Then
Dim objGral As New ClsGralFolios
Dim SalirDeMetodo As Boolean = False
@@ -1248,7 +1260,9 @@ Partial Class Bancos_PopIEVentas
Select Case RBLContado.SelectedValue
Case "1" ' Banco
CveIE = ObjIE.AddBancos_IE(DdlCuenta.SelectedValue.ToEntero, DdlTipoTransaccion.SelectedValue.ToEntero, Fecha, TxtFolio.Text.Trim, TxtPagueseA.Text.Trim, ImportePagado, CveMoneda, tipoCambioPago, TxtObservaciones.Text.Trim, "", True, True, -1, CvePrePoliza, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCuentaTarjeta:=If(DivTarjeta.Visible, DdlTarjeta.SelectedValue.ToEntero, -1), CveCuentaDeposito:=CveCuentaDeposito, Referencia:=If(TxtReferenciaCIE.Visible, TxtReferenciaCIE.Text, "-1"), CveCorte:=CveCorte)
CveIE = ObjIE.AddBancos_IE(DdlCuenta.SelectedValue.ToEntero, DdlTipoTransaccion.SelectedValue.ToEntero, Fecha, TxtFolio.Text.Trim, TxtPagueseA.Text.Trim, ImportePagado, CveMoneda, tipoCambioPago, TxtObservaciones.Text.Trim, "",
True, True, -1, CvePrePoliza, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCuentaTarjeta:=If(DivTarjeta.Visible, DdlTarjeta.SelectedValue.ToEntero, -1), CveCuentaDeposito:=CveCuentaDeposito,
Referencia:=If(TxtReferenciaCIE.Visible, TxtReferenciaCIE.Text, "-1"), CveCorte:=CveCorte, FechaEmision:=FechaEmision)
If CveIE > 0 Then
Pago.ImportePago = ImportePagado
@@ -1523,4 +1537,11 @@ Partial Class Bancos_PopIEVentas
End Sub
Protected Sub ChkComplementoPago_CheckedChanged(sender As Object, e As EventArgs)
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
DvFechaEmision.Visible = ChkComplementoPago.Checked
UpGuardar.Update()
End If
End Sub
End Class

View File

@@ -11735,7 +11735,42 @@ Partial Class Compras_Compras
End Sub
Protected Sub RBLPago_SelectedIndexChanged(sender As Object, e As EventArgs) Handles RBLPago.SelectedIndexChanged
CambiaTipoPago(True)
ValidaPagoSinXML()
End Sub
Private Sub ValidaPagoSinXML()
If CveFactura <= 0 And CveCompra <= 0 Then
If UsuarioActual.Empresa.Funcionalidad(123) <> "" And Not UsuarioActual.TienePermisoProceso(156) Then
If Not ValidaCierrePeriodo() Then
Alert("El periodo de la compra actual ya se encuentra cerrado. No podra registrar la compra.", TipoMensaje.MsgAdvertencia)
BtnGuardar.Visible = False
UpFacturar.Update()
Exit Sub
End If
End If
If UsuarioActual.TienePermisoProceso(365) Then
BtnGuardar.Visible = False
If RBLPago.SelectedValue.ToEntero = 3 Then
BtnGuardar.Visible = True
End If
Else
BtnGuardar.Visible = True
End If
End If
UpFacturar.Update()
End Sub
Private Sub CambiaTipoPago(MostrarModal As Boolean)
DdlPersonalReembolso.Visible = False
DdlCuentaCajaChicaReembolso.Visible = False

File diff suppressed because it is too large Load Diff

View File

@@ -2099,7 +2099,7 @@ Partial Class Inventarios_EntregaAlmacen
'LIMITAR EL NUMERO DE PARTIDAS QUE SE PUEDEN ENTREGAR
If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
'SI EL CLIENTE ES OPERADORA DE HOSPITALES ANGELES SOLO SE PUEDEN RECIBIR MAXIMO 5
If CveCliente = 819998 Then
If CveCliente = 819998 And Not EsDevolucionVenta = 1 Then
If NumRegistros > 5 Then
Alert("Solo se pueden recibir máximo 5 partidas.", TipoMensaje.MsgAdvertencia)
Exit Sub

View File

@@ -231,7 +231,7 @@
<asp:UpdatePanel runat="server" ID="UPPImportarSaldo" RenderMode="Inline" UpdateMode="Conditional">
<ContentTemplate>
<li>
<asp:LinkButton ID="HLImportarSaldos" data-toggle="tooltip" runat="server" Text="<i class='fa fa-arrow-circle-o-down'></i> Reclasificar Saldos"></asp:LinkButton>
<asp:LinkButton ID="HLImportarSaldos" data-toggle="tooltip" runat="server" Visible="false" Text="<i class='fa fa-arrow-circle-o-down'></i> Reclasificar Saldos"></asp:LinkButton>
</li>
</ContentTemplate>
</asp:UpdatePanel>

View File

@@ -742,6 +742,13 @@ Partial Class Clientes
DivRetIVA.Visible = False
End If
If UsuarioActual.TienePermisoProceso(381) Then
HLImportarSaldos.Visible = True
End If
divRegimen.Visible = True
If UsuarioActual.CveEmpresa.Contiene(1) Or UsuarioActual.Empresa.Funcionalidad(531) = "1" Then

View File

@@ -308,23 +308,75 @@
<asp:UpdatePanel ID="UpGuardar" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<table class="Widthall">
<%-- <br />
<div class="row">
<div class="col-lg-2" style="text-align:right!important;max-width:15%!important">
</div>
<div class="col-lg-2" style="max-width:15%!important">
</div>
<div class="col-lg-1">
</div>
<div class="col-lg-1" style="text-align:left!important">
</div>
<div class="col-lg-5" style="text-align: right">
</div>
</div>--%>
<table class="Widthall" style="height:50px!important">
<tr>
<td style="text-align: right; width: 20%">
<td style="text-align: right; width: 15%">
<asp:CheckBox Text=" Seguir Registrando Pagos" ID="ChkSeguirRegistrando" CssClass="md-checksd" runat="server" />
</td>
<td style="text-align: left; width: 19%">
<asp:CheckBox Text=" Emitir complemento de pago" ID="ChkComplementoPago" Visible="true" CssClass="md-checksd" runat="server" />
<br />
<asp:Label ID="LblValidaCeuntaTipoTransaccion" runat="server" Visible="false" ForeColor="Red"></asp:Label>
<td style="text-align: left; width: 15%">
<asp:CheckBox Text=" Emitir complemento de pago" ID="ChkComplementoPago" Visible="true" CssClass="md-checksd" runat="server" AutoPostBack="true" OnCheckedChanged="ChkComplementoPago_CheckedChanged" />
<br />
<asp:Label ID="LblValidaCeuntaTipoTransaccion" runat="server" Visible="false" ForeColor="Red"></asp:Label>
</td>
<td style="text-align: left;">
<td style="text-align: left; width: 15%">
<div runat="server" id="DvFechaEmision" visible="false">
<table>
<td style="white-space: nowrap;">Fecha Emisión:</td>
<td>
<div class="input-group input-small date date-picker" data-date-format="dd/mm/yyyy">
<asp:TextBox ID="TxtFechaEmision" runat="server" CssClass="form-control"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton runat="server" ID="LnkImgTxtFechaEmision" class="btn default"><i class="fa fa-calendar"></i></asp:LinkButton>
</span>
</div>
<ajax:MaskedEditExtender ID="METxtFechaEmision" runat="server" TargetControlID="TxtFechaEmision" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender ID="CETxtFechaEmision" runat="server" TargetControlID="TxtFechaEmision" PopupButtonID="LnkImgTxtFechaEmision" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RfvTxtFechaEmision" runat="server" ControlToValidate="TxtFechaEmision" Display="None" ErrorMessage="El campo <b>''Fecha de Emisión''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVTxtFechaEmision" runat="server" ControlToValidate="TxtFechaEmision" Display="None" ErrorMessage="El campo <b>''Fecha de Emisión''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<%--<asp:RangeValidator ID="RVTxtFechaEmision" runat="server" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b> <br/> La fecha del documento no puede ser superior a la fecha actual" ControlToValidate="TxtFechaDocumento" MinimumValue="01/01/1900" Type="Date" ValidationGroup="GrpGuardar"></asp:RangeValidator>--%>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender8" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtFechaEmision" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender9" runat="server" HighlightCssClass="vco" TargetControlID="CVTxtFechaEmision" Width="350px"></ajax:ValidatorCalloutExtender>
<%--<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender10" runat="server" HighlightCssClass="vco" TargetControlID="RVTxtFechaEmision" Width="350px"></ajax:ValidatorCalloutExtender>--%>
</td>
</table>
</div>
</td>
<td style="text-align: center;width: 10%">
<asp:Button ID="BtnIEGuardar" runat="server" Text="Guardar" ValidationGroup="GrpGuardar" class="btn btn-primary" />
</td>
<td style="text-align: right; width: 18%">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvCxC.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 125px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvCxC.ClientID) %>" style="margin-top: -3px; margin-right: 20px" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
<td style="text-align: right; width: 45%">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvCxC.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 125px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvCxC.ClientID) %>" style="margin-top: -3px; margin-right: 20px" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</td>
</tr>
</table>

View File

@@ -615,6 +615,19 @@ Partial Class Ventas_ClientesAbonar
Protected Sub BtnIEGuardar_Click(sender As Object, e As EventArgs) Handles BtnIEGuardar.Click
Dim FechaEmision As Date = MinFecha
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
FechaEmision = TxtFechaEmision.Text.ToDate
If FechaEmision <= MinFecha Then
Alert("Fecha de Emisión no valida", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
End If
If ChkComplementoPago.Checked Then
Dim objGral As New ClsGralFolios
Dim SalirDeMetodo As Boolean = False
@@ -800,7 +813,7 @@ Partial Class Ventas_ClientesAbonar
CveIE = ObjIE.AddBancos_IE(DdlCuenta.SelectedValue.ToEntero, DdlTipoTransaccion.SelectedValue.ToEntero, TxtFechaDocumento.Text.Trim.ToDate, TxtFolio.Text.Trim, TxtAboneA.Text.Trim, TxtImporte.Text.ToDecimal,
GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveMoneda", "CveCuenta = " & DdlCuenta.SelectedValue).ToEntero, TipoCambio,
TxtObservaciones.Text.Trim, "", True, True, -1, CvePrePoliza, Comprobante, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCuentaDeposito:=CveCuentaDeposito,
CveProveedorIntermediario:=CveProvIntermediario, ImporteDeduccionesPago:=TxtImporteDeduccionesPago.Text.ToDecimal)
CveProveedorIntermediario:=CveProvIntermediario, ImporteDeduccionesPago:=TxtImporteDeduccionesPago.Text.ToDecimal, FechaEmision:=FechaEmision)
Else
If RblTipoPago.SelectedValue.Contiene("3") Then 'ixc
CveIE = DdlIngreso.SelectedValue.ToEntero
@@ -2844,4 +2857,14 @@ Partial Class Ventas_ClientesAbonar
End If
End Sub
Protected Sub ChkComplementoPago_CheckedChanged(sender As Object, e As EventArgs)
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
DvFechaEmision.Visible = ChkComplementoPago.Checked
UpGuardar.Update()
End If
End Sub
End Class

View File

@@ -8,6 +8,12 @@
background-color: #95A5A6;
color: white;
}
.check{
margin-top:10px!important;
}
.box{
margin-top:10px!important;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
@@ -29,7 +35,7 @@
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UpFiltros" runat="server" UpdateMode="Conditional">
<asp:UpdatePanel ID="UpFiltros" runat="server" UpdateMode="Always">
<ContentTemplate>
<div id="PFiltro" class="portlet solid grey-cascade portlet-filter">
<div class="portlet-title portlet-filterT smalltitle">
@@ -125,6 +131,15 @@
</asp:DropDownList>
</div>
</div>
<div class="col-md-1" >
<asp:CheckBox runat="server" ID="ChkAnticipos" Text="Anticipos" Checked="true" />
</div>
<div class="col-md-1" >
<asp:CheckBox runat="server" ID="ChkNCxAplicar" Text="NC x Aplicar" Checked="true" />
</div>
<div class="col-md-2" >
<asp:CheckBox runat="server" ID="ChkIngresosxComprobar" Text="Ingreos x Comprobar" Checked="true" />
</div>
</div>
</div>

View File

@@ -146,7 +146,14 @@ public partial class Ventas_RepAnticipo_NC_IXC : ClsPaginas
para.Add(new ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa));
para.Add(new ReportParameter("UsuarioImprimio", UsuarioActual.Nombre));
para.Add(new ReportParameter("FechaImpresion", NowADS().ToString()));
para.Add(new ReportParameter("AgrupadoPor", $"<b>Agrupado Por:</b> {Cliente}{Sucursal}{FechaI}{FechaF}{FechaICorte}{FechaFCorte}"));
para.Add(new ReportParameter("AgrupadoPor", $"<b>Agrupado Por:</b> {Cliente}{Sucursal}{FechaI}{FechaF}{FechaICorte}{FechaFCorte}"));
para.Add(new ReportParameter("MostarAnticipos", ChkAnticipos.Checked ?"1":"0" ));
para.Add(new ReportParameter("MostarNCxAplicar", ChkNCxAplicar.Checked ? "1" : "0"));
para.Add(new ReportParameter("MostarIngresosxComprobar", ChkIngresosxComprobar.Checked ? "1" : "0"));
if (Imagen.Exists)
{
para.Add(new ReportParameter("LogoPath", logouri));

View File

@@ -233,6 +233,9 @@
<Columns>
<asp:HyperLinkField ItemStyle-HorizontalAlign="Left" Target="_blank" HeaderText="Grupo" DataTextField="GPO" DataNavigateUrlFields="FechaI,FechaF,CveSubProyecto,CveCliente,CveVendedor,Grupo,GPO,CvePS,CveClasificacion,CveMarca,CveCategoria" DataNavigateUrlFormatString="RepVentasUtilidad.aspx?FechaI={0}&FechaF={1}&CveSubProyecto={2}&CveCliente={3}&CveVendedor={4}&Gpo={5}&CveGpo={6}&CvePS={7}&CveClasificacion={8}&CveMarca={9}&CveCategoria={10}" />
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Ventas" DataField="Ventas" DataFormatString="{0:N2}" />
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Crédito" DataField="Credito" DataFormatString="{0:N2}" />
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Contado" DataField="Contado" DataFormatString="{0:N2}" />
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="%" DataField="ProcentajeVentas" DataFormatString="{0:N2}" ItemStyle-Width="30px" />
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Descuento" DataField="Descuento" DataFormatString="{0:N2}" />
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Bonificación" DataField="Bonificacion" DataFormatString="{0:N2}" />

View File

@@ -252,7 +252,7 @@ Partial Class Ventas_RepVentasUtilidadPadre
e.Row.DBCampo("Grupo"), e.Row.DBCampo("GPO"), e.Row.DBCampo("CvePS"), e.Row.DBCampo("CveClasificacion"), e.Row.DBCampo("CveMarca"), e.Row.DBCampo("CveCategoria"))
e.Row.Cells(0).Text = String.Format("<a class=""{0}"" href=""{1}"">{2}</a>", Css, Liga, e.Row.Cells(0).Text)
Else
e.Row.Cells(10).BackColor = Drawing.Color.LightGray
e.Row.Cells(12).BackColor = Drawing.Color.LightGray
End If