СохранитьДеревоНаСервере();
П = Новый Структура;
Оповестить("Дерево",П, ЭтотОбъект); // оповестить об изменении,
сделанном в этом форме, все остальные формы - пусть они перстаривают свое
дерево
КонецПроцедуры
// по команде НоваяПодзадача
&НаКлиенте
Процедура ДеревоНоваяПодзадача(Команда)
ЭтаЗадача = Элементы.ДеревоПодзадач.ТекущиеДанные.ПодЗадача;
//// вариант программного создания и записи нового документа
//НоваяПодЗадача = СоздатьПодзадачуНаСервере(); // создать новый
документ и записать его
//ПутьВДереве =
ПолучитьПутьВДереве(Элементы.ДеревоПодзадач.ТекущиеДанные,
НоваяПодЗадача); //сформировать массив подзадач от текущего узла до корня
//ДобавитьСуществующуюПодзадачуНаСервере(ЭтаЗадача,
НоваяПодЗадача); // добавить новую задачу в объект (в таб. часть)
//ЭтаФорма.Прочитать(); // перечитать данные формы
//ЗаполнитьДеревоПодзадач(); // перстроить дерево подзадач
//СпозиционироватьсяВДеревеПодзадач(ДеревоПодзадач, ПутьВДереве,
ПутьВДереве.Количество()-1); // спозиционироваться на добавленной задаче
//П = Новый Структура;
//П.Вставить("Ключ", НоваяПодЗадача);
//ОткрытьФорму("Документ.Задача.ФормаОбъекта", П); // открыть
отдельную форму редактирования новой задачи
Если ОбщийСрв.ВЗакрытомПериоде(ЭтаЗадача) Тогда
Сообщить(ОбщийСрв.ПредставлениеЗадачи(ЭтаЗадача) +
"Находится в закрытом периоде. Редактирование невозможно");
Возврат;
КонецЕсли;
Если Не
ОбщийСрв.ПроверкаПрав(ОбщийСрв.ПолучитьРеквизитЗадачи(ЭтаЗадача,
"Автор"), ОбщийСрв.ПолучитьГлПользователь()) Тогда
Сообщить(ОбщийСрв.ПредставлениеЗадачи(ЭтаЗадача) + "Нет прав
редактировать чужой документ");
Возврат;
КонецЕсли;