Имя: Пароль:
1C
1С v8
Создание элементов справочников
0 sergqwert
 
24.11.16
21:41
Как обработкой создать 50 элементов справочника Номенклатура и 50 элементов справочника единицы измерения?
1 Garykom
 
гуру
24.11.16
21:42
2 суперйцукен
 
24.11.16
21:43
для ном=1 по 50 цикл
3 Garykom
 
гуру
24.11.16
21:45
(2) окромя "цикла Для" в 1С есть еще "цикл Пока" и рекурсия
4 суперйцукен
 
24.11.16
21:47
(3) Судя по формулировке первого поста, рекурсия - явный перебор.
5 Garykom
 
гуру
24.11.16
21:51
(4) Зато как звучит:

%НаСервере
Процедура СоздатьНечто()
   ЕИОбъект = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
   ЕИОбъект.Записать();
   НомОбъект = Справочники.Номенклатура.СоздатьЭлемент();
   НомОбъект.Единица = ЕИОбъект.Ссылка;
   НомОбъект.Записать();
   СоздатьНечто();
КонецПроцедуры
6 Garykom
 
гуру
24.11.16
21:51
(5) блин опечатался &НаСервере
7 trooba
 
24.11.16
21:53
(6) Так более, чем 50. Оверлок.
8 суперйцукен
 
24.11.16
22:55
(7) Не-не, нормально. Главное, не вставлять в код ничего, что может прервать процесс. ТС должно понравиться.
9 Torquader
 
25.11.16
01:24
// Если рекурсия, то, наверное - так:

&НаСервере
Процедура СоздатьЭлемент(СколькоСоздано=1)
Если СколькоСоздано>50 Тогда
  Возврат;
КонецЕсли;
СправочникНоменклатура=Справочники.Номенклатура.СоздатьЭлемент();
СправочникЕдиница=Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
СсылкаНоменклатура=Справочники.Номенклатура.ПолучитьСсылку(Новый УникальныйИдентификатор());
СсылкаЕдиницы=Справочники.ЕдиницыИзмерения.ПолучитьСсылку(Новый УникальныйИдентификатор());
СправочникЕдиница.УстановитьСсылкуНового(СсылкаЕдиница);
СправочникЕдиница.Владелец=СсылкаНоменклатура;
СправочникЕдиница.Записать();
СправочникНоменклатура.УстановитьСсылкуНового(СсылкаНоменклатура);
СправочникНоменклатура.ЕдиницаХраненияОстатков=СсылкаЕдиница;
СправочникНоменклатура.Записать();
СоздатьЭлемент(СколькоСоздано+1);
КонецПроцедуры
10 Torquader
 
25.11.16
01:25
(8) Сколько максимально элементов может быть в справочнике ?
11 Sapiens_bru
 
25.11.16
05:04
(10) Запусти код, узнаешь
Основная теорема систематики: Новые системы плодят новые проблемы.