-- merge Procedimientos
This commit is contained in:
@@ -56,7 +56,7 @@ Partial Class Ventas_CatProcedimientos
|
||||
ProcesoOK = True
|
||||
End If
|
||||
Else
|
||||
If ObjVentas.AddProcedimiento(TxtProcedimiento.Text.Trim, ChkEstatus.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
|
||||
If ObjVentas.AddProcedimiento(TxtProcedimiento.Text.Trim, ChkEstatus.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) > 0 Then
|
||||
ProcesoOK = True
|
||||
End If
|
||||
End If
|
||||
|
||||
Reference in New Issue
Block a user