Теплоизоляция

В части 5 моделирования заглушки мы создали 2 объекта теплоизоляции.

На основе 2 этих объектов мы создадим нашу теплоизоляцию.

Работаем в библиотеке стандартных элементов. Первым делом мы заменим категорию у объекта "Список работ" на "Перечень работ". А у всех подобъектов категорию поменяем на "Объем работ".

Затем скопируем этот объект и в одном удалим Титанфлекс, а у другого Isotec, чтобы получилось 2 раздельных объекта.

На основе этого мы заполним нашу базу нужными материалами теплоизоляции, меняя нужные параметры и особое внимание обращаем на номер слоя.

Для объектов из "Перечня работ" добавим параметр "Производитель" и добавим формулу:

child(1).[PART_MANUFACTURER]

Для объектов с категорией "Объем работ" заполняем стандартные параметры из статьи "Список необходимых параметров для создания объекта", исключая параметры, которые не требуются для теплоизоляции.

Пока я в своей работе остановился на 2 слоях. Если понадобиться больше то все легко корректируется на основе уже созданных объектов.

Смысл был максимально выполнить все расчеты не используя отдельные программы по расчету изоляции.

В формулах площадей теплоизоляции сделал вот такую формулу для первого слоя:

var А:=(root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/1000; /*Ширина+толщина изоляции с двух сторон*/
var Б:=(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/1000; /*Высота+толщина изоляции с двух сторон*/
var В:=(if((root.[PART_PIPE_RECT_DIMA]+root.[PART_PIPE_RECT_DIMB])>1000 and /*Длина заглушки +7.55 мм длина нахлеста на фланец.*/
((root.[PART_PIPE_RECT_DIMA]>700) or (root.[PART_PIPE_RECT_DIMB]>700)), 40, 30)+7.55)/1000;
var Г:=root.[PART_VENT_LENGTH]/1000; /*Длина воздуховода*/
var Д:=3.14*((root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS])/1000)^2 /*Площадь сектора круга по большому радиусу*/
*(root.[PART_PIPE_ELBOWANGLE]/360);
var Е:=3.14*((root.[PART_VENT_RADIUS]-[PART_INSULATION_THICKNESS])/1000)^2*root.[PART_PIPE_ELBOWANGLE]/360; /*Площадь сектора круга по малому радиусу*/
var Ж:=3.14*(root.[PART_VENT_RADIUS]-[PART_INSULATION_THICKNESS])/1000*root.[PART_PIPE_ELBOWANGLE]/180; /*Длина дуги по малому радиусу*/
var З:=(3.14*(root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS])/1000) /*Длина дуги по большему радиусу*/
*root.[PART_PIPE_ELBOWANGLE]/180;
var И:=pi*sqr((root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS])/1000)*root.[PART_VENT_ANGLE]/360; /*Площадь сектора круга*/
var К:=pi*(root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS])/1000*root.[PART_VENT_ANGLE]/180; /*Длина дуги окружности*/
var Л:=К*(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS])/1000; /*Площадь наружной поверхности отвода*/
var М:=((root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS])/1000+
(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS])/1000)*2*(root.[PART_VENT_LENGTH]+10.4)/1000; /*Площадь прямого участков отвода*/
var Н:=(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина высоты верхнего основания*/
var О:=(root.[PART_VENT_LENGTH]-root.[PART_VENT_SECTION_DIMC]*2)/1000; /*Высота усеченной пирамиды*/
var П:=(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина высоты нижнего основания*/
var Р:=sqrt(sqr(О)+sqr(abs(Н-П))); /*Высота боковой трапеции по ширине пирамиды*/
var С:=((root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/1000+(root.[PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/1000)/2*Р; /*Площадь боковой поверхности(Равнобедренной трапеции) по стороне DIMA*/
var Т:=(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины верхнего основания*/
var У:=(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины нижнего основания*/
var Ф:=sqrt(sqr(О)+sqr(abs(Т-У))); /*Высота боковой трапеции по высоте пирамиды*/
var Х:=((root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/1000+(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/1000)/2*Ф; /*Площадь боковой поверхности(Равнобедренной трапеции) по стороне DIMB*/
var Ц:=((root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/1000+(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/1000)*2*root.[PART_VENT_SECTION_DIMC]/1000; /*Площадь прямого участков отвода с первой стороны*/
var Ч:=((root.[PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/1000+(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/1000)*2*root.[PART_VENT_SECTION_DIMC]/1000; /*Площадь прямого участков отвода со второй стороны*/
/*Формулы для типа 1 и 3*/
var А1:=([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина высоты верхнего основания*/
var Б1:=([PART_VENT_LENGTH]-[PART_VENT_SECTION_DIMC]*2)/1000; /*Высота усеченной пирамиды*/
var В1:=([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина высоты нижнего основания*/
var Г1:=(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/1000+([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/1000)/2*Б1; /*Площадь боковой поверхности(Под прямым углом) по стороне DIMA(Берется в расчет)*/
var Д1:=sqrt(sqr(Б1)+sqr(abs(([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/1000-([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/1000))); /*Высота боковой трапеции по ширине пирамиды*/
var Е1:=(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/1000+([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/1000)/2*Д1; /*Площадь боковой поверхности(Напротив прямой трапеции) по стороне DIMA(Берется в расчет)*/
var Ж1:=([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины верхнего основания*/
var З1:=([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины нижнего основания*/
var И1:=sqrt(sqr(Б1)+sqr(abs(Ж1-З1))); /*Высота боковой трапеции по высоте пирамиды*/
var К1:=(([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/1000+([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/1000)/2*И1; /*Площадь боковой поверхности(Равнобедренной трапеции) по стороне DIMB(Берется в расчет)*/
var Л1:=(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/1000+([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/1000)*2*[PART_VENT_SECTION_DIMC]/1000; /*Площадь прямого участков отвода с первой стороны*/
var М1:=(([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/1000+([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/1000)*2*[PART_VENT_SECTION_DIMC]/1000; /*Площадь прямого участков отвода со второй стороны*/
/*Формулы для типа 2 и 4*/
var О1:=(([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/1000+([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/1000)/2*Б1; /*Площадь боковой поверхности(Под прямым углом) по стороне DIMB(Берется в расчет)*/
var П1:=sqrt(sqr(Б1)+sqr(abs(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/1000-([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/1000))); /*Высота боковой трапеции по ширине пирамиды*/
var Р1:=(([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/1000+([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/1000)/2*П1; /*Площадь боковой поверхности(Напротив прямой трапеции) по стороне DIMB(Берется в расчет)*/
var С1:=([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины верхнего основания*/
var Т1:=([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины нижнего основания*/
var У1:=sqrt(sqr(Б1)+sqr(abs(Ж1-З1))); /*Высота боковой трапеции по высоте пирамиды*/
var Ф1:=(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/1000+([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/1000)/2*У1; /*Площадь боковой поверхности по стороне DIMA(Берется в расчет)*/
/*Формулы для типа 5, 6, 7, 8*/
/*Прямоугольная трапеция по стороне DIMB берется по букве О*/
/*Прямоугольная трапеция по стороне DIMA берется по букве Г*/
/*Высота трапеции по стороне DIMA берется по букве Д*/
/*Трапеция напротив прямоугольной трапеции по стороне DIMA берется по букве Е*/
/*Высота трапеции по стороне DIMB берется по букве П*/
/*Трапеция напротив прямоугольной трапеции по стороне DIMB берется по букве Р*/


if(root.[PART_TYPE]="Заглушка",
format("%0.2f", (((А*Б+(В*(root.[PART_PIPE_RECT_DIMA]/1000))*2+В*Б*2)*1.1)+0.005)),

if(root.[PART_TYPE]="Воздуховод (прямоугольное сечение)",
format("%0.2f", (((root.[PART_PIPE_RECT_DIMA]/1000+Б)*2*Г)*1.1+0.005)),

if(root.[PART_TYPE]="Отвод (прямоугольное сечение)" and root.[TYPE_OF_DUCT_OUTLET]="Прямоугольный с R",
format("%0.2f",(((Д-Е)*2+(Ж+З)*root.[PART_PIPE_RECT_DIMB]/1000+
(А+root.[PART_PIPE_RECT_DIMB]/1000)*2*((root.[PART_VENT_LENGTH]+10.4)/1000)*2)
*1.1+0.005)),

if(root.[PART_TYPE]="Отвод (прямоугольное сечение)" and root.[TYPE_OF_DUCT_OUTLET]="Прямоугольный с полками",
format("%0.2f", (И*2+Л+М*2)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход",
format("%0.2f", (С*2+Х*2+Ц+Ч)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=1,
format("%0.2f", (Г1+Е1+К1*2+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=2,
format("%0.2f", (О1+П1+Ф1*2+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=3,
format("%0.2f", (Г1+Е1+К1*2+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=4,
format("%0.2f", (О1+П1+Ф1*2+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=5,
format("%0.2f", (О1+Г1+Е1+Р1+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=6,
format("%0.2f", (О1+Г1+Е1+Р1+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=7,
format("%0.2f", (О1+Г1+Е1+Р1+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=8,
format("%0.2f", (О1+Г1+Е1+Р1+Л1+М1)*1.1),

"Неизвестный тип изделия, добавьте формулу в расчет изоляции")))))))))))))

Т.к. формулы с каждым разом становились все больше и больше, а запутаться в них было раз плюнуть, поэтому решил использовать временные параметры и оставлять комментарии к ним.

Комментарии оставляются черезе /*ХХХ*/

Формулы из-за этого стали значительно меньше и нашел пару ошибок, но все ранво с каждой деталью формулы становятся просто гигантскими)

Формула для штифтов:

var А:=if(root.[PART_PIPE_RECT_DIMA]<300,1,if(root.[PART_PIPE_RECT_DIMA]<500,2,int((root.[PART_PIPE_RECT_DIMA]-200)/300+2))); /*Количество штифтов зависящее от ширины*/
var Б:=if(root.[PART_PIPE_RECT_DIMA]<300,1,if(root.[PART_PIPE_RECT_DIMA]<500,2,int((root.[PART_PIPE_RECT_DIMA]-200)/300+2))); /*Количество штифтов зависящее от высоты*/
var В:=if(root.[PART_VENT_LENGTH]<300,1,if(root.[PART_VENT_LENGTH]<500,2,int((root.[PART_VENT_LENGTH]-200)/300+2))); /*Количество штифтов зависящее от длины*/
var Г:=if((3.14*(root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA]/2)/1000*root.[PART_VENT_ANGLE]/180)<300,1, /*Количество штифтов зависящее от радиуса по середине отвода*/
if((3.14*(root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA]/2)/1000*root.[PART_VENT_ANGLE]/180)<500,2,
int(((3.14*(root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA]/2)/1000*root.[PART_VENT_ANGLE]/180)-200)/300+2)));
var Д:=if((3.14*root.[PART_VENT_RADIUS]/1000*root.[PART_VENT_ANGLE]/180)<300,1, /*Количество штифтов зависящее от малого радиуса отвода(Его стенки)*/
if((3.14*root.[PART_VENT_RADIUS]/1000*root.[PART_VENT_ANGLE]/180)<500,2,
int(((3.14*root.[PART_VENT_RADIUS]/1000*root.[PART_VENT_ANGLE]/180)-200)/300+2)));
var Е:=if((3.14*(root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA])/1000*root.[PART_VENT_ANGLE]/180)<300,1, /*Количество штифтов зависящее от большого радиуса отвода(Его стенки)*/
if((3.14*(root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA])/1000*root.[PART_VENT_ANGLE]/180)<500,2,
int(((3.14*(root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA])/1000*root.[PART_VENT_ANGLE]/180)-200)/300+2)));



if(root.[PART_TYPE]="Заглушка",
А*Б,


if(root.[PART_TYPE]="Воздуховод (прямоугольное сечение)",
А*В*2+Б*В*2,

if(root.[PART_TYPE]="Отвод (прямоугольное сечение)" and root.[TYPE_OF_DUCT_OUTLET]="Прямоугольный с R",
format("%0.2f",А*Г*2+Б*Д+Б*Е),

if(root.[PART_TYPE]="Отвод (прямоугольное сечение)" and root.[TYPE_OF_DUCT_OUTLET]="Прямоугольный с полками",
format("%0.2f",А*Г*2+Б*Е),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход",
format("%0.f", int((root.[SURFACE_AREA]/0.09+1)*1.1)), /*0.09 примерная площадь на 1 штифт при условии расстановки через каждые 300 мм*/

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический", /*0.09 примерная площадь на 1 штифт при условии расстановки через каждые 300 мм*/
format("%0.f", int((root.[SURFACE_AREA]/0.09+1)*1.1)),

"Неизвестный тип изделия, добавьте формулу в расчет изоляции"))))))

Формула площади для второго слоя теплоизоляции:

var А:=(root.[PART_PIPE_RECT_DIMA]+root.[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000; /*Ширина+толщина изоляции с двух сторон*/
var Б:=(root.[PART_PIPE_RECT_DIMB]+root.[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000; /*Высота+толщина изоляции с двух сторон*/
var В:=(if((root.[PART_PIPE_RECT_DIMA]+root.[PART_PIPE_RECT_DIMB])>1000 and /*Длина заглушки +7.55 мм длина нахлеста на фланец.*/
((root.[PART_PIPE_RECT_DIMA]>700) or (root.[PART_PIPE_RECT_DIMB]>700)), 40, 30)+27.55)/1000;
var Г:=root.[PART_VENT_LENGTH]/1000; /*Длина воздуховода*/
var Д:=3.14*((root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA]+root.[PART_INSULATION_THICKNESS]+[PART_INSULATION_THIKNESS_2])/1000)^2 /*Площадь сектора круга по большому радиусу*/
*(root.[PART_PIPE_ELBOWANGLE]/360);
var Е:=3.14*((root.[PART_VENT_RADIUS]-root.[PART_INSULATION_THICKNESS]+[PART_INSULATION_THIKNESS_2])/1000)^2*root.[PART_PIPE_ELBOWANGLE]/360; /*Площадь сектора круга по малому радиусу*/
var Ж:=3.14*(root.[PART_VENT_RADIUS]-root.[PART_INSULATION_THICKNESS]-[PART_INSULATION_THIKNESS_2])/1000*root.[PART_PIPE_ELBOWANGLE]/180; /*Длина дуги по малому радиусу*/
var З:=3.14*(root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA]+root.[PART_INSULATION_THICKNESS]+[PART_INSULATION_THIKNESS_2])/1000 /*Длина дуги по большему радиусу*/
*root.[PART_PIPE_ELBOWANGLE]/180;
var И:=(root.[PART_PIPE_RECT_DIMB]+root.[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000;
var К:=pi*sqr((root.[PART_PIPE_RECT_DIMA]+root.[PART_INSULATION_THICKNESS]+[PART_INSULATION_THIKNESS_2])/1000)*root.[PART_VENT_ANGLE]/360; /*Площадь сектора круга*/
var Л:=pi*(root.[PART_PIPE_RECT_DIMA]+root.[PART_INSULATION_THICKNESS]+[PART_INSULATION_THIKNESS_2])/1000*root.[PART_VENT_ANGLE]/180; /*Длина дуги окружности*/
var М:=Л*(root.[PART_PIPE_RECT_DIMB]+root.[PART_INSULATION_THICKNESS]+[PART_INSULATION_THIKNESS_2])/1000; /*Площадь наружной поверхности отвода*/
var Н:=((root.[PART_PIPE_RECT_DIMA]+root.[PART_INSULATION_THICKNESS]+[PART_INSULATION_THIKNESS_2])/1000+
(root.[PART_PIPE_RECT_DIMB]+root.[PART_INSULATION_THICKNESS]+[PART_INSULATION_THIKNESS_2])/1000)*2*(root.[PART_VENT_LENGTH]+10.4)/1000; /*Площадь прямого участков отвода*/
var Н2:=(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина высоты верхнего основания*/
var О:=(root.[PART_VENT_LENGTH]-root.[PART_VENT_SECTION_DIMC]*2)/1000; /*Высота усеченной пирамиды*/
var П:=(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина высоты нижнего основания*/
var Р:=sqrt(sqr(О)+sqr(abs(Н2-П))); /*Высота боковой трапеции по ширине пирамиды*/
var С:=((root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+(root.[PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/1000)/2*Р; /*Площадь боковой поверхности(Равнобедренной трапеции) по стороне DIMA*/
var Т:=(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина ширины верхнего основания*/
var У:=(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина ширины нижнего основания*/
var Ф:=sqrt(sqr(О)+sqr(abs(Т-У))); /*Высота боковой трапеции по высоте пирамиды*/
var Х:=((root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)/2*Ф; /*Площадь боковой поверхности(Равнобедренной трапеции) по стороне DIMB*/
var Ц:=((root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)*2*root.[PART_VENT_SECTION_DIMC]/1000; /*Площадь прямого участков отвода с первой стороны*/
var Ч:=((root.[PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)*2*root.[PART_VENT_SECTION_DIMC]/1000; /*Площадь прямого участков отвода со второй стороны*/
/*Формулы для типа 1 и 3*/
var А1:=([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина высоты верхнего основания*/
var Б1:=([PART_VENT_LENGTH]-[PART_VENT_SECTION_DIMC]*2)/1000; /*Высота усеченной пирамиды*/
var В1:=([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина высоты нижнего основания*/
var Г1:=(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)/2*Б1; /*Площадь боковой поверхности(Под прямым углом) по стороне DIMA(Берется в расчет)*/
var Д1:=sqrt(sqr(Б1)+sqr(abs(([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000-([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000))); /*Высота боковой трапеции по ширине пирамиды*/
var Е1:=(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)/2*Д1; /*Площадь боковой поверхности(Напротив прямой трапеции) по стороне DIMA(Берется в расчет)*/
var Ж1:=([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина ширины верхнего основания*/
var З1:=([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина ширины нижнего основания*/
var И1:=sqrt(sqr(Б1)+sqr(abs(Ж1-З1))); /*Высота боковой трапеции по высоте пирамиды*/
var К1:=(([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)/2*И1; /*Площадь боковой поверхности(Равнобедренной трапеции) по стороне DIMB(Берется в расчет)*/
var Л1:=(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)*2*[PART_VENT_SECTION_DIMC]/1000; /*Площадь прямого участков отвода с первой стороны*/
var М1:=(([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)*2*[PART_VENT_SECTION_DIMC]/1000; /*Площадь прямого участков отвода со второй стороны*/
/*Формулы для типа 2 и 4*/
var О1:=(([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)/2*Б1; /*Площадь боковой поверхности(Под прямым углом) по стороне DIMB(Берется в расчет)*/
var П1:=sqrt(sqr(Б1)+sqr(abs(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000-([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000))); /*Высота боковой трапеции по ширине пирамиды*/
var Р1:=(([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)/2*П1; /*Площадь боковой поверхности(Напротив прямой трапеции) по стороне DIMB(Берется в расчет)*/
var С1:=([PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина ширины верхнего основания*/
var Т1:=([PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/2/1000; /*Половина ширины нижнего основания*/
var У1:=sqrt(sqr(Б1)+sqr(abs(Ж1-З1))); /*Высота боковой трапеции по высоте пирамиды*/
var Ф1:=(([PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000+([PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2+[PART_INSULATION_THIKNESS_2]*2)/1000)/2*У1; /*Площадь боковой поверхности по стороне DIMA(Берется в расчет)*/
/*Формулы для типа 5, 6, 7, 8*/
/*Прямоугольная трапеция по стороне DIMB берется по букве О*/
/*Прямоугольная трапеция по стороне DIMA берется по букве Г*/
/*Высота трапеции по стороне DIMA берется по букве Д*/
/*Трапеция напротив прямоугольной трапеции по стороне DIMA берется по букве Е*/
/*Высота трапеции по стороне DIMB берется по букве П*/
/*Трапеция напротив прямоугольной трапеции по стороне DIMB берется по букве Р*/

if(root.[PART_TYPE]="Заглушка",
format("%0.2f", (((А*Б+(В*(root.[PART_PIPE_RECT_DIMA]/1000))*2+(В*И)*2)*1.1)+0.005)),

if(root.[PART_TYPE]="Воздуховод (прямоугольное сечение)",
format("%0.2f", (((А+Б)*2*Г)*1.1+0.005)),

if(root.[PART_TYPE]="Отвод (прямоугольное сечение)" and root.[TYPE_OF_DUCT_OUTLET]="Прямоугольный с R",
format("%0.2f",(((Д-Е)*2+(Ж+З)*root.[PART_PIPE_RECT_DIMB]/1000+
(А+root.[PART_PIPE_RECT_DIMB]/1000)*2*((root.[PART_VENT_LENGTH]+5.2)/1000)*2)
*1.1+0.005)),
if(root.[PART_TYPE]="Отвод (прямоугольное сечение)" and root.[TYPE_OF_DUCT_OUTLET]="Прямоугольный с полками",
format("%0.2f", (К*2+М+Н*2)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход",
format("%0.2f", (С*2+Х*2+Ц+Ч)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=1,
format("%0.2f", (Г1+Е1+К1*2+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=2,
format("%0.2f", (О1+П1+Ф1*2+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=3,
format("%0.2f", (Г1+Е1+К1*2+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=4,
format("%0.2f", (О1+П1+Ф1*2+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=5,
format("%0.2f", (О1+Г1+Е1+Р1+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=6,
format("%0.2f", (О1+Г1+Е1+Р1+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=7,
format("%0.2f", (О1+Г1+Е1+Р1+Л1+М1)*1.1),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=8,
format("%0.2f", (О1+Г1+Е1+Р1+Л1+М1)*1.1),

"Неизвестный тип изделия, добавьте формулу в расчет изоляции")))))))))))))

Формула для длины ленты:

var А:=(root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/1000; /*Ширина+толщина изоляции с двух сторон*/
var Б:=(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/1000; /*Высота+толщина изоляции с двух сторон*/
var В:=1.2; /*Ширина рулона теплоизоляции по каталогу в метрах*/
var Г:=5; /*Длина рулона теплоизоляции по каталогу в метрах*/
var Д:=format("%0.f", root.[PART_VENT_LENGTH]/В/1000);
var Е:=3.14*(root.[PART_VENT_RADIUS]-[PART_INSULATION_THICKNESS])/1000*root.PART_VENT_ANGLE/180; /*Длина дуги по малому радиусу*/
var Ж:=(3.14*(root.[PART_VENT_RADIUS]+root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS])/1000) /*Длина дуги по большему радиусу*/
*root.PART_VENT_ANGLE/180;
var З:=sqrt(sqr((root.[PART_PIPE_RECT_DIMA]/2+[PART_INSULATION_THICKNESS])/1000)+ /*Гипотенуза от половины длины и ширины верхней части перехода*/
sqr((root.[PART_PIPE_RECT_DIMB]/2+[PART_INSULATION_THICKNESS])/1000));
var И:=sqrt(sqr((root.[PART_PIPE_RECT_DIMA1]/2+[PART_INSULATION_THICKNESS])/1000)+
sqr((root.[PART_PIPE_RECT_DIMB1]/2+[PART_INSULATION_THICKNESS])/1000)); /*Гипотенуза от половины длины и ширины нижней части перехода*/
var К:=(root.[PART_VENT_LENGTH]-root.[PART_VENT_SECTION_DIMC]*2)/1000; /*Высота усеченной пирамиды*/
var Л:=sqrt(sqr(К)+sqr(abs(З-И))); /*Длина боковой стороны трапеции*/
var М:=(root.[PART_PIPE_RECT_DIMA]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины перехода по DIMA*/
var Н:=(root.[PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины перехода по DIMA1*/
var Р:=(root.[PART_PIPE_RECT_DIMB]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины перехода по DIMB*/
var С:=(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/2/1000; /*Половина ширины перехода по DIMB1*/
var О:=sqrt(sqr(К)+sqr(abs(М-Н))); /*Длина боковой стороны трапеции в переходе типа 1*/
var П:=sqrt(sqr(О)+sqr(abs(Р*2-С*2))); /*Длина другой боковой стороны трапеции в переходе типа 1*/
var Т:=sqrt(sqr(К)+sqr(abs(Р-С))); /*Длина боковой стороны трапеции в переходе типа 2*/
var У:=sqrt(sqr(Т)+sqr(abs(М*2-Н*2))); /*Длина другой боковой стороны трапеции в переходе типа 2*/
var Ф:=sqrt(sqr(Ш)+sqr(abs(М*2-Н*2))); /*Длина боковой стороны трапеции в переходе типа 5 по DIMA напротив прямого угла*/
var Х:=(root.[PART_PIPE_RECT_DIMA1]+[PART_INSULATION_THICKNESS]*2)/1000; /*Ширина+толщина изоляции с двух сторон*/
var Ц:=(root.[PART_PIPE_RECT_DIMB1]+[PART_INSULATION_THICKNESS]*2)/1000; /*Высота+толщина изоляции с двух сторон*/
var Ш:=sqrt(sqr(К)+sqr(abs(Р*2-С*2))); /*Длина боковой стороны трапеции в переходе типа 5 по DIMB*/
var Щ:=sqrt(sqr(К)+sqr(abs(М*2-Н*2))); /*Длина боковой стороны трапеции в переходе типа 5 по DIMA*/



if(root.[PART_TYPE]="Заглушка",
format("%0.2f",((А+Б)*2*2+
if(root.[PART_PIPE_RECT_DIMA]<=root.[PART_PIPE_RECT_DIMB],
format("%0.f", if(А>=В,(А/В+0.99)*Б,0)+format("%0.f", if(Б>=Г,(Б/Г+0.99)*А,0))),
format("%0.f", if(Б>=В,(Б/В+0.99)*А,0)+format("%0.f", if(А>=Г,(А/Г+0.99)*Б,0)))))*1.1+0.005)
+parent.child.[BOM_PART_QTY]*0.02*5,



if(root.[PART_TYPE]="Воздуховод (прямоугольное сечение)",
format("%0.2f", ((Д*(А+Б)*2+
if((А+Б)*2<=Г, root.[PART_VENT_LENGTH]/1000,
if((А+Б)*2<=2*Г, (root.[PART_VENT_LENGTH]/1000)*2,
if((А+Б)*2<=3*Г, (root.[PART_VENT_LENGTH]/1000)*3,
if((А+Б)*2<=4*Г, (root.[PART_VENT_LENGTH]/1000)*4,(root.[PART_VENT_LENGTH]/1000)*5))))))*1.1+0.005
+parent.child.[BOM_PART_QTY]*0.02*5),

if(root.[PART_TYPE]="Отвод (прямоугольное сечение)" and root.[TYPE_OF_DUCT_OUTLET]="Прямоугольный с R",
format("%0.2f",((А+Б)*2*4+Е*if(А<=Г,1,2)*2+Ж*if(А<=Г,1,2)*2)*1.1+0.05+parent.child.[BOM_PART_QTY]*0.02*5),

if(root.[PART_TYPE]="Отвод (прямоугольное сечение)" and root.[TYPE_OF_DUCT_OUTLET]="Прямоугольный с полками",
format("%0.2f",((А+Б)*2*4+Ж*if(А<=Г,1,2)*2+root.[PART_VENT_LENGTH]/1000*4)*1.1+0.05+parent.child.[BOM_PART_QTY]*0.02*5),

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход",
format("%0.f", int((Л*4+А*4+Б*4+Х*4+Ц*4+
if(А>Г or Х>Г,Л*2, 0)+
if(Б>Г or Ц>Г,Л*2, 0)+
if(А>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Б>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Х>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Ц>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0))*1.1))+parent.child.[BOM_PART_QTY]*0.02*5,

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=1,
format("%0.2f", (О*2+П*2+А*4+Б*4+Х*4+Ц*4+
if(А>Г or Х>Г,О*2, 0)+
if(Б>Г or Ц>Г,П*2, 0)+
if(А>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Б>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Х>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Ц>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0))*1.1)+parent.child.[BOM_PART_QTY]*0.02*5,

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=2,
format("%0.2f", (Т*2+У*2+А*4+Б*4+Х*4+Ц*4+
if(А>Г or Х>Г,У*2, 0)+
if(Б>Г or Ц>Г,Т*2, 0)+
if(А>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Б>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Х>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Ц>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0))*1.1)+parent.child.[BOM_PART_QTY]*0.02*5,

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=3,
format("%0.2f", (О*2+П*2+А*4+Б*4+Х*4+Ц*4+
if(А>Г or Х>Г,О*2, 0)+
if(Б>Г or Ц>Г,П*2, 0)+
if(А>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Б>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Х>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Ц>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0))*1.1)+parent.child.[BOM_PART_QTY]*0.02*5,

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=4,
format("%0.2f", (Т*2+У*2+А*4+Б*4+Х*4+Ц*4+
if(А>Г or Х>Г,У*2, 0)+
if(Б>Г or Ц>Г,Т*2, 0)+
if(А>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Б>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Х>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0)+
if(Ц>Г,root.[PART_VENT_SECTION_DIMC]/1000, 0))*1.1)+parent.child.[BOM_PART_QTY]*0.02*5,

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=5,
format("%0.2f", (К+Ш+Щ+Ф+А*4+Б*4+Х*4+Ц*4+
if(А>Г or Х>Г,К+Ф, 0)+
if(Б>Г or Ц>Г,К+Ф, 0))*1.1)+parent.child.[BOM_PART_QTY]*0.02*5,

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=6,
format("%0.2f", (К+Ш+Щ+Ф+А*4+Б*4+Х*4+Ц*4+
if(А>Г or Х>Г,К+Ф, 0)+
if(Б>Г or Ц>Г,К+Ф, 0))*1.1)+parent.child.[BOM_PART_QTY]*0.02*5,

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=7,
format("%0.2f", (К+Ш+Щ+Ф+А*4+Б*4+Х*4+Ц*4+
if(А>Г or Х>Г,К+Ф, 0)+
if(Б>Г or Ц>Г,К+Ф, 0))*1.1)+parent.child.[BOM_PART_QTY]*0.02*5,

if(root.[PART_TYPE]="Переход (прямоугольное сечение)" and root.[PART_PIPE_CLASS]="Переход эксцентрический" and root.[DIM_ALIGN_VARIANT]=8,
format("%0.2f", (К+Ш+Щ+Ф+А*4+Б*4+Х*4+Ц*4+
if(А>Г or Х>Г,К+Ф, 0)+
if(Б>Г or Ц>Г,К+Ф, 0))*1.1)+parent.child.[BOM_PART_QTY]*0.02*5,

"Неизвестный тип изделия, добавьте формулу в расчет изоляции")))))))))))))