Устанавливает условия (критерии) для проведения конструкторского расчета и подбора диаметров трубопроводов.
Function ConstructSetCriterium(NewVal As Long) As Long
Где
NewVal - Возможные параметры:
0 - по скоростям
1 - по удельным потерям
2 - по минимальным напорам