diff --git a/Ventas/PV.aspx.vb b/Ventas/PV.aspx.vb index f01634812..b6305efd8 100644 --- a/Ventas/PV.aspx.vb +++ b/Ventas/PV.aspx.vb @@ -168,7 +168,7 @@ Partial Class PV Private ReadOnly Property CveVenta As Integer Get - Return ViewState("CveVenta").ToString.ToEntero + Return If(IsNothing(ViewState("CveVenta")), -1, ViewState("CveVenta").ToString.ToEntero) End Get End Property @@ -1008,6 +1008,7 @@ Partial Class PV Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load If Not IsPostBack Then + ViewState("CveVenta") = -1 'VERIFICAR SI LA SESION SE ENCUENTRA BLOQUEADA If UsuarioActual.Empresa.Funcionalidad(599) = "1" Then Dim DrUsuario As DataRow = GlobalDTUsuarios(CveUsuario:=UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa).Rows(0)