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

Correciones Promociones, Compras IEPS en producto

Browse Source
This commit is contained in:
rakcsle
2023-10-10 10:43:02 -07:00
parent 8cf0ce7cd7
commit 0b18ec7ba1
3 changed files with 53 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
Ventas/Promociones.aspx
View File

@@ -9,7 +9,7 @@
<asp:LinkButton ID="ImgAddFolio" runat="server" Visible="True" OnClick="BtnGenerarAPartir_Click"> Generar a partir de</asp:LinkButton>
</li>
<li>
<asp:LinkButton ID="LnkAgrgarPlantillaPS" runat="server" Visible="True" OnClick="LnkAgrgarPlantillaPS_Click"> Agregar Productos desde platilla</asp:LinkButton>
<asp:LinkButton ID="LnkAgrgarPlantillaPS" runat="server" Visible="True" OnClick="LnkAgrgarPlantillaPS_Click"> Agregar Productos desde plantilla</asp:LinkButton>
</li>
</ContentTemplate>
</asp:UpdatePanel>
@@ -451,24 +451,23 @@
<button type="button" class="close" data-dismiss="modal" style="top: 3px !important; margin-top: 6px !important;"></button>
<h4 class="modal-title" style="color: #FFF; text-align: center;">Agregar Producto/Servicio Plantilla</h4>
</div>
<div class="modal-body rowpadding">
<div class="modal-body rowpadding">
<div class="row">
<div class="col-md-12" style="text-align:right">
<asp:LinkButton runat="server" ID="LnkDecargaPlatilla" OnClick="LnkDecargaPlatilla_Click"><i class="fa fa-arrow-down" aria-hidden="true"></i> Descarga Plantilla</asp:LinkButton>
</div>
</div>
<div class="row">
<div class="col-md-11" style="margin-left: 30px; margin-right: 30px; margin-bottom: 50px;">
<div class="col-md-11" style="margin-left: 30px; margin-right: 30px;">
<asp:TextBox ID="TxtExcel" CssClass="ADSdropzone hidden" Text="" data-maxFile="1" runat="server"></asp:TextBox>
</div>
</div>
</div>
<div class="modal-footer">
<button type="button" data-dismiss="modal" class="btn btn-">Cerrar</button>
<asp:Button Text="Agregar" CssClass="btn btn-primary" ID="BrnAgregarPlantilla" OnClick="BrnAgregarPlantilla_Click" runat="server" />
<div class="row">
<div class="col-lg-12" style="text-align:center!important">
<asp:LinkButton runat="server" ID="LnkDecargaPlatilla" OnClick="LnkDecargaPlatilla_Click" CssClass="btn btn-warning"><i class="fa fa-arrow-down" aria-hidden="true"></i> Formato</asp:LinkButton>
<button type="button" data-dismiss="modal" class="btn btn-">Cerrar</button>
<asp:Button Text="Agregar" CssClass="btn btn-primary" ID="BrnAgregarPlantilla" OnClick="BrnAgregarPlantilla_Click" runat="server" />
</div>
</div>
</div>
</div>
</div>

25
Ventas/Promociones.aspx.vb
View File

@@ -1114,7 +1114,7 @@ Partial Class Ventas_Promociones
Dim CveClasificacion As Integer = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveClasificacion", $"Clasificacion = '{ClasificacionStr}'").ToString().ToEntero()
Dim CvePS As Integer = DTPS.FiltroPrimeroValor("CvePS", $"Codigo = '{CodigoStr}'").ToString().ToEntero()
Dim CodigoPS As String = DTPS.FiltroPrimeroValor("PSCodigo", $"Codigo = '{CodigoStr}'").ToString()
Dim CveTipoPromosicion As Integer = -1
Dim CveTipoPromocion As Integer = -1
Dim Promocion As Decimal = PromocionStr.ToDecimal
Dim CantidadMinima As Decimal = CantidadMinimaStr.ToDecimal
Dim CveRin As Integer = DTRines.FiltroPrimeroValor("CveRinTamaño", $"Codigo = '{RinStr}'").ToString().ToEntero()
@@ -1127,37 +1127,37 @@ Partial Class Ventas_Promociones
Else
If ClasificacionStr.Length > 0 Then
SBErrorRegistro.Append(If(CveClasificacion > 0, "", $"No se encontro Clasificación {ClasificacionStr}. "))
SBErrorRegistro.Append(If(CveClasificacion > 0, "", $"No se encontro Clasificación '{ClasificacionStr}'. "))
Else
SBErrorRegistro.Append(If(CvePS > 0, "", $"No se encontro codigo de Producto/Servicio {CodigoStr }. "))
SBErrorRegistro.Append(If(CvePS > 0, "", $"No se encontro código de Producto/Servicio '{CodigoStr }'. "))
End If
End If
If TipoPromocionStr.ToUpper = "IMPORTE $" Then
CveTipoPromosicion = 1
CveTipoPromocion = 1
ElseIf TipoPromocionStr.ToUpper = "DESCUENTO %" Then
CveTipoPromosicion = 2
CveTipoPromocion = 2
ElseIf TipoPromocionStr.ToUpper = "CANTIDAD" Then
CveTipoPromosicion = 3
CveTipoPromocion = 3
Else
SBErrorRegistro.Append($"Tipo Promosion no encontrada {TipoPromocionStr}. ")
SBErrorRegistro.Append($"Tipo Promoción no encontrada '{TipoPromocionStr}'. ")
End If
If Not Promocion > 0 Then
SBErrorRegistro.Append($"La Promoción debe de ser mayor a 0. ")
End If
If Not CantidadMinima > 0 Then
If CantidadMinimaStr.Length > 0 And Not CantidadMinima > 0 Then
SBErrorRegistro.Append($"La Cantidad Minima debe de ser mayor a 0. ")
End If
If RinStr.Length > 0 And Not CveRin > 0 Then
SBErrorRegistro.Append($"Tamaño de Rin no encontrado {RinStr}. ")
SBErrorRegistro.Append($"Tamaño de Rin no encontrado '{RinStr}'. ")
End If
If Not IncluyeImpuestosStr.ToUpper.Contiene("´SÍ", "SI", "1", "NO", "0") Then
SBErrorRegistro.Append($"Campo IncluyeImpuestos no valido {IncluyeImpuestos}.<br/> ")
SBErrorRegistro.Append($"Campo IncluyeImpuestos no válido '{IncluyeImpuestosStr}'.<br/> ")
End If
If SBErrorRegistro.ToString.Length > 0 Then
@@ -1165,7 +1165,7 @@ Partial Class Ventas_Promociones
Else
dRow("CveClasificacion") = CveClasificacion
dRow("CvePS") = CvePS
dRow("CveTipoPromosicion") = CveTipoPromosicion
dRow("CveTipoPromosicion") = CveTipoPromocion
dRow("Promocion") = Promocion
dRow("CantidadMinima") = CantidadMinima
dRow("RinTamaño") = RinTamaño
@@ -1174,9 +1174,8 @@ Partial Class Ventas_Promociones
dRow("CodigoPS") = If(CveClasificacion > 0, "Todos", CodigoPS)
End If
RegistroActual = RegistroActual + 1
End If
RegistroActual = RegistroActual + 1
Next