diff --git a/Ventas/RepProductosServicios.aspx b/Ventas/RepProductosServicios.aspx
index 10c47da75..ba350812e 100644
--- a/Ventas/RepProductosServicios.aspx
+++ b/Ventas/RepProductosServicios.aspx
@@ -215,15 +215,7 @@
-
-
-
+
@@ -297,6 +289,14 @@
+
+
@@ -306,13 +306,7 @@
-
-
-
-
-
+
@@ -338,18 +332,25 @@
-
-
+
+
diff --git a/Ventas/RepProductosServicios.aspx.vb b/Ventas/RepProductosServicios.aspx.vb
index 53ba3b7b7..997ee6925 100644
--- a/Ventas/RepProductosServicios.aspx.vb
+++ b/Ventas/RepProductosServicios.aspx.vb
@@ -63,11 +63,12 @@ Partial Class Ventas_RepProductosServicios
SetValues()
If UsuarioActual.Empresa.Funcionalidad(531).ToEntero = 1 Then
- LblLitraje.Visible = True
DvLitraje.Visible = True
'garantia
divgarantia1.Visible = True
divgarantia2.Visible = True
+ divdistribuidor1.Visible = True
+ divdistribuidor2.Visible = True
End If
End If
diff --git a/Ventas/RepProductosServiciosDetalle.aspx b/Ventas/RepProductosServiciosDetalle.aspx
index 46ba8f989..aca9dc857 100644
--- a/Ventas/RepProductosServiciosDetalle.aspx
+++ b/Ventas/RepProductosServiciosDetalle.aspx
@@ -323,7 +323,10 @@
-
+
+ GarantÃa?:
+
+
-
-
+
+
-
-
+
diff --git a/Ventas/RepProductosServiciosDetalle.aspx.vb b/Ventas/RepProductosServiciosDetalle.aspx.vb
index 993345dec..c2238d933 100644
--- a/Ventas/RepProductosServiciosDetalle.aspx.vb
+++ b/Ventas/RepProductosServiciosDetalle.aspx.vb
@@ -384,6 +384,14 @@ Partial Class Ventas_RepProductosServiciosDetalle
txtFechaI.Text = If(Mes <> "-1", String.Format("01/{0}/0001", Mes), txtFechaI.Text)
+ If UsuarioActual.Empresa.Funcionalidad(531).ToEntero = 1 Then
+ DvLitraje.Visible = True
+ 'garantia
+ divgarantia1.Visible = True
+ divgarantia2.Visible = True
+ divdistribuidor1.Visible = True
+ divdistribuidor2.Visible = True
+ End If
If FechaEjec <> "-1" Then
TxtFechaIEjec.Text = FechaEjec
@@ -468,7 +476,7 @@ Partial Class Ventas_RepProductosServiciosDetalle
UsuarioActual.CveEmpresa, CveUsuarioConsulta:=UsuarioActual.CveUsuario, TipoDocto:=TipoComprobante, GPO:=DdlGrupo.SelectedValue.ToEntero, CveMoneda:=CveMoneda,
TipoCambio:=TipoCambio, TCEspecifico:=TCEspecifico, CveClienteClasificacion:=DdlClienteClasificacion.SelectedValue.ToEntero, CveProveedorCompra:=CveProveedorCompra,
CveMarca:=DdlMarcaPSDes.SelectedValue.ToEntero, CveClasificacionDetalle:=DdlTipoPSDes.SelectedValue.ToEntero(), TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero,
- ModalidadContable:=Not ChkLecturaAdmin.Checked, CveCondicionesPago:=DdlCondicionesPago.SelectedValue.ToEntero, EsDistribuidor:=DdlDistribuidor.SelectedValue.ToEntero) Then
+ ModalidadContable:=Not ChkLecturaAdmin.Checked, MostrarLitraje:=ChkLitraje.Checked, EsGarantia:=DdlGarantia.SelectedValue.ToEntero, CveCondicionesPago:=DdlCondicionesPago.SelectedValue.ToEntero, EsDistribuidor:=DdlDistribuidor.SelectedValue.ToEntero) Then
GvDatos.DataSource = ObjVentas.DtResultados
TmpDT = ObjVentas.DtResultados
Else