-- GDiaz, ocultar el %de iva, cuando es fronteriza la sucursal

Ventas/Ventas.aspx.vb

@@ -19233,17 +19233,12 @@ Partial Class Ventas
             If CveVenta <= 0 AndAlso DdlTipoComprobante.SelectedValue = "Cot" Then
                 DdlIVA.Visible = True
             End If
+            'si es GDiaz, bloqueado el cambio de % de IVA
+            If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then DdlIVA.Visible = False
+
             If RecalcularIVA AndAlso TmpDT IsNot Nothing AndAlso TmpDT.Rows.Count > 0 AndAlso (Not CveVenta > 0 Or EsCreaApartirDe Or CveDevolucion > 0) Then RecalculaIVA()
-            'ViewState("SubProyectoPorcentajeIVA") = dr("IVA")
+
             ViewState("TipoFormato") = dr("TipoFormato")
-            'ViewState("Serie") = dr("Serie")
-
-            'If UsuarioActual.CveEmpresa = 140 AndAlso Me.CveVenta > 0 AndAlso Not EsCreaApartirDe AndAlso Not String.IsNullOrEmpty(SerieVenta) Then
-            '    LblSerie.Text = SerieVenta
-            'Else
-            '    LblSerie.Text = dr("Serie").ToString()
-            'End If
-
             If SerieXML <> "" Then LblSerie.Text = SerieXML
             Dim CveSubProyecto As Integer = GetSubProyectoSucursal()
             If CveSubProyecto > 0 Then CargaSubProyecto(CveSubProyecto)