-- verificaion de cotización en E119
This commit is contained in:
@@ -2377,6 +2377,10 @@ Partial Class OC_OC
|
||||
Private Function ValidaGuardar() As Boolean
|
||||
Dim TieneError As Boolean = False
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(119) Then
|
||||
ChkCotizacion.Checked = False
|
||||
End If
|
||||
|
||||
If CboE.SelectedValue.ToEntero = 0 AndAlso TipoOC = "OC" Then
|
||||
Alert("Las ordenes de compra no puede tener el estatus 'Pre Solicitud'. Debe ser una requisición", TipoMensaje.MsgAdvertencia)
|
||||
Return True
|
||||
@@ -2608,10 +2612,6 @@ Partial Class OC_OC
|
||||
'VALIDACIONES PARA GUARDAR
|
||||
If ValidaGuardar() Then Exit Sub
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(119) Then
|
||||
ChkCotizacion.Checked = False
|
||||
End If
|
||||
|
||||
Dim MsgError As String = "Hubo un error al registrar"
|
||||
'VARIABLES
|
||||
Dim CveProveedorSucursal As Integer = -1
|
||||
|
||||
Reference in New Issue
Block a user