|
Регистр сведений быстро провести | ☑ | ||
---|---|---|---|---|
0
BujiMuji
11.10.15
✎
09:58
|
есть Регистр сведений подчиненный регистратору
как быстро провести? Движения.БазаПриход.Записывать = Истина; Для Каждого ТекСтрокаПриход Из Приход Цикл НоваяЗаписьОптом = РегистрыСведений.ОптомФоиз.СоздатьМенеджерЗаписи(); НоваяЗаписьДона = РегистрыСведений.ДонаФоиз.СоздатьМенеджерЗаписи(); НоваяЗаписьЙул = РегистрыСведений.ЙулФоизи.СоздатьМенеджерЗаписи(); Движение = Движения.БазаПриход.Добавить(); Движение.Период = Дата; Движение.Контрагент = Контрагент; Движение.Товар = ТекСтрокаПриход.Товар; Движение.Количество = ТекСтрокаПриход.Микдори; Движение.ЖамиСумма = ТекСтрокаПриход.ЖамиСум; Движение.ЖамиДоллар = ТекСтрокаПриход.ЖамиДоллар; Движение.ЖамиЮань = ТекСтрокаПриход.ЖамиЮань; Движение.СуммаДоллар = ТекСтрокаПриход.СуммаДоллар; Движение.СуммаЮань = ТекСтрокаПриход.СуммаЮань; Движение.ЙулФоизи = ТекСтрокаПриход.ЙулФоизи; Движение.КелибТушишНархиСум = ТекСтрокаПриход.КелибТушишНархиСум; Движение.КелибТушишНархиДоллар = ТекСтрокаПриход.КелибТушишНархиДоллар; Движение.ОптомФоиз = ТекСтрокаПриход.ОптомФоиз; Движение.ОптомНархСум = ТекСтрокаПриход.ОптомНархСум; Движение.ОптомНархДоллар = ТекСтрокаПриход.ОптомНархДоллар; Движение.ДонаФоиз = ТекСтрокаПриход.ДонаФоиз; Движение.ДонаНархСум = ТекСтрокаПриход.ДонаНархСум; Движение.ДонаНархДоллар = ТекСтрокаПриход.ДонаНархДоллар; Движение.ЭскиДонаНархСум = ТекСтрокаПриход.ЭскиДонаНархСум; Движение.ЭскиДонаНархДоллар = ТекСтрокаПриход.ЭскиДонаНархДоллар; Движение.Изох = ТекСтрокаПриход.Изох; Движение.Карзга = ТекСтрокаПриход.Карзга; |
|||
1
Cyberhawk
11.10.15
✎
10:04
|
Пользоваться набором записей, а не менеджером записи
|
|||
2
BujiMuji
11.10.15
✎
11:59
|
(1) Запрос = Новый Запрос;
Запрос.Текст = " |ВЫБРАТЬ | КиримПриход.Ссылка.Контрагент КАК Контрагент, | КиримПриход.Товар, | КиримПриход.Микдори, | КиримПриход.СуммаДоллар, | КиримПриход.СуммаЮань, | КиримПриход.ЙулФоизи, | КиримПриход.КелибТушишНархиСум, | КиримПриход.КелибТушишНархиДоллар, | КиримПриход.ОптомФоиз, | КиримПриход.ОптомНархСум, | КиримПриход.ОптомНархДоллар, | КиримПриход.ДонаФоиз, | КиримПриход.ДонаНархСум, | КиримПриход.ДонаНархДоллар, | КиримПриход.ЭскиДонаНархСум, | КиримПриход.ЭскиДонаНархДоллар, | КиримПриход.Изох, | КиримПриход.Карзга, | КиримПриход.ЖамиЮань, | КиримПриход.ЖамиДоллар, | КиримПриход.ЖамиСум |ИЗ | Документ.Кирим.Приход КАК КиримПриход |ГДЕ | КиримПриход.Ссылка = &Ссылка"; Запрос.УстановитьПараметр("Ссылка", ЭтотОбъект.Ссылка); РезультатЗапроса = Запрос.Выполнить().Выгрузить(); НаборЗаписей = РегистрыСведений.БазаПриход.СоздатьНаборЗаписей(); НаборЗаписей.Отбор.Период.Установить(ЭтотОбъект.Дата); НаборЗаписей.Прочитать(); НаборЗаписей.Загрузить(РезультатЗапроса); НаборЗаписей.Записать(); можно так? |
|||
3
RomanYS
11.10.15
✎
12:05
|
Отбор должен быть по регистратору,
Прочитать() - лишнее, можно добавить "НаборЗаписей.ОбменДанными.Загрузка=Истина;" |
|||
4
RomanYS
11.10.15
✎
12:06
|
Это модуль проведения или внешний (обработка и т.п.)?
|
|||
5
BujiMuji
11.10.15
✎
12:07
|
(3) выдает ошибку
Ошибка записи! Не установлен отбор по регистратору (регистр сведений: базаПриход) |
|||
6
BujiMuji
11.10.15
✎
12:08
|
(4) Модуль проведения
|
|||
7
jurassic
11.10.15
✎
12:12
|
(5) внезапно
|
|||
8
BujiMuji
11.10.15
✎
12:19
|
ВСЕ РАБОТАЕТ
Запрос = Новый Запрос; Запрос.Текст = " |ВЫБРАТЬ | КиримПриход.Ссылка.Контрагент КАК Контрагент, | КиримПриход.Ссылка.Дата КАК Период, | КиримПриход.Товар, | КиримПриход.Микдори КАК Количество, | КиримПриход.СуммаДоллар, | КиримПриход.СуммаЮань, | КиримПриход.ЙулФоизи, | КиримПриход.КелибТушишНархиСум, | КиримПриход.КелибТушишНархиДоллар, | КиримПриход.ОптомФоиз, | КиримПриход.ОптомНархСум, | КиримПриход.ОптомНархДоллар, | КиримПриход.ДонаФоиз, | КиримПриход.ДонаНархСум, | КиримПриход.ДонаНархДоллар, | КиримПриход.ЭскиДонаНархСум, | КиримПриход.ЭскиДонаНархДоллар, | КиримПриход.Изох, | КиримПриход.Карзга, | КиримПриход.ЖамиЮань, | КиримПриход.ЖамиДоллар, | КиримПриход.ЖамиСум |ИЗ | Документ.Кирим.Приход КАК КиримПриход |ГДЕ | КиримПриход.Ссылка = &Ссылка"; Запрос.УстановитьПараметр("Ссылка", ЭтотОбъект.Ссылка); РезультатЗапроса = Запрос.Выполнить().Выгрузить(); НаборЗаписей = РегистрыСведений.БазаПриход.СоздатьНаборЗаписей(); НаборЗаписей.Отбор.Регистратор.Установить(Ссылка); НаборЗаписей.ОбменДанными.Загрузка=Истина; НаборЗаписей.Загрузить(РезультатЗапроса); НаборЗаписей.Записать(); |
|||
9
Cyberhawk
11.10.15
✎
12:21
|
(8) Пожалуйста
|
|||
10
RomanYS
11.10.15
✎
12:41
|
(6) тогда логичнее использовать Движения.БазаПриход,
//НаборЗаписей = РегистрыСведений.БазаПриход.СоздатьНаборЗаписей(); //НаборЗаписей.Отбор.Регистратор.Установить(Ссылка); //НаборЗаписей.ОбменДанными.Загрузка=Истина; //НаборЗаписей.Загрузить(РезультатЗапроса); //НаборЗаписей.Записать(); НаборЗаписей = Движения.БазаПриход; НаборЗаписей.Загрузить(РезультатЗапроса); НаборЗаписей.Записывать = Истина; |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |