97
ТабДок.Вывести(ОбластьЗаголовок);
Шапка.Параметры.Заполнить(Выборка);
ТабДок.Вывести(Шапка, Выборка.Уровень());
ВставлятьРазделительСтраниц = Истина;
КонецЦикла;
//}}
КонецПроцедуры
&НаКлиенте
Процедура ОбработкаКоманды(ПараметрКоманды,
ПараметрыВыполненияКоманды)
//{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
ТабДок = Новый ТабличныйДокумент;
Печать(ТабДок, ПараметрКоманды);
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Истина;
ТабДок.ТолькоПросмотр = Истина;
ТабДок.ОтображатьЗаголовки = Ложь;
ТабДок.Показать();
//}}
КонецПроцедуры
&НаСервере
Процедура Печать(ТабДок, ПараметрКоманды)
Документы.Сотрудники.Печать(ТабДок, ПараметрКоманды);
КонецПроцедуры
98
ВЫБРАТЬ
Договор.Дата,
Договор.Клиент.Наименование,
Договор.Услуга.Наименование,
Договор.Услуга.Стоимость,
Деятельность.Ответственный
ИЗ
Документ. Договор КАК Договор
99
ПРИЛОЖЕНИЕ 3
Листинг формы Завления
<?xml version="1.0" encoding="UTF-8"?>
<Form xmlns="http://v8.1c.ru/8.3/xcf/logform"/XMLSchema-
instance"><AutoTime>CurrentOrLast</AutoTime>
<UsePostingMode>Auto</UsePostingMode>
<RepostOnWrite>true</RepostOnWrite>
<AutoCommandBar name="" id="-1"/>
<ChildItems>
<InputField name="Номер" id="1">
<DataPath>Объект.Number</DataPath>
<EditMode>EnterOnInput</EditMode>
<ContextMenu name="НомерКонтекстноеМеню" id="2"/>
<ExtendedTooltip name="НомерРасширеннаяПодсказка"
id="3"/>
</InputField>
<InputField name="Дата" id="4">
<DataPath>Объект.Date</DataPath>
<EditMode>EnterOnInput</EditMode>
<ContextMenu name="ДатаКонтекстноеМеню" id="5"/>
<ExtendedTooltip name="ДатаРасширеннаяПодсказка"
id="6"/>
</InputField>
<InputField name="Номер1" id="7">
<DataPath>1/0:eceadc4a-a121-44e5-8146-
afa03a03bfee</DataPath>
<EditMode>EnterOnInput</EditMode>
<ContextMenu name="Номер1КонтекстноеМеню" id="8"/>
<ExtendedTooltip name="Номер1РасширеннаяПодсказка"
id="9"/>
</InputField>
100
<InputField name="Дата1" id="10">
<DataPath>1/0:fe51b5eb-ca5a-4e4c-876b-
6dd560ab0885</DataPath>
<EditMode>EnterOnInput</EditMode>
<ContextMenu name="Дата1КонтекстноеМеню" id="11"/>
<ExtendedTooltip name="Дата1РасширеннаяПодсказка"
id="12"/>
</InputField>
<InputField name="Клиент" id="13">
<DataPath>Объект.Клиент</DataPath>
<EditMode>EnterOnInput</EditMode>
<ContextMenu name="КлиентКонтекстноеМеню" id="14"/>
<ExtendedTooltip name="КлиентРасширеннаяПодсказка"
id="15"/>
</InputField>
<InputField name="Услуга" id="16">
<DataPath>Объект.Услуга</DataPath>
<EditMode>EnterOnInput</EditMode>
<ContextMenu name="УслугаКонтекстноеМеню" id="17"/>
<ExtendedTooltip name="УслугаРасширеннаяПодсказка"
id="18"/>
</InputField>
<InputField name="Смена" id="19">
<DataPath>1/0:8b2c37aa-fc72-42fd-8edc-
68d958b978d6</DataPath>
<EditMode>EnterOnInput</EditMode>
<ContextMenu name="СменаКонтекстноеМеню" id="20"/>
<ExtendedTooltip name="СменаРасширеннаяПодсказка"
id="21"/>
</InputField>
<CheckBoxField name="Оплачено" id="22">
101
<DataPath>1/0:5c773d78-99ea-4490-934e-
7300558f55a8</DataPath>
<EditMode>EnterOnInput</EditMode>
<CheckBoxType>Auto</CheckBoxType>
<ContextMenu name="ОплаченоКонтекстноеМеню" id="23"/>
<ExtendedTooltip name="ОплаченоРасширеннаяПодсказка"
id="24"/>
</CheckBoxField>
</ChildItems>
<Attributes>
<Attribute name="Объект" id="1">
<Type>
<v8:Type>cfg:DocumentObject.Заявления</v8:Type>
</Type>
<MainAttribute>true</MainAttribute>
<SavedData>true</SavedData>
<UseAlways>
<Field>Объект.RegisterRecords</Field>
</UseAlways>
</Attribute>
</Attributes>
</Form>