Имя: Пароль:
1C
1C 7.7
v7: Заполнение артикула по коду.
,
0 msk-07
 
18.06.13
17:05
Подскажите, как написать такой лёгкий код...Мне нужно у все номенклатуры, чтобы код совпадал с артикулом.... :( Буду очень рад любым советам.
1 ДенисЧ
 
18.06.13
17:11
ммм
как делал? что не получилось?
2 YF
 
18.06.13
17:11
(0) Вот подсказка

Спр.Артикул = Спр.Код;
3 Попытка1С
 
18.06.13
17:15
+2 Спр.Записать()
4 msk-07
 
18.06.13
17:47
Угу, а как начать эту обработку??? плиз..подскажите
5 Ёпрст
 
18.06.13
17:48
(4)
Спр = СоздатьОбъект("Справочник.НужныйВид");
6 ДенисЧ
 
18.06.13
17:49
(5) неправильно
(4) Пуск - программы - 1с-конфигуратор - файл - новый - внешняя обработка
7 msk-07
 
18.06.13
17:49
Сделал :(
8 msk-07
 
18.06.13
17:53
Я дальше не пойму что делать(((( Как цикл оформлять :::(
9 КапЛей
 
18.06.13
17:55
Пока ... Цикл
...............
КонецЦикла;
10 ДенисЧ
 
18.06.13
17:55
Сначала (5)
потом (9)
11 YF
 
18.06.13
17:55
(6) СП кончились? ты же вроде продавал
12 ДенисЧ
 
18.06.13
17:55
(11) тут не сп нужен, а букварь. А букварями я не торгую
13 Csar
 
18.06.13
17:59
За синтаксис не отвечаю вообще... Тут общий смысл из 1С8. Как на семерке будет посомтри в синтаксПомощнике
Что то типа того:

ВыборкаСправочника = Справочники.Номенклатура.Выбрать();
Для Каждого ЭлементСправочника Из ВыборкаСправочника Цикл
 Объект = ЭлементСправочника.ПолучитьОбъект();
 Объект.Артикул = Объект.Код;
 Объект.Записать();
КонецЦикла;
14 Шапокляк
 
18.06.13
18:13
Спр=СоздатьОбъект("Справочник.НужныйСправочник");
Спр.ВыбратьИерархически();
Пока Спр.ПолучитьЭлемент()=1 Цикл

Если Не Спр.ЭтоГруппа Тогда
Спр.Артикул=Спр.Код;
Спр.Записать();
КонецЕсли;
КонецЦикла;

за синтаксис не ручаюсь, на 7-ке 2же лет 5 ничего не делала. Думаю, принцип понятен.
15 КапЛей
 
18.06.13
18:18
(14) поправлю

Спр=СоздатьОбъект("Справочник.НужныйСправочник");
Пока Спр.ПолучитьЭлемент()=1 Цикл

Если Спр.ЭтоГруппа()=1 Тогда
продолжить;
Иначе
Спр.Код=Спр.Артикул;
Спр.Записать();
КонецЕсли;
КонецЦикла;
16 Шапокляк
 
18.06.13
18:22
(15) Спасибо :) Только выбрать элементы все равно как-то надо. Я вот предложила ВыбратьИерархически()
17 КапЛей
 
18.06.13
18:24
(16) блин!!! лоханулся!!!

Спр=СоздатьОбъект("Справочник.НужныйСправочник");
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент()=1 Цикл

Если Спр.ЭтоГруппа()=1 Тогда
продолжить;
Иначе
Спр.Код=Спр.Артикул;
Спр.Записать();
КонецЕсли;
КонецЦикла;
18 KRV
 
18.06.13
18:25
Попытку неплохо бы воткнуть.. с выводом в табло кривых элементов.. например артикул пустой будет или повторяющийся... программысты...
19 YF
 
18.06.13
18:25
(18) Тогда уж и транзакцию
20 KRV
 
18.06.13
18:26
(19) зачем? в чем сакральный смысл?
21 YF
 
18.06.13
18:27
(20) Ну, чтобы получил список плохих, подумал, а потом все поправил, пока не поздно ...

да и кошернее с ней
22 KRV
 
18.06.13
18:28
)) а ТС где?
23 КапЛей
 
18.06.13
18:29
(18,19) судя по (7,8) это совсем для автора китайская грамота на германских знаках. пусть так пробует, вылезет ошибка - поможем.
24 Злопчинский
 
18.06.13
21:07
(2) единица! нужно чтобы код совпадал с артикулом. а не артикул с кодом
25 msk-07
 
08.07.13
11:10
Хорошо, тогда каким оператор определить кол-во букв в строке?
26 Darych
 
08.07.13
11:13
СтрДлина(<?>)
Синтаксис:
СтрДлина(<Строка>)
Назначение:
Возвращает длину строки.
Параметры:
<Строка> - строковое выражение.
27 Mikeware
 
08.07.13
11:14
Может, все-таки найдете программиста?
28 Ork
 
08.07.13
11:14
(25) СтрДлина. Только дляНаЗачем?
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn