Enable: Boolean;
The Enable property determines whether a breakpoint is available.
Available values:
True. The breakpoint is available by default and is taken into account on modeling problem calculation.
False. The breakpoint is not available and is not taken into account on modeling problem calculation.
Executing the example requires that the repository contains a modeling container with the MODEL_SPACE identifier. This container should include a modeling problem with the PROBLEM identifier that calculates a model with the MODEL identifier. The example uses the MCallback class described in IMsProblemCalculationCallback.OnBreak.
Add links to the Metabase and Ms system assemblies.
Sub UserProc;
Var
Mb: IMetabase;
ModelSpaceDescr: IMetabaseObjectDescriptor;
Problem: IMsProblem;
CalcSettings: IMsProblemCalculationSettings;
CallBack: MCallback;
Calculation: IMsProblemCalculation;
Breakpoints: IMsBreakpoints;
Breakpoint: IMsBreakpoint;
CalendarBreakpoint: IMsModelCalendarBreakpoint;
Model: IMsModel;
i: Integer;
Begin
Mb := MetabaseClass.Active;
ModelSpaceDescr := Mb.ItemById("MODEL_SPACE");
Problem := Mb.ItemByIdNamespace("PROBLEM",ModelSpaceDescr.Key).Edit As IMsProblem;
CalcSettings := Problem.CreateCalculationSettings;
CallBack := New MCallback.Create;
CalcSettings.Callback:= CallBack;
CalcSettings.FactIncluded:= True;
Calculation := Problem.Calculate(CalcSettings);
Breakpoints := Calculation.Breakpoints;
Breakpoints.Clear;
Breakpoint := Breakpoints.Add(MsBreakpointKind.ModelCalendar);
CalendarBreakpoint :=Breakpoint As IMsModelCalendarBreakpoint;
CalendarBreakpoint.Name:= "CalendarBreakpoint";
Model := Mb.ItemByIdNamespace("MODEL",ModelSpaceDescr.Key).Edit As IMsModel;
CalendarBreakpoint.Model:= Model;
CalendarBreakpoint.CalendarPoint:= DateTime.ComposeDay(2012, 01, 01);
Calculation.Run;
For i := 0 To Breakpoints.Count -1 Do
Breakpoint := Breakpoints.Item(i);
Breakpoint.Enable := False;
End For;
Calculation.Resume;
End Sub;
After executing the example the breakpoint that is triggered if the MODEL model is calculated for 01.01.2012 is set for the problem. The problem calculation is started. All breakpoints are deactivated.
See also: