diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx
index 2ff6dbdb5..65c6a5138 100644
--- a/Ventas/Ventas.aspx
+++ b/Ventas/Ventas.aspx
@@ -1372,7 +1372,7 @@
(%)
|
-
+<%-- |
@@ -1380,7 +1380,8 @@
- |
+ --%>
+ |
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 0560c68a9..48155a9b4 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -4737,7 +4737,7 @@ Partial Class Ventas
End If
ViewState("CargoUsado") = ObjCliente.CargoUsados
- DdlTipoRetencion.SelectedValueExist(ObjCliente.DtResultados(0)("CveTipoRetencion").ToString)
+ 'DdlTipoRetencion.SelectedValueExist(ObjCliente.DtResultados(0)("CveTipoRetencion").ToString)
Dim dr As DataRow = Nothing
dr = GlobalDTSubProyectos(-1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimero("TipoSucursal = 1 And Estatus = 'Activo' AND CveEmpresa = " & UsuarioActual.CveEmpresa)
@@ -23986,19 +23986,19 @@ Partial Class Ventas
Return Retorno
End Function
- Protected Sub DdlTipoRetencion_SelectedIndexChanged(sender As Object, e As EventArgs)
- Dim PorcentajeRetencion As Decimal = 0
- Select Case DdlTipoRetencion.SelectedValue
- Case "1" 'Arrendamiento
- PorcentajeRetencion = 10
- Case "2" 'Servicios Profesionales
- PorcentajeRetencion = 10
- Case "3" 'Fletes
- PorcentajeRetencion = 4
- Case "4" 'Servicios
- PorcentajeRetencion = 6
- End Select
+ 'Protected Sub DdlTipoRetencion_SelectedIndexChanged(sender As Object, e As EventArgs)
+ ' Dim PorcentajeRetencion As Decimal = 0
+ ' Select Case DdlTipoRetencion.SelectedValue
+ ' Case "1" 'Arrendamiento
+ ' PorcentajeRetencion = 10
+ ' Case "2" 'Servicios Profesionales
+ ' PorcentajeRetencion = 10
+ ' Case "3" 'Fletes
+ ' PorcentajeRetencion = 4
+ ' Case "4" 'Servicios
+ ' PorcentajeRetencion = 6
+ ' End Select
- End Sub
+ 'End Sub
End Class
\ No newline at end of file