diff --git a/Bancos/CuentasBancariasDetalle.aspx b/Bancos/CuentasBancariasDetalle.aspx
index 15cccd443..652a0dec8 100644
--- a/Bancos/CuentasBancariasDetalle.aspx
+++ b/Bancos/CuentasBancariasDetalle.aspx
@@ -114,7 +114,7 @@
| Tipo Tercero: | -
-
-
- |
+ País: | -
-
-
- |
+
| Tipo Tercero: | +
+
+
+ |
- ||||
| Tipo Operación: | -
-
-
- |
+ País: | +
+
+
+ |
- Nacionalidad: | -
-
-
- |
-
| Núm ID Fiscal: | -
-
- | ||||
| Tipo Operación: | +
+
+
- |
-
| Filtrar por Sucursal: | -
- |
-
| Cantidad de Compras: | +
+ |
+
| Total Comprado: | +
+ |
+
| Compra Mínima: | +
+ |
+
| Promedio de Compras: | +
+ |
+
| Compra Máxima: | +
+ |
+
| Cantidad de Compras: | -
- |
-
| Total Comprado: | -
- |
-
| Compra Mínima: | -
- |
-
| Promedio de Compras: | -
- |
-
| Compra Máxima: | -
- |
-
|
@@ -1202,7 +1187,6 @@
-
@@ -1212,112 +1196,110 @@
CxP Activas
-
-
-
+
+
+
-
-
-
![]() ![]()
-
-
-
-
-
-
-
-
-
+
-
-
-
+
+
+
+
+
+
+
+
@@ -1352,8 +1334,7 @@
-
-
+
@@ -1504,7 +1473,6 @@
-
-
@@ -1525,7 +1492,8 @@
![]() ![]()
-
-
-
+
-
-
-
+
+
+
-
-
-
-
-
-
-
-
-
@@ -514,7 +514,7 @@
-
@@ -522,7 +522,7 @@
-
@@ -530,7 +530,7 @@
-
@@ -538,7 +538,7 @@
-
@@ -574,7 +574,7 @@
-
@@ -582,7 +582,7 @@
-
@@ -590,7 +590,7 @@
-
@@ -598,7 +598,7 @@
-
@@ -606,7 +606,7 @@
-
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 462a893b8..9ed9ef73f 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -2373,6 +2373,15 @@ Partial Class Ventas
ViewState("EsNCDevolucionEfectivo") = value
End Set
End Property
+
+ Private Property UsaProductoAlterno As Boolean
+ Get
+ Return CBool(IfNull(ViewState("UsaProductoAlterno"), False, ViewState("UsaProductoAlterno")))
+ End Get
+ Set(value As Boolean)
+ ViewState("UsaProductoAlterno") = value
+ End Set
+ End Property
#End Region
#Region " A C U M U L A D O R E S"
@@ -7155,6 +7164,7 @@ Partial Class Ventas
DdlMetodoPago33.Enabled = True
End If
+ Me.UsaProductoAlterno = ObjCliente.UsaProductoAlterno
Me.CveMetodoPago33Cliente = ObjCliente.CveMetodoPago
Me.CveFormaPago33Cliente = ObjCliente.CveFormaPago
@@ -21279,6 +21289,21 @@ Partial Class Ventas
DrPS = GlobalDTPS(UsuarioActual.CveEmpresa, CvePS:=CvePS).FiltroPrimero("") ' Estado = -1
+
+ Dim Codigo As String = ""
+
+ If UsaProductoAlterno Then
+ Codigo = DrPS("CodigoAlterno").ToString().Trim()
+ PS = DrPS("PSAlterno").ToString().Trim()
+ Else
+ Codigo = DrPS("Codigo").ToString().Trim()
+ PS = DrPS("PS").ToString().Trim()
+ End If
+
+ If UsaProductoAlterno AndAlso String.IsNullOrEmpty(Codigo) OrElse String.IsNullOrEmpty(PS) Then
+ Alert("El producto y/o servicio no tiene especificado el código alterno.", TipoMensaje.ToastAdventencia, timeout:=30)
+ End If
+
If DrPS Is Nothing Then
Alert("Ocurrió un error al cargar la información del Producto. Por favor vuelva a intentar.", TipoMensaje.MsgError)
Return False
@@ -21373,9 +21398,9 @@ Partial Class Ventas
TotalCalculableImpuestosIVA = TotalCalculableImpuestos * (1 + DrPS("IEPSPorcentaje").ToString().ToDecimal)
Row("PU") = PU
- Row("Codigo") = DrPS("Codigo")
+ Row("Codigo") = Codigo
Row("NumeroParte") = DrPS("NumeroParte")
- Row("NoIdentificacion") = DrPS("Codigo")
+ Row("NoIdentificacion") = Codigo
Row("ClaveSATFraccionArancelaria") = DrPS("ClaveSATFraccionArancelaria")
Row("ClaveSATUnidadAduana") = DrPS("ClaveSATUnidadAduana")
Row("ClaveSATFraccionArancelariaDescripcion") = DrPS("ClaveSATFraccionArancelariaDescripcion")
@@ -21396,8 +21421,8 @@ Partial Class Ventas
End If
- Row("PS") = DrPS("PS")
- Row("CodigoPS") = DrPS("PSCodigo").ToString()
+ Row("PS") = PS
+ Row("CodigoPS") = If(UsaProductoAlterno, String.Format("{0}-{1}", Codigo, PS), DrPS("PSCodigo")).ToString()
Row("CveTipoPS") = DrPS("CveTipoPS")
Row("CveTipoInvPS") = DrPS("Inv_CveMetodoInventario")
Row("AplicaSerie") = DrPS("AplicaSerie")
|