Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- &НаСервере
- Процедура ДобавлениеНовыхТоваровНаСервере()
- ГСЧ=Новый ГенераторСлучайныхЧисел;
- Для Счетчик=1 По 100 Цикл
- Если Счетчик<=25 Тогда
- Группа=Справочники.Номенклатура.НайтиПоНаименованию("Летняя");
- ИначеЕсли Счетчик<=50 Тогда
- Группа=Справочники.Номенклатура.НайтиПоНаименованию("С шипами");
- Иначе
- Группа=Справочники.Номенклатура.НайтиПоНаименованию("Липучки");
- КонецЕсли;
- НовыйТовар=Справочники.Номенклатура.СоздатьЭлемент();
- НовыйТовар.Родитель=Группа;
- НовыйТовар.Наименование="Товар №"+Счетчик;
- НовыйТовар.Склад=Справочники.Склады.Оптовый;
- НовыйТовар.ЦенаЗакупочная=ГСЧ.СлучайноеЧисло(500,2000);
- НовыйТовар.ЦенаПоступления=НовыйТовар.ЦенаЗакупочная*1.2;
- НовыйТовар.Записать();
- КонецЦикла;
- КонецПроцедуры
- &НаКлиенте
- Процедура ДобавлениеНовыхТоваров(Команда)
- ДобавлениеНовыхТоваровНаСервере();
- КонецПроцедуры
Add Comment
Please, Sign In to add comment