Здравствуйте.
У меня комплексная автоматизация. В общем модуле общего назначения есть процедура ПриУстановкеНовогоНомераДляДокументов(), у нас там было
ДобавитьПрефиксУзла(Префикс);

я поменяла на
Попытка
   Если Источник.Организация = Справочники.Организации.НайтиПоКоду("00003") Тогда        
       Если Источник.Подразделение = Справочники.Подразделения.НайтиПоКоду("00020    ")
           Тогда
           Префикс = "СцК";
       ИначеЕсли Источник.Подразделение = Справочники.Подразделения.НайтиПоКоду("КС0000009") Тогда
           Префикс = "СцН";
       ИначеЕсли Источник.Подразделение = Справочники.Подразделения.НайтиПоКоду("КС0000008")  Тогда
           Префикс = "СцТ";
       КонецЕсли;
   Иначе    
       ДобавитьПрефиксУзла(Префикс);
   КонецЕсли;
Исключение
   ДобавитьПрефиксУзла(Префикс);
КонецПопытки;

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

а что не так-то? ну мне надо префикс менять в зависимости от подразделения

рукалицо...

(0) О май гад...

(0) Может прописать префикс в справочник "Подразделения"?

+(3) И получать его запросом

(3) прав


немного копроускорить можно так:

Организация00003 = XMLЗначение(Тип("СправочникСсылка.Организации"), "ТутУидОрганизацииСКодом00003"); // тут комментарий о том, что это за организация
... // тут остальные те, что НайтиПоКоду
Если Источник.Организация = Организация00003 Тогда
...

+(4) Или вообще "зашить" префикс в код подразделения (например, последние 3 символа, или первые три символа, или вообще код будет префиксом подразделения - он, префикс, все равно ведь уникальный).

(5) КАК ЭТО РАЗВИДЕТЬ??!

(7) "РАЗ" что?

(7) что, ускорение и независимость от кода непредопределенных данных не затрагивающее конфу. по хорошему, конечно, допреквизит/атрибут к подразделению надо, о чем я прямо сразу и написал.

(9) Нафиг доп реквизит. Зашить префикс в код и не париться - доступно и на сервере и на клиенте, получается из базы элементарно, прям со ссылкой в комплекте уже идет.

(10) а вдруг там еще 100500 мест с "найтипокоду" и если код поменять - все развалится?

(9) Натрибуквы тут XML?
Ну и куда побежишь, когда будет все то же самое, но в другой базе, где ВНЕЗАПНО другой идентификатор?

(11) Так то ты прав. Но ИМХО лучше найти глобально все эти "найтипокоду" и заменить на нормальные конструкции.
Для данного примера работать будет вот так:

Префикс = Источник.Подразделение.Код

Тормоза тут ИМХО идут как раз из-за строчек подобных
Если Источник.Подразделение = Справочники.Подразделения.НайтиПоКоду("00020    ")

А вообще надо начать с расстрела кодера, который все это написал.

(12) ну, оно работает сильно быстрее, чем найтипокоду. будет ОбъектНеНайден, да.

> (13) Префикс = Источник.Подразделение.Код

Получение реквизита через точку - садись, два.

(15) И сильно быстрее, чем ПолучитьСсылку, да?
Хотя что то, что то - это лютый, леденящий душу, невыразимый пипец

(16) Ну запросом получай, кто мешает

сделал замер

(19) И как?

(17) чем получитьссылку - сейчас добавлю в замер

Запрос = Новый Запрос;
Запрос.Текст = "
|ВЫБРАТЬ ПЕРВЫЕ 1
|    Организации.Код,
|    Организации.Ссылка
|ИЗ
|    Справочник.Организации КАК Организации
|ГДЕ
|    НЕ Организации.ЭтоГруппа";
Выборка = Запрос.Выполнить().Выбрать();
Выборка.Следующий();
Код = Выборка.Код;
УИД = XMLСтрока(Выборка.Ссылка);

Повторов = 10000;

ТекДата = ТекущаяДата();
Пока ТекущаяДата() = ТекДата Цикл
   // ждем начала секунды, чтобы снизить погрешность;
КонецЦикла;
ТекДата = ТекущаяДата();
Для Сч = 1 По Повторов Цикл
   Орг = Справочники.Организации.НайтиПоКоду(Код);
КонецЦикла;
Сообщить("По коду: " + (ТекущаяДата()-ТекДата));

ТекДата = ТекущаяДата();
Пока ТекущаяДата() = ТекДата Цикл
   // ждем начала секунды, чтобы снизить погрешность;
КонецЦикла;
ТекДата = ТекущаяДата();
Для Сч = 1 По Повторов Цикл
   Орг = XMLЗначение(Тип("СправочникСсылка.Организации"), УИД);
КонецЦикла;
Сообщить("По уиду: " + (ТекущаяДата()-ТекДата));

ТекДата = ТекущаяДата();
Пока ТекущаяДата() = ТекДата Цикл
   // ждем начала секунды, чтобы снизить погрешность;
КонецЦикла;
ТекДата = ТекущаяДата();
Для Сч = 1 По Повторов Цикл
   Орг = Справочники.Организации.ПолучитьСсылку(Новый УникальныйИдентификатор(УИД));
КонецЦикла;
Сообщить("ПолучитьСсылку: " + (ТекущаяДата()-ТекДата));

По коду: 47
По уиду: 0
ПолучитьСсылку: 0

убираем по коду, увеличиваем итерации в 100 раз:

По уиду: 21
ПолучитьСсылку: 27

если вынести из цикла тип(), то
По уиду: 16
ПолучитьСсылку: 27

почему ни кто не посоветовал быдло ускорение?


Если Источник.Организация.Код = "00003" Тогда        
  Если Источник.Подразделение.Код = "00020    " Тогда
     Префикс = "СцК";

Defender aka LINN разрыдался и ушел в отшельники

(26) это считывает объект, возможно не быстрее

(27) Не вижу
http://www.forum.mista.ru/ban_list.php

(0) вас уволить нужно, за решение НайтиПоКоду... вы сколько времени учились? копейку в себя вложили? чтобы потом зарабатывать?

(29) Так лучше?

(31) Если бы я себя по пьяни баним, то многим людям бы не помог.

Нет — не лучше.

(32) Это печально ©

я плакаю...

"Если жизнь печальна, она не заслуживает даже называться жизнью." Эразм Роттердамский.

"Никто из нас не говорит, живя без бед, что счастием своим судьбе обязан он; когда же к нам заботы и печаль придут, готовы мы сейчас во всем винить судьбу." Филет Косский

"Печальна судьба человека, который смотрит на жизнь с высоты своих несчастий." Н.Голубов

"Жизнь по преимуществу печальна. А сразу потом умираешь"  Януш Леон Вишневский

(0) ещё никто не писал, что это ужасно?

Параметры сеанса еще не предлагали ?

+ И регистр сведений - что типа произвольных параметров.

(36) гугл "Отрезал себе член и умер от потери крови"

(39) это был риторический вопрос )

злые вы, девушку зря обижаете. Видно же что 7шница

Надеюсь Лиза уже забыла про свой вопрос.

(42) тем более, что даже переделывать ничего не надо было )

о май гад!!!

(44) oh my God было Помогите сделать конфигурацию тут. Человек выкинул от коллекторской конторы базу на 1300 человек по башкортостану на 173 с копейками миллиона.

(28) тебя ждали

(47) вы о чём спорите? в КА для префиксов точно всё сделано, как и в УПП, и в УСО

(49) [email protected]

(48) Если такой разносторонне образованный - пожалуйста ответь мне здесь v8: Документооборот КОРП для Украины

+(47) промахнулся, это я (26)

(46) видимо у них на собеседовании обязательное условие было - всё время быть обдолбанным )

(50) Про меня все ясно, никогда не скрывался

(47) кто ждал? где ждал?

(51) я хз какой документооборот на Украине, посмотри в личку )

(55) см (52) )

Нафиг личку, если шариш пиши на емыл. Можно заработать.

(58) хорошо, напишу тут: Самара, Россия )

(30)(36) что ж вы сразу "уволить", вы же тоже не сразу умным стали. Я вот потому и задала вопрос, что не знаю как такой код оптимизировать. Я вот не знала, что НайтиПоКоду это тормоз. Хотя стараюсь запросы использовать, так как это быстрее, но тут вот что-то не додумалась.
"Ужасно" наверное почти все сначала программировали, но потом научились.
(13) надо же я вот так не догадалась, попробую так.
Спасибо всем добрым людям, которые пытались помочь и подсказали!

(41) А что, в семерке так принято писать?
А пустые циклы от одного до миллиона - там вставлять не принято?

(60) Зачем что-то находить, если можно тупо в условии сравнить код?

(61) я на 7-ке не пишу давно. Я на 8-ке пишу

(63) ты сеййчас в какой краске ?

(63) Лучше на сап уйди...

+(65) или замуж

(61) не. в семерке не было предопределенных элементов. виде не раз когда служебные справочники так юзали через найти по коду.

(67) были,ввидеглабльных пермененных

(60) ""Ужасно" наверное почти все сначала программировали, но потом научились. " в 99% так и есть, только фиг кто признается)
а найти по коду - это тот же запрос, таким образом в (0) у тебя 4 маленьких запроса в каждом документе

(68) тем не менее были. кстати не только как глобальные переменные)

(67) В семерке грамотные люди заводили отдельный справочник для подобных вещей.
Ну главное что не по наименованию... По коду еще ничего))

(71) ну так и искали по коду.

жаль не осталось ни одной семерочной базы - там такого было много

(73) выкладывать бдгазпрома ? =)

(74) давай

(74) Номенклатура "Газ", код "0001"?

(76) ну ту сподручнее в константу если газ один, правда если у них газы то печаль

ну вот, девачка просто помощи хотела, а тут все такие злобные и еще какими-то константами пугают. Стыдно должно быть

на старомхарде =)

(67) там есть константы, и если и искали - то никак не в этом случае.
Зачем тут искать элемент? Тут реквизит в справочнике завести надо. А если без изменения - то просто сравнить код.

(80) "там есть константы" - констант на все не хватит. Но я не о этом случае

(0)Давай будем честными. Код в (0) вообще работает? Ну если не считать тормозов?

(82) работает, если не считать тормозов ))

(78) спасибо за поддержку!

А не проще ли сляпать регистр сведений, где задать префиксы для подразделений ?

Лиза777, когда нужно сделать связи между 2-мя справочниками, (спр-спр), или (спр-число) и прочие пользовательские соответствия, лучше всего подходят регистры сведений. При желании, можно сделать регистр сведений периодическими, и в нем будут вся история изменений.
Например для вашей задачи:
1.    Создайте регистр сведений «ПрефиксыПодразделенийОрганизаций» : 2 измерения («Организация»{спр.организаций.ссылка}, {«Подразделение» спр.подразделений.ссылка}): 1 ресурс («Префикс»{строка} )
2.    Получаете значение префикса по организации и подразделению (Не нужно объяснят как?)
3.    НО обязательно проверяйте, если в регистре нет такой комбинации, тогда выполняется стандартный ДобавитьПрефиксУзла(Префикс);

(86) ну да мне ваш вариант понятен, пока сделаю как в (26), завтра посмотрю как будет программа работать под нагрузкой

(83) А мне кажется либо не весь код приведен, либо в случае организации с кодом "00003" префикс узла не добавится, т.к. в этой ветке условия нет ДобавитьПрефиксУзла(Префикс);

(88) думаю ошибки нет, ведь смысл в том, чтобы менять значение переменной "Префикс".

Про борщ уже кто-то писал?