[bodka]

Подскажите пожалуйста, почему не работает этот код?

Процедура ПриУстановкеНовогоКода(СтандартнаяОбработка, Префикс)
    Если Родитель = "Товары"  Тогда
            
    Префикс = "ТОВ";
Иначе 
    Префикс = "У";
КонецЕсли;    

    

    

    
    КонецПроцедуры

[pablo]

А как Вы определили, что код не работает?
Хотя можно догадаться, что вы ссылку на родителя сравниваете с наименованием родителя

[bodka]

А как Вы определили, что код не работает?
Хотя можно догадаться, что вы ссылку на родителя сравниваете с наименованием родителя

При создании нового элемента создается с артикулом "У", без разницы в какой группе

При создании нового элемента создается с артикулом "У", без разницы в какой группе

По рукам бы мне дал кто-нибудь... Вот так надо

Процедура ПриУстановкеНовогоКода(СтандартнаяОбработка, Префикс)
            Если Родитель.Наименование = "Товары"  Тогда
    Префикс = "ТОВ";
Иначе 
    Префикс = "У";
КонецЕсли;    
КонецПроцедуры

[Vofka]

По рукам бы мне дал кто-нибудь...

Вот так надо

Так выше вам так и написали. Почему бы не сказать спасибо человеку.

[bodka]

Попробовал немного усложнить

Процедура ПриУстановкеНовогоКода(СтандартнаяОбработка, Префикс)
    
        Если Родитель.Наименование = "АвтоВертолетыГаражи" Тогда
        Префикс = "А";
    ИначеЕсли Родитель.Наименование = "АзбукаЛогикаПирамидкиКубикиКаталки" Тогда
        Префикс = "Аз";
    ИначеЕсли Родитель.Наименование = "БытоваяТехника" Тогда
        Префикс = "Б";
    Иначе 
        СтандартнаяОбработка = Истина;
        КонецЕсли;
КонецПроцедуры

в 1 условии "АвтоВертолетыГаражи" ставится "Аз"
во 2 и 3 все правильно
Стандартная обработка не срабатывает?
Подскажите пожалуйста в чем подвох, хотя когда было только первые два условия, то все работало.

[pablo]

Посмотрите в отладчике

[Flexy]

Стандартная обработка не срабатывает?
Подскажите пожалуйста в чем подвох, хотя когда было только первые два условия, то все работало.

Конечно не срабатывает.Она ведь стоит в блоке Иначе.
По условию отрабатывает блок Если.

[bodka]

Конечно не срабатывает.Она ведь стоит в блоке Иначе.
По условию отрабатывает блок Если.

А почему тогда не срабатывает 1 блок, если я создаю элемент в этой группе, то ставится "Аз".

А почему тогда не срабатывает 1 блок, если я создаю элемент в этой группе, то ставится "Аз".

Изменил префикс для 1 группы на "Г" и по всем группам стало работать правильно... Вот только стандартная обработка не работает?

[Flexy]

Попробуйте так

Процедура ПриУстановкеНовогоКода(СтандартнаяОбработка, Префикс)
    
        Если Родитель.Наименование = "АвтоВертолетыГаражи" Тогда
        Префикс = "А";
    ИначеЕсли Родитель.Наименование = "АзбукаЛогикаПирамидкиКубикиКаталки" Тогда
        Префикс = "Аз";
    ИначеЕсли Родитель.Наименование = "БытоваяТехника" Тогда
        Префикс = "Б";
   КонецЕсли;
КонецПроцедуры

[logist]

Ужас какой... А почему для этих целей нельзя использовать артикул, например?
А что будет если кто-то изменит наименование родителя, не думали? Может логичнее сделать их предопределенными?

[alex040269]

Попробуйте так

Процедура ПриУстановкеНовогоКода(СтандартнаяОбработка, Префикс)
    
        Если Родитель.Наименование = "АвтоВертолетыГаражи" Тогда
        Префикс = "А";
    ИначеЕсли Родитель.Наименование = "АзбукаЛогикаПирамидкиКубикиКаталки" Тогда
        Префикс = "Аз";
    ИначеЕсли Родитель.Наименование = "БытоваяТехника" Тогда
        Префикс = "Б";
   КонецЕсли;
КонецПроцедуры

А если кто-то изменит наименование папки? Что тогда?

[Flexy]

А если кто-то изменит наименование папки? Что тогда?

Я не в курсе.Не проверял.
Как вариант добавить

...
Иначе
СтандартнаяОбработка = Ложь;
Сообщить("Группа не найдена");
Возврат;

Или действительно делать группы предопределенными.

Сообщение отредактировал Flexy - 02.12.11, 17:51

[sava1]

Позволю себе 5 копеек.
Если уж коряжить в конфе - то проще добавить реквизит Префикс
и устанавливать в коде одной строчкой

[Virgo]

Лучше создать Регистр сведений "Префиксы справочников" из двух измерений - "Справочник" и "Префикс". Потом в процедуре установки кода выгружать этот регистр в таблицу значений, отсортировать по убыванию уровня справочника и далее перебором строк проверять на принадлежность родителю и т.о. получить префикс.

[Flexy]

Лучше создать Регистр сведений "Префиксы справочников" из двух измерений - "Справочник" и "Префикс". Потом в процедуре установки кода выгружать этот регистр в таблицу значений, отсортировать по убыванию уровня справочника и далее перебором строк проверять на принадлежность родителю и т.о. получить префикс.

Имхо, автору это сложно будет реализовать.

[alex040269]

Имхо, автору это сложно будет реализовать.

зато полезно. можно взять на заметку и реализовать в будущем. на крайний случай - предопределенные значения и/или запрет изменения.

[sava1]

создать Регистр сведений "Префиксы справочников" из двух измерений - "Справочник" и "Префикс".

Автору нужно изменять префикс в пределах справочника в зависимости от родителя...

[Домовик]

та довідник Номенклатура звісно.


Bodka, уточнюйте у бухгалтерів, для чого їм це, бо побудуєте красивий будинок на піску.

крім того, що Родитель може хтось переіменувати, ще сам елемент (Товар) можна попереміщати по папкам, а якщо будете присвоювати новий префікс в новій папці - конфлікт по унікальності.



Читається алгорим між Найменуванням і префіксом - літери верхнього регістру можна взять. для унікальності щось додумати....+код...чи не поміститься...

[bodka]

Оставил присвоение префикса по родителю...
Запретил создавать и редактировать группы... Пока устраивает...

Процедура ПриЗаписи(Отказ)
    Если ЭтоГруппа Тогда
        Отказ = Истина;
    КонецЕсли;
    
КонецПроцедуры

[logist]

Запретил создавать и редактировать группы... Пока устраивает...

А если надо будет создать или отредактировать группу, Вы полезете временно править конфигурацию?... классное решение ))

Я бы на всякий случай пошел таким путем

Процедура ПриЗаписи(Отказ)
        Отказ = ЭтоГруппа И НЕ РольДоступна("ПолныеПрава");
КонецПроцедуры