Mod_(Input: Variant; Divisor: Variant): Variant;
Input. Variable.
Divisor. Divisor.
The Mod_ method returns remainder of integer division of variable point values by the specified number.
The result has the same sign as the dividend.
The Mod_ and IModelling.Modulus methods duplicate each other.
NOTE. If integer values are divided, the result will also be integer.
Executing the example requires that the repository contains a modeling container with the MS identifier. This container includes a model with the MODEL_D identifier that is calculated by the determinate equation method and contains more than one input variable.
Add links to the Metabase and Ms system assemblies.
Sub UserProc;
Var
Mb: IMetabase;
ModelSpace, ModelObj: IMetabaseObject;
Transf: IMsFormulaTransform;
Formula: IMsFormula;
Model: IMsModel;
Determ: IMsDeterministicTransform;
TransVar: IMsFormulaTransformVariable;
Slice: IMsFormulaTransformSlice;
TermInfo: IMsFormulaTermInfo;
Inp_1, Inp_2: String;
Expr: IExpression;
Begin
// Get repository
Mb := MetabaseClass.Active;
// Get modeling container
ModelSpace := Mb.ItemById("MS").Bind;
// Get model
ModelObj := Mb.ItemByIdNamespace("MODEL_D", ModelSpace.Key).Edit;
Model := ModelObj As IMsModel;
// Get model calculation parameters
Transf := Model.Transform;
Formula := Transf.FormulaItem(0);
Determ := Formula.Method As IMsDeterministicTransform;
// Get the first input variable
TransVar := Transf.Inputs.Item(0);
Slice := TransVar.Slices.Item(0);
TermInfo := Transf.CreateTermInfo;
TermInfo.Slice := Slice;
// Set mode of passing variable into calculation
TermInfo.Type := MsFormulaTermType.Pointwise;
// Remember model calculation settings for points of the first input variable
Inp_1 := TermInfo.TermInnerText;
// Get the second input variable
TransVar := Transf.Inputs.Item(1);
Slice := TransVar.Slices.Item(0);
TermInfo := Transf.CreateTermInfo;
TermInfo.Slice := Slice;
// Set mode of passing variable into calculation
TermInfo.Type := MsFormulaTermType.Pointwise;
// Remember model calculation settings for points of the second input variable
Inp_2 := TermInfo.TermInnerText;
// Get model calculation expression
Expr := Determ.Expression;
Expr.References := "Ms";
// Set model calculation expression
Expr.AsString := "Mod_(" + Inp_1 + ", " + Inp_2 + ")";
// Check if the expression is correct
If Expr.Valid
// If the expression is set correctly, save the model
Then ModelObj.Save;
// If expression is not correct, output message to console window
Else Debug.WriteLine("Model is not saved: error in the formula");
End If;
End Sub UserProc;
After executing the example the model returns remainder of the integer division of the first input variable points by the corresponding points of the second input variable.
Expression 1:
Mod_({Brazil|BCA},{China|BCA})
Result: the remainder of the integer division of the Brazil|BCA factor is calculated to the corresponding China|BCA factor observations.
Use: it can be used in formulas of cross functional expression editor in any platform tool where it is available.
Expression 2:
Mod_(X1,3)
Result: the remainder of the integer division of X1 factor points to three is calculated.
Use: it can be used in model formulas of modeling container.
Expression 3:
Mod_(15,4)
Result: 3.
Application: it can be used in any expressions.
See also: