Имя: Пароль:
1C
1С v8
Обновление заголовка документа
,
0 dainastar
 
27.12.11
12:17
Подскажите где в коде написана процедура обновления заголовка формы документа (Проведен, Не проведен)
1 DrHiHi
 
27.12.11
12:19
а в типовом документе посмотреть впадло??
2 Olelykoye
 
27.12.11
12:23
Поиском не пробовали?
Посмотрите ПриОткрытии типового документа  - должна быть внешняя процедура типа УстановитьЗаголовокФормыДокумента
3 dainastar
 
27.12.11
12:33
(1) не впадло. Перерыла весь документ Отчет производства за смену и не нашла.
4 dainastar
 
27.12.11
12:34
(2) попробовала бы поиском, да не знаю что именно искать
5 dainastar
 
27.12.11
12:36
(2) спасибо за наводку (УстановитьЗаголовокФормыДокумента). Нашла в форме документа.
Теперь другой вопрос, я в процедуру обработка проведения хочу поставить свое условие: если оно выполняется, то дальше идет код типового проведения. Все срабатывает нормально, документ не проводится. Н ов заголовке формы все равно устанавливается: Проведен. Как отловить это
6 dainastar
 
27.12.11
12:37
ставила точку останова на проц.ОбработкаПроведения. Только она отрабатывает эту процедуру и никуда дальше не идет
7 DrHiHi
 
27.12.11
12:39
(5) в обработке проведения есть параметр отказ, если его поставить в значение истина, то проведение будет отменено...
8 Любопытная
 
27.12.11
12:42
(0)// Вывести в заголовке формы вид операции.
   РаботаСДиалогами.УстановитьЗаголовокФормыДокумента( , ЭтотОбъект, ЭтаФорма);
9 Любопытная
 
27.12.11
12:42
+(8)Процедура УстановитьЗаголовокФормыДокумента(СтрокаВидаОперации = "", ДокументОбъект, ФормаДокумента) Экспорт

   ФормаДокумента.АвтоЗаголовок = Ложь; // заголовок будем писать сами
   
   Если ПустаяСтрока(СтрокаВидаОперации) Тогда
       Заголовок = ДокументОбъект.Метаданные().Синоним + ": ";
   Иначе
       Заголовок = ДокументОбъект.Метаданные().Синоним + ": " + СтрокаВидаОперации + ". ";
   КонецЕсли;
       
   Если ДокументОбъект.ЭтоНовый() Тогда  
       Заголовок = Заголовок + "Новый";
   Иначе
       Если ДокументОбъект.Проведен Тогда
           Заголовок = Заголовок + "Проведен";
       ИначеЕсли ДокументОбъект.Метаданные().Проведение = Метаданные.СвойстваОбъектов.Проведение.Разрешить Тогда
           Заголовок = Заголовок + "Не проведен";
       Иначе
           Заголовок = Заголовок + "Записан";
       КонецЕсли;
   КонецЕсли;
   
   ФормаДокумента.Заголовок = Заголовок;

КонецПроцедуры // УстановитьЗаголовокФормыДокумента()
10 Любопытная
 
27.12.11
12:43
Это?
11 dainastar
 
27.12.11
12:58
(10) да эсо, спасибо!
12 Любопытная
 
27.12.11
13:00
Плохо ищете, мне трех минут хватило
13 dainastar
 
27.12.11
13:01
(12) я не знала что искать, смотрела Обновление отображения
14 dainastar
 
27.12.11
13:02
(7) как я сразу не догадалсь! все гениальное просто! Вам спасибо большое!