|
ПОМОГИТЕ С добавкой в 1С Ø (andrewks 08.08.2011 16:01) | ☑ | ||
---|---|---|---|---|
0
Blakangelos
08.08.11
✎
15:34
|
Нужно сделать в выборке процедуру чтобы к всей номенклатуре добавилась 1.
как это сделать? |
|||
1
Jstunner
08.08.11
✎
15:34
|
круто
|
|||
2
Астероид
08.08.11
✎
15:35
|
жаль что нет более крупного шрифта, да?
|
|||
3
Дикообразко
08.08.11
✎
15:35
|
например, программным кодом
|
|||
4
Варвар
08.08.11
✎
15:35
|
Количество+1
|
|||
5
andrewks
08.08.11
✎
15:35
|
чо?
|
|||
6
Greeen
08.08.11
✎
15:35
|
1) делаем выборку номенклатуры
2) прибавляем 1 3) сохраняем элемент 4)... 5)PROFIT! |
|||
7
Blakangelos
08.08.11
✎
15:35
|
а кодом можно?
|
|||
8
Jstunner
08.08.11
✎
15:36
|
сначала, включаем мозг
|
|||
9
Salvador Limones
08.08.11
✎
15:36
|
Получи объект
|
|||
10
palpetrovich
08.08.11
✎
15:36
|
(0) "1" к Наименованию что-ли?
|
|||
11
Blakangelos
08.08.11
✎
15:36
|
да
|
|||
12
Ненавижу 1С
гуру
08.08.11
✎
15:36
|
Номенклатура++;
|
|||
13
Blakangelos
08.08.11
✎
15:37
|
Процедура Добавка()
А=Справочники.Номенклатура.Выбрать(); Для каждого В=А.Следующий Из Цикл Получить; КонецЕсли; С.Записать(); КонецПроцедуры это набросок |
|||
14
Ненавижу 1С
гуру
08.08.11
✎
15:37
|
(13) и что я должен с ним сделать?
|
|||
15
rs_trade
08.08.11
✎
15:38
|
(13) Это набросок! Что же будет дальше о_О
|
|||
16
Варвар
08.08.11
✎
15:38
|
Процедура Добавка()
А=Справочники.Номенклатура.Выбрать(); Для каждого В=А.Следующий Из Цикл ПолучитьПлюсАдын; КонецЕсли; С.Записать(); КонецПроцедуры Вот так пробуй. |
|||
17
Jstunner
08.08.11
✎
15:38
|
(13) выбрось этот набросок
|
|||
18
Blakangelos
08.08.11
✎
15:38
|
можешь с нуля
|
|||
19
andrewks
08.08.11
✎
15:39
|
(13)(16) syntax error detected! press any key to continue...
|
|||
20
Рэйв
08.08.11
✎
15:39
|
(16)
>Для каждого В=А.Следующий Из Цикл ...Вынос мозга... |
|||
21
ssh2006
08.08.11
✎
15:39
|
Да, начни с нуля.
|
|||
22
Варвар
08.08.11
✎
15:39
|
(19) какой релиз у тебя? У меня всё работает.
|
|||
23
evgen2011
08.08.11
✎
15:39
|
это полный абздец...
|
|||
24
Blakangelos
08.08.11
✎
15:39
|
8.2
Варвар неправильно |
|||
25
rs_trade
08.08.11
✎
15:40
|
(0) Добавки кстати, это в столовой.
|
|||
26
Greeen
08.08.11
✎
15:40
|
(7)Само собой, можно =)
Спр = СоздатьОбъект("Справочник.Номенклатура"); Спр1 = СоздатьОбъект("Справочник.Номенклатура"); Спр.ВыбратьЭлементы(0); Пока Спр.ПолучитьЭлемент() = 1 Цикл Если Спр.ЭтоГруппа()= 1 Тогда Продолжить; КонецЕсли; Спр1.НайтиЭлемент(Спр.ТекущийЭлемент()); Спр1.<какой то реквизит> = Спр1.<какой то реквизит> + 1; Спр1.Записать(); КонецЦикла; |
|||
27
Дикообразко
08.08.11
✎
15:40
|
(19)
- сделай выборку (перебор) справочника номенклатуры в выборке: - получи объект - меняй наименование - запиши измененный объект |
|||
28
Варвар
08.08.11
✎
15:41
|
(24) как это неправильно если у меня работает?
|
|||
29
Blakangelos
08.08.11
✎
15:42
|
Нужно всем наименованиям в справочнике добавить 1
|
|||
30
Greeen
08.08.11
✎
15:42
|
*facepalm*
|
|||
31
salvator
08.08.11
✎
15:42
|
Тебе кто такие задания дает-то?
|
|||
32
ВераТ
08.08.11
✎
15:42
|
(26) че это???
|
|||
33
Blakangelos
08.08.11
✎
15:43
|
поправка в справочнике.Номенклатура
|
|||
34
Шапокляк
08.08.11
✎
15:43
|
(32) Это кунсткамера.
|
|||
35
Blakangelos
08.08.11
✎
15:43
|
Нужно всем наименованиям в справочнике.номенклатура добавить 1
|
|||
36
palpetrovich
08.08.11
✎
15:43
|
(32) семерка конечно-же :)
|
|||
37
Blakangelos
08.08.11
✎
15:44
|
8.2
|
|||
38
palpetrovich
08.08.11
✎
15:44
|
+36 ой, там не семерка, там (34) :))
|
|||
39
salvator
08.08.11
✎
15:44
|
(37) Ты тугодум? Тебе уже в (27) ответили
|
|||
40
andrewks
08.08.11
✎
15:44
|
(32) это смесь 7-ки и 8-ки, усердно сдобренная обфускацией
|
|||
41
Шапокляк
08.08.11
✎
15:45
|
(35) Напиши запрос по всему справочнику Номенклатура.
При обработке результата запроса получай объект каждой ссылки и извращайся с наименованием, после чего записывай. В чем проблема? |
|||
42
Blakangelos
08.08.11
✎
15:45
|
кодом просил
|
|||
43
palpetrovich
08.08.11
✎
15:45
|
(37) о_О ...может еще и управляемые формы?
|
|||
44
Варвар
08.08.11
✎
15:45
|
(36)/*гнусаво*/ вот и выросло покаление адинэснигов которые не видели клюшки :)
|
|||
45
rs_trade
08.08.11
✎
15:45
|
(35) это тебе задачка для обучения. пример простой. иди книжки читай.
|
|||
46
Maxus43
08.08.11
✎
15:45
|
пятнично как
|
|||
47
palpetrovich
08.08.11
✎
15:46
|
(41) а зачем запрос, если все-равно получать объект?
|
|||
48
Варвар
08.08.11
✎
15:46
|
(40) где там из 8-ки?
|
|||
49
andrewks
08.08.11
✎
15:46
|
(47) из-за двух-трёх объектов будешь теперь всю таблицу по сети тягать?
|
|||
50
Blakangelos
08.08.11
✎
15:47
|
Процедура Добавка()
А = Справочники.Номенклатура.Выбрать(); Для каждого В = А.Следующий Из Цикл Получить(); КонецЕсли; С.Записать(); КонецПроцедуры это нужно доработать |
|||
51
andrewks
08.08.11
✎
15:47
|
(48) она там, между строк
|
|||
52
palpetrovich
08.08.11
✎
15:47
|
(48) КонецЕсли; КонецПроцедуры
|
|||
53
ВераТ
08.08.11
✎
15:47
|
(51) там вообще кал какой-то :)))))
|
|||
54
palpetrovich
08.08.11
✎
15:48
|
(47) дык, ему-же все нужно
|
|||
56
zbv
08.08.11
✎
15:48
|
развод ?
|
|||
57
Blakangelos
08.08.11
✎
15:49
|
нет.серьезно нужно, не могу решить
|
|||
58
Варвар
08.08.11
✎
15:49
|
(50) я тебе уже доработал!
|
|||
59
Рэйв
08.08.11
✎
15:49
|
(50)
А = Справочники.Номенклатура.Выбрать(); Пока А.Следующий()Цикл Об=А.ПолучитьОбъект(); Об.Наименование=Об.Наименование+"1"; Об.Записать(); КонецЕсли; как то так. Для неуправляемых форм. Для урпавляемых надо деить вызовый на сервер |
|||
60
ВераТ
08.08.11
✎
15:49
|
(50) я фигею... а вообще в (27) последовательность написана. Все уже разжевали. видимо все хотят, чтобы Вы чуточку напряглись и написали уже буковки сами
|
|||
63
andrewks
08.08.11
✎
15:51
|
всё, не мешайте, автор щас пол-часика подумает, и сделает сам, как настоящий начинающий программер
|
|||
64
Варвар
08.08.11
✎
15:52
|
(59) закрытие цикла КонецЕсли - это заразно от (0) :)
|
|||
65
ВераТ
08.08.11
✎
15:52
|
(63) чего думать, в (59) уже код выложен
|
|||
66
ВераТ
08.08.11
✎
15:52
|
(64) опечатка :)
|
|||
67
Рэйв
08.08.11
✎
15:53
|
(64)У меня эта болезнь уже лет 10:))
|
|||
68
palpetrovich
08.08.11
✎
15:53
|
+(64) и еще, вполне может оказаться что задачка из (0) этим кодом не решится :)
|
|||
70
Варвар
08.08.11
✎
15:54
|
(66) ага, по типу что значит абревиатура тдм? Слов х@# c тремя ошибками :)
|
|||
71
palpetrovich
08.08.11
✎
15:54
|
(70) хлеб?
|
|||
72
Рэйв
08.08.11
✎
15:55
|
(70)Еще бывает вариации после Пока ставить Тогда:)
|
|||
75
Рэйв
08.08.11
✎
15:57
|
"он слишком много не знал..."
:-) |
|||
76
zbv
08.08.11
✎
15:57
|
(74) наверное, что-то интересное было в (61)
|
|||
77
PVV65
08.08.11
✎
15:58
|
(76) и в (62)
|
|||
78
andrewks
модератор
08.08.11
✎
15:59
|
хватит флудить. здесь вам не тут, пятница давно закончилась
|
|||
79
Maxus43
08.08.11
✎
15:59
|
в (61) ничего интересного. обозвал лентяями добрых людей
|
|||
80
palpetrovich
08.08.11
✎
15:59
|
(79) :))))
|
|||
81
palpetrovich
08.08.11
✎
16:00
|
(78) а, вон он че, Михалыч, вон оно че...
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |