|
|
Как быстро скопировать данные из одного регистра в другой(регистры одинаковые) |
☑ |
|
0
Alex2411
30.11.11
✎
12:19
|
Добрый день подскажите как средствами 1С БЫСТРО скопировать данные из одного регистра НАКОПЛЕНИЯ в другой, мой код
НаборЗаписи = РегистрыНакопления.ОстаткиТоваровКомпании.СоздатьНаборЗаписей();
Пока выб.Следующий() Цикл
сч = сч + 1;
ЭлементыФормы.Индикатор1.Значение = сч;
//запись регистра
Запис = НаборЗаписи.Добавить();
Запис.Активность = выб.Активность;
Запис.ВидДвижения = выб.ВидДвижения;
Запис.Количество = выб.Количество;
Запис.КоличествоПереоценки = выб.КоличествоПереоценки;
Запис.Контрагент = выб.Контрагент;
Запис.Номенклатура = выб.Номенклатура;
////Запис.НомерСтроки = выб.НомерСтроки;
Запис.Период = выб.Период;
Запис.Регистратор = выб.Регистратор;
Запис.Резерв = выб.Резерв;
Запис.СкладКомпании = выб.СкладКомпании;
Запис.СуммаРозн = выб.СуммаРозн;
Запис.СуммаРознУпр = выб.СуммаРознУпр;
Запис.СуммаСкидки = выб.СуммаСкидки;
Запис.ХарактеристикаНоменклатуры = выб.ХарактеристикаНоменклатуры;
Запис.ХозОперация = выб.ХозОперация;
Запис.Цена = выб.Цена;
//
ЗаписыватьИлиНет = сч/1000 - Цел(сч / 1000);
//
Если ЗаписыватьИлиНет = 0 Тогда
НаборЗаписи.Записать(Истина);
НаборЗаписи = РегистрыНакопления.ОстаткиТоваровКомпании.СоздатьНаборЗаписей();
КонецЕсли;
КонецЦикла;
|
|
|
1
Buster007
30.11.11
✎
12:24
|
НаборЗаписи.Загрузить(РезультатЗапрос.Выгрузить());
...
|
|
|
2
Mort
30.11.11
✎
12:25
|
Записывать надо блоками по регистраторам
|
|
|
3
Alex2411
30.11.11
✎
12:26
|
НаборЗаписи.Загрузить(РезультатЗапрос.Выгрузить()); - а это получится если регистр подчинен Регистратору??
|
|
|
4
EasyRider
30.11.11
✎
12:27
|
Если быстро,то средствами 1с не получится.Все равно по регистраторам придется обходить.
|
|
|
5
DrShad
30.11.11
✎
12:27
|
если набор будет с отбором по регистратору конечно получится
|
|
|
6
DrShad
30.11.11
✎
12:28
|
(4) это почему это?
|
|
|
7
EasyRider
30.11.11
✎
12:28
|
(6)Потому что для набора придется регистратор указывать.
|
|
|
8
DrShad
30.11.11
✎
12:30
|
(7) но ведь все равно не ручками клепать и довольно таки шустренько получится
|
|
|
9
EasyRider
30.11.11
✎
12:30
|
(8)Ну эт конечно смотря что иметь ввиду под "быстро" ))
|
|
|
10
DrShad
30.11.11
✎
12:31
|
(9) и от железа зависеть будет
|
|
|
11
Alex2411
30.11.11
✎
14:42
|
Вообщем объекм большой, регистр самый ходовой и данных за 4,5 года, вообщем пробую и Вам отпишусь о результате
|
|
|
12
hhhh
30.11.11
✎
14:53
|
(11) в транзакциях пробуй. ПО 200-300 регистраторов на одну транзакцию.
|
|
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший