|
v7: Есть ли обработка | ☑ | ||
---|---|---|---|---|
0
vqwy
26.04.12
✎
08:33
|
В яндексе забанили. В семерке не разбираюсь. Бащка не работает.
Подскажите обработку (готовую) для 7.7, чтобы присваивала реквизиту (Инв.номер) префикс, причем только для элементов одной группы. Сейчас есть одна, но она для всего справочника. |
|||
1
zak555
26.04.12
✎
08:43
|
долго писать ?
|
|||
2
vqwy
26.04.12
✎
09:00
|
нужна срочно
писать некогда) |
|||
3
vqwy
26.04.12
✎
09:01
|
готов отдать умеренное бабло за готовую
|
|||
4
KRV
26.04.12
✎
09:03
|
интересно: потянет ветка 1000 постов?
|
|||
5
vqwy
26.04.12
✎
09:03
|
(4) не потянет
|
|||
6
Гефест
26.04.12
✎
09:08
|
Бащка чинить чтоб хотя бы конфигурацию и название справочника назвать
|
|||
7
vqwy
26.04.12
✎
09:09
|
(6) Спасыба, таварисч!
ББУ 7.7 справочник ОС, НМА и НПА |
|||
8
Он
26.04.12
✎
10:00
|
999 руб.
|
|||
9
zak555
26.04.12
✎
10:00
|
1500
|
|||
10
povar
26.04.12
✎
10:04
|
9000 руб., половина твоя
|
|||
11
Он
26.04.12
✎
10:04
|
(9) Да ладно.
1 реквизит на форму + пару строчек кода. Жадный ты. Я вот ещё рублик скину и заказ мой. |
|||
12
DeiMos
26.04.12
✎
10:06
|
ИМХО, справедливая цена на эту работу - 300 рублей (закинуть на телефон или веб-мани).
Но за срочность - 500. (Я не подряжаюсь сделать, я просто размышляю вслух) |
|||
13
ДенисЧ
26.04.12
✎
10:08
|
За срочность - 10 000 рублей
+конфигурация с тебя |
|||
14
Он
26.04.12
✎
10:09
|
(13) +карандаш
|
|||
15
Boroda
26.04.12
✎
10:15
|
(11) префикс пропишу прямо в коде, + 2 строчки кода = минус еще рубль.. :)
|
|||
16
Он
26.04.12
✎
10:18
|
(15) Хитрый. А потом, если другая группа понадобится - опять к тебе.
Ну ты прям как жадный франь себя ведёшь. |
|||
17
Boroda
26.04.12
✎
10:45
|
Ну так что? Можно уже подсказать? :) Все равно ветка тонет...
|
|||
18
155153144627
26.04.12
✎
10:57
|
Процедура Сформировать()
Спр = СоздатьОбъект("Справочник.ОсновныеСредства"); Спр.НайтиЭлемент("Код группы"); Префикс = "Симаволы перефикса"; Группа = Спр.ТекущийЭлемент(); Спр.ВыбратьЭлементы(); Пока Спр.ПолучитьЭлемент() = 1 Цикл Если спр.ПринадлежитГруппе(Группа) Тогда Спр.Код = Префикс + Сред(Спр.Код,СтрДлина(Префикс)); КонецЕсли; КонецЦикла; КонецПроцедуры |
|||
19
vqwy
26.04.12
✎
10:59
|
т.е. готовой на ИС или еще где-то, чтобы скачать, - нету?
|
|||
20
155153144627
26.04.12
✎
10:59
|
Процедура Сформировать()
Спр = СоздатьОбъект("Справочник.ОсновныеСредства"); Спр.НайтиЭлемент("Код группы"); Префикс = "Символы префикса"; Группа = Спр.ТекущийЭлемент(); Спр.ВыбратьЭлементы(); Пока Спр.ПолучитьЭлемент() = 1 Цикл Если спр.ПринадлежитГруппе(Группа) Тогда Спр.Код = Префикс + Сред(Спр.Код,СтрДлина(Префикс)+1); КонецЕсли; КонецЦикла; КонецПроцедуры |
|||
21
Boroda
26.04.12
✎
11:04
|
Готовая обработка - UChoice. :)
Даже 2-х строк кода писать не надо. С бухгалтерией уже давно не работаю, а тут решил посмотреть тип реквизита "инв.номер", так это просто поле "код" для справочник ОС! В стандарном наборе обработок есть пункт "Перенумерация кодов". |
|||
22
пипец
26.04.12
✎
11:06
|
проще на группу добавить реквизит и если принадлежит группе то реквизит в префикс
|
|||
23
пипец
26.04.12
✎
11:07
|
а за Спр = СоздатьОбъект("Справочник.ОсновныеСредства");
Спр.НайтиЭлемент("Код группы"); - за ето нада бить |
|||
24
Boroda
26.04.12
✎
11:10
|
добавлю: Еще и "Записать()" забыл.
|
|||
25
155153144627
26.04.12
✎
11:11
|
(23) Я не поэт скажу стихами, "..."
(25) Да. |
|||
26
Он
26.04.12
✎
11:13
|
(18) Мдяяя.
|
|||
27
Он
26.04.12
✎
11:15
|
(25) Дык забудь 1С и займись стихоплётством
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |