--funcionalidad de bloqueo de registro del mes siguiente
This commit is contained in:
@@ -1353,7 +1353,7 @@ Partial Class Compras_Compras
|
|||||||
''End If
|
''End If
|
||||||
'Carga Compra
|
'Carga Compra
|
||||||
|
|
||||||
If UsuarioActual.Empresa.Funcionalidad(123).ToEntero > 0 And Not UsuarioActual.TienePermisoProceso(156) Then
|
If UsuarioActual.Empresa.Funcionalidad(123) <> "" And Not UsuarioActual.TienePermisoProceso(156) Then
|
||||||
If Not ValidaCierrePeriodo() Then
|
If Not ValidaCierrePeriodo() Then
|
||||||
Alert("El periodo de la compra actual ya se encuentra cerrado. No podra registrar la compra.", TipoMensaje.MsgAdvertencia)
|
Alert("El periodo de la compra actual ya se encuentra cerrado. No podra registrar la compra.", TipoMensaje.MsgAdvertencia)
|
||||||
BtnGuardar.Visible = False
|
BtnGuardar.Visible = False
|
||||||
@@ -14224,7 +14224,7 @@ Partial Class Compras_Compras
|
|||||||
Protected Sub BtnRefacturacionVer_Click(sender As Object, e As EventArgs) Handles BtnRefacturacionVer.Click
|
Protected Sub BtnRefacturacionVer_Click(sender As Object, e As EventArgs) Handles BtnRefacturacionVer.Click
|
||||||
Dim Opcion As Integer = 1
|
Dim Opcion As Integer = 1
|
||||||
|
|
||||||
If UsuarioActual.CveEmpresa.Contiene(119, 72) Then Opcion = 2
|
If UsuarioActual.CveEmpresa.Contiene(119, 72, 1) Then Opcion = 2
|
||||||
|
|
||||||
Dim ObjCompras As New ClsCompras
|
Dim ObjCompras As New ClsCompras
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user