Справочник: Вывод параметров откосов

Вывод размеров и параметров откосов

При использовании модуля расчета откосов и монтажных швов введенные пользователем размеры, вид проема, а также пользовательские параметры сохраняются в отдельной таблице для каждого изделия - SaveOtk.

Сама таблица изделий ListOrd имеет поле Otkos (smallint) - вид проема для расчета откосов. По этому полю можно отфильтровать изделия с установленными откосами. Целочисленные значение поля Otkos содержит номер вида проема из предопределенных.

Примеры

<HTML> <BODY>

<TABLE style="border-collapse: collapse; color:#0; font-weight: none;">

~SQL1:Установить:SELECT oNumb,Otkos FROM ListOrd~
~SQL1:Добавить:WHERE (pUnic=:Индекс1.AsInteger:)~
~SQL1:Добавить:AND(Otkos>0)~
~SQL1:Добавить:ORDER BY oNumb~
~SQL1:Начало~

<TR>
<TD>Изделие № ~SQL1:oNumb:AsInteger~</TD>
<TD>
~IF:SQL1otkos=1:THEN~ прямой без четверти ~ENDIF~
~IF:SQL1otkos=2:THEN~ прямой c четвертью ~ENDIF~
~IF:SQL1otkos=3:THEN~ балкон, дверь слева без четверти ~ENDIF~
~IF:SQL1otkos=4:THEN~ балкон, дверь слева c четвертью ~ENDIF~
~IF:SQL1otkos=5:THEN~ балкон, дверь справа без четверти ~ENDIF~
~IF:SQL1otkos=6:THEN~ балкон, дверь справа с четвертью ~ENDIF~
~IF:SQL1otkos=7:THEN~ балкон, дверь в центре без четверти ~ENDIF~
~IF:SQL1otkos=8:THEN~ балкон, дверь в центре с четвертью ~ENDIF~
~IF:SQL1otkos=9:THEN~ арочный блок без четверти ~ENDIF~
~IF:SQL1otkos=10:THEN~ арочный блок с четвертью ~ENDIF~
~IF:SQL1otkos=11:THEN~ нестандартный блок без четверти ~ENDIF~
~IF:SQL1otkos=12:THEN~ нестандартный блок с четвертью ~ENDIF~
</TD>

</TR>
~SQL1:Конец~

</TABLE>


<TABLE style="border-collapse: collapse; color:#0; font-weight: none;">
<TR>
<TD bgColor=#CCCCCC align=center>Параметр</TD>
<TD bgColor=#CCCCCC align=center>Значение</TD>
</TR>


~SQL1:Установить:SELECT pNumb,pName,zName FROM SaveOtk~ ~SQL1:Добавить:WHERE (pUnic=:Индекс1.AsInteger:)~
~SQL1:Добавить:AND(oNumb=:Индекс2.AsInteger:)~
~SQL1:Добавить:AND(pNumb>=0)~
~SQL1:Добавить:ORDER BY pNumb~
~SQL1:Начало~
<TR>
<TD align=left>~SQL1:pName:AsString~</TD>
<TD align=center>~SQL1:zName:AsString~</TD>
</TR>
~SQL1:Конец~


~SQL1:Установить:SELECT pNumb,pName,zName FROM SaveOtk~ ~SQL1:Добавить:WHERE (pUnic=:Индекс1.AsInteger:)~
~SQL1:Добавить:AND(oNumb=:Индекс2.AsInteger:)~
~SQL1:Добавить:AND(pNumb<0)~
~SQL1:Добавить:ORDER BY pNumb~
~SQL1:Начало~
<TR style="font-style:Italic">
<TD align=left>~SQL1:pName:AsString~</TD>
<TD align=center>~SQL1:zName:AsString~</TD>
</TR>
~SQL1:Конец~

<P align=center>Проверил: _____________/_____________/</P>

</TABLE>
</BODY>
</HTML>

Выходной отчет будет иметь примерный вид:

Параметр	Значение
Вид проема	ПРЯМОЙ без четверти
Толщина стены, мм	60
Ширина правого откоса, мм	35
Ширина верхнего откоса, мм	35
Ширина левого откоса, мм	35
Ширина внешнего откоса, мм	15
Зазор под подоконник, мм	25
Зазор справа, мм	20
Зазор сверху, мм	20
Зазор слева,	20
Материал стены	Кирпич
Материал откосов	Гипсо картон
Герметизация	Стандартная

Проверил: _____________/_____________/

Примечание
Для проема с четвертью дополнительно выводятся размеры заходов за четверть.