Проведение документа

[Алексей_1985_06]

Подскажите знатоки есть код, который должен выполняться только ПРИ ПРОВЕДЕНИИ ДОКУМЕНТА (не записи), как это сделать?
Код:

Код Выделить Развернуть

&НаСерверебезКонтекста
Функция ПолучитьСтрокуТЧнаСервере(СсылкаНаЭлемент, ИмяТабличнойЧасти, ИмяКолонки, НомерСтроки = 0)
   ТабличнаяЧасть = СсылкаНаЭлемент[ИмяТабличнойЧасти];
   КоличествоСтрок = ТабличнаяЧасть.Количество();
   Если КоличествоСтрок = 0 Тогда
   Значение = Неопределено;
   Иначе
   Строка = Мин(НомерСтроки, КоличествоСтрок - 1);
   Значение = ТабличнаяЧасть[Строка][ИмяКолонки];
   КонецЕсли;
   Возврат Значение;
КонецФункции


Код Выделить Развернуть

&НаСервере
Процедура ИзменитьДанныеСправочникаНаСервере()
ИзмСправочник = Объект.ФамилияИмяОтчество.ПолучитьОбъект();
ЗаписаноеЗвание = ПолучитьСтрокуТЧнаСервере(Объект.ФамилияИмяОтчество, "ВоинскиеЗвания", "ВоинскоеЗвание", 100);
Если ЗаписаноеЗвание = Объект.ВоинскоеЗвание Тогда    
Сообщить("Внимание!!!")
Иначе
НоваяСтрока = ИзмСправочник.ВоинскиеЗвания.Добавить(); 
НоваяСтрока.ВоинскоеЗвание = Объект.ВоинскоеЗвание;
НоваяСтрока.ДатаПриказа = Объект.ДатаПриказа;
НоваяСтрока.НомерПриказа = Объект.НомерПриказа;
НоваяСтрока.ЧейПриказ = Объект.ЧейПриказ;
ИзмСправочник.ВоинскоеЗвание = Объект.ВоинскоеЗвание;
ИзмСправочник.Записать();
КонецЕсли;
КонецПроцедуры


[DmitriyF]

Подскажите знатоки есть код, который должен выполняться только ПРИ ПРОВЕДЕНИИ ДОКУМЕНТА (не записи), как это сделать?
Код:

Код Выделить Развернуть

&НаСерверебезКонтекста
Функция ПолучитьСтрокуТЧнаСервере(СсылкаНаЭлемент, ИмяТабличнойЧасти, ИмяКолонки, НомерСтроки = 0)
   ТабличнаяЧасть = СсылкаНаЭлемент[ИмяТабличнойЧасти];
   КоличествоСтрок = ТабличнаяЧасть.Количество();
   Если КоличествоСтрок = 0 Тогда
   Значение = Неопределено;
   Иначе
   Строка = Мин(НомерСтроки, КоличествоСтрок - 1);
   Значение = ТабличнаяЧасть[Строка][ИмяКолонки];
   КонецЕсли;
   Возврат Значение;
КонецФункции


Код Выделить Развернуть

&НаСервере
Процедура ИзменитьДанныеСправочникаНаСервере()
ИзмСправочник = Объект.ФамилияИмяОтчество.ПолучитьОбъект();
ЗаписаноеЗвание = ПолучитьСтрокуТЧнаСервере(Объект.ФамилияИмяОтчество, "ВоинскиеЗвания", "ВоинскоеЗвание", 100);
Если ЗаписаноеЗвание = Объект.ВоинскоеЗвание Тогда    
Сообщить("Внимание!!!")
Иначе
НоваяСтрока = ИзмСправочник.ВоинскиеЗвания.Добавить(); 
НоваяСтрока.ВоинскоеЗвание = Объект.ВоинскоеЗвание;
НоваяСтрока.ДатаПриказа = Объект.ДатаПриказа;
НоваяСтрока.НомерПриказа = Объект.НомерПриказа;
НоваяСтрока.ЧейПриказ = Объект.ЧейПриказ;
ИзмСправочник.ВоинскоеЗвание = Объект.ВоинскоеЗвание;
ИзмСправочник.Записать();
КонецЕсли;
КонецПроцедуры


Так и вызывайте вашу процедуру из нужного места, не ПриЗаписи, а в обработчике проведения.

[Алексей_1985_06]

Подскажите знатоки есть код, который должен выполняться только ПРИ ПРОВЕДЕНИИ ДОКУМЕНТА (не записи), как это сделать?
Код:

Код Выделить Развернуть

&НаСерверебезКонтекста
Функция ПолучитьСтрокуТЧнаСервере(СсылкаНаЭлемент, ИмяТабличнойЧасти, ИмяКолонки, НомерСтроки = 0)
   ТабличнаяЧасть = СсылкаНаЭлемент[ИмяТабличнойЧасти];
   КоличествоСтрок = ТабличнаяЧасть.Количество();
   Если КоличествоСтрок = 0 Тогда
   Значение = Неопределено;
   Иначе
   Строка = Мин(НомерСтроки, КоличествоСтрок - 1);
   Значение = ТабличнаяЧасть[Строка][ИмяКолонки];
   КонецЕсли;
   Возврат Значение;
КонецФункции


Код Выделить Развернуть

&НаСервере
Процедура ИзменитьДанныеСправочникаНаСервере()
ИзмСправочник = Объект.ФамилияИмяОтчество.ПолучитьОбъект();
ЗаписаноеЗвание = ПолучитьСтрокуТЧнаСервере(Объект.ФамилияИмяОтчество, "ВоинскиеЗвания", "ВоинскоеЗвание", 100);
Если ЗаписаноеЗвание = Объект.ВоинскоеЗвание Тогда    
Сообщить("Внимание!!!")
Иначе
НоваяСтрока = ИзмСправочник.ВоинскиеЗвания.Добавить(); 
НоваяСтрока.ВоинскоеЗвание = Объект.ВоинскоеЗвание;
НоваяСтрока.ДатаПриказа = Объект.ДатаПриказа;
НоваяСтрока.НомерПриказа = Объект.НомерПриказа;
НоваяСтрока.ЧейПриказ = Объект.ЧейПриказ;
ИзмСправочник.ВоинскоеЗвание = Объект.ВоинскоеЗвание;
ИзмСправочник.Записать();
КонецЕсли;
КонецПроцедуры


Так и вызывайте вашу процедуру из нужного места, не ПриЗаписи, а в обработчике проведения.

Извините, я новичок в этом деле, только учусь.... Можете написать как это сделать?