Имя: Пароль:
1C
1С v8
Не Срабатывает ф-я НаименованиеКонтрагентаПриИзменении();
0 Boudybuilder
 
10.07.12
03:16
Конфа УТ для УКР последняя.
ОФорма обработки РедактированиеДанныхНезарегистрированныхКонтрагентов.


// Обработчик события ПриИзменении элемента формы НаименованиеКонтрагента.
//
Процедура НаименованиеКонтрагентаПриИзменении(Элемент)
   
   УстановитьФлагФормироватьНаименованиеПолноеАвтоматически();
   
   Если мФормироватьНаименованиеПолноеАвтоматически Тогда
       СформироватьНаименованиеПолноеАвтоматически();
   КонецЕсли;
   
КонецПроцедуры



// Процедура проверяет, необходимо ли формировать полное наименование автоматически или нет,
// и присваивает соответствующее значение переменной мФормироватьНаименованиеПолноеАвтоматически.
//
// Параметры:
//  Нет.
//
Процедура УстановитьФлагФормироватьНаименованиеПолноеАвтоматически()
   
   Если НЕ ЗначениеЗаполнено(Запись.НаименованиеКонтрагентаПолное)
       ИЛИ Запись.НаименованиеКонтрагентаПолное = Запись.НаименованиеКонтрагента Тогда
       мФормироватьНаименованиеПолноеАвтоматически = Истина;
   Иначе
       мФормироватьНаименованиеПолноеАвтоматически = Ложь;
   КонецЕсли;
   
КонецПроцедуры // УстановитьФлагФормироватьНаименованиеПолноеАвтоматически()



// Процедура формирует полное наименование автоматически
//
// Параметры:
//  Нет.
//
Процедура СформироватьНаименованиеПолноеАвтоматически()
   
   Запись.НаименованиеКонтрагентаПолное = Запись.НаименованиеКонтрагента;
   
КонецПроцедуры // СформироватьНаименованиеПолноеАвтоматически()






Вопрос в том что если открывать модально , то нифига не происходит при изменении...  Че за дела?! Полное наименование так и остается как было...

А это частенько неудобно... :(
1 Rizhij_Nikitos
 
10.07.12
03:23
Попробуй заменить все i на Ы
2 uraskin
 
10.07.12
04:39
проверь назначено ли это событие для самого элемента на форме.
3 Boudybuilder
 
10.07.12
21:04
(2) Есть - ПриИзменении...
4 Нуф-Нуф
 
10.07.12
21:05
что ты открываешь модально, и как?
5 Boudybuilder
 
10.07.12
21:07
модально , так как вызывается из дока ЗаказПокупателя.
6 Нуф-Нуф
 
10.07.12
21:10
?
7 Boudybuilder
 
10.07.12
21:16
роцедура КонтрагентОкончаниеВводаТекста(Элемент, Текст, Значение, СтандартнаяОбработка)
       
               
   РезультатЗапроса = ПроцедурыПоискаПоСтроке.ПолучитьРезультатЗапросаАвтоподбора(Текст, Новый Структура, Тип("СправочникСсылка.Контрагенты"), 1);
   
   Если НЕ РезультатЗапроса.Пустой() Тогда
       ПроцедурыПоискаПоСтроке.ОкончаниеВводаТекстаВЭлементеУправления(Элемент, Текст, Значение, СтандартнаяОбработка, Новый Структура, ЭтаФорма, Тип("СправочникСсылка.Контрагенты"), мОбработкаПоискаПоСтрокеКонтрагента, мТекстПоискаПоСтрокеКонтрагента, мПоследнееЗначениеЭлементаПоискаПоСтрокеКонтрагента, Ложь);
       Возврат;
   КонецЕсли;
   
   УправлениеКонтактами.РегистрироватьНовогоКонтрагента(Элемент, Текст, Значение, СтандартнаяОбработка, мОбработкаПоискаПоСтрокеКонтрагента, мТекстПоискаПоСтрокеКонтрагента, мПоследнееЗначениеЭлементаПоискаПоСтрокеКонтрагента, ЭтаФорма, Контрагент, Справочники.КонтактныеЛицаКонтрагентов.ПустаяСсылка(), Модифицированность, ДанныеНезарегистрированногоКонтрагента);
   
КонецПроцедуры
8 acsent
 
10.07.12
21:16
а если просто написать
Запись.НаименованиеКонтрагентаПолное = Запись.НаименованиеКонтрагента;
9 Boudybuilder
 
10.07.12
21:19
Думаю что можно но почему в типовой так заумно как в примере (0) ?