helpf.pro
Регистрация
 0 
Распечатать

Чтение(СрезПоследних) и Запись Регистра Сведений подчиненного регистратору(Обработка проведения)

Для чтения данных из регистра сведений необходимо создать новый отбор и воспользоваться методами СрезПервых или СрезПоследних или использовать запрос как показано в примере обработки далее. Пример кода иллюстрирует эти методы:
Код 1C v 8.х
 Отбор = Новый Структура("ТипЦен, Номенклатура");
Отбор.ТипЦен = ТипЦены; // Какой тип цены
Отбор.Номенклатура = Номенклатура; // Для какой номенклатуры
// Цена в регистре сведений до Рабочей даты включительно
Цена = РегистрыСведений.ЦеныНоменклатуры.СрезПоследних( РабочаяДата(), Отбор);


Для записи в подчиненный регистратору регистр сведений Цены номенклатуры 1С использует механизмы проведения, а именно процедуру Обработка Проведения, которые можно сформировать в конфигураторе, используя помощник - конструктор движений:
Код 1C v 8.х
 Процедура Обработка Проведения(Отказ, Режим)
Для Каждого ТекСтрокаТовары Из Товары Цикл
// регистр Цены Номенклатуры
Движение = Движения.ЦеныНоменклатуры.Добавить();
Движение.Период = Дата;
Движение.ТипЦен = ТекСтрокаТовары.ТипЦен;
Движение.Номенклатура = ТекСтрокаТовары.Номенклатура;
Движение.ХарактеристикаНоменклатуры = ТекСтрокаТовары.ХарактеристикаНоменклатуры;
Движение.Валюта = ТекСтрокаТовары.Валюта;
Движение.Цена = ТекСтрокаТовары.Цена;
Движение.ЕдиницаИзмерения = ТекСтрокаТовары.ЕдиницаИзмерения;
Движение.ПроцентСкидкиНаценки = ТекСтрокаТовары.ПроцентСкидкиНаценки;
Движение.СпособРасчетаЦены = ТекСтрокаТовары.СпособРасчетаЦены;
КонецЦикла;
КонецПроцедуры
Разместил:   Версии: | 8.x | 8.2 УП |  Дата:   Прочитано: 22033
 0 
Распечатать
Возможно, вас также заинтересует
Cообщение: "Не удалось удалить чеки ККМ!" 2
Пользователь с правами Администратор ККМ проводит Закрытие кассовой смены (Z). Выходит сообщение: " Не удалось удалить чеки ККМ!" ФР печатает Z -отчет, но Отчет о рознчничных продажах не формируется. Необходимо дать...
Алгоритм шифрования RC4 0
Для решения некоторых задач, иногда требуется имееть возможность шифровать и дешифровывать, какие-то данные. Но при этом нет возможности использовать стороние внешнии компоненты. Предлагаем пример реализации...
Блокировка записей, невозможно изменить или удалить из регистра. Конфликт блокировок MS SQL + 1C 1
При попытке удалить запись из регистра сведений - получаю ошибку: она заблокирована, ошибка блокировок и т.д. Отключил всех пользователей, перезапустил сервер, пробую удалить - опять ошибка блокировки :( Путем тестов...
В учетной политике не указан вид тарифа страховых взносов. Как указать? 0
Создайте новую запись учетной политики с начала года - Например 01.01.2013 В учетной смотрите дату начала учетной политики. Поставьте дату начала года (например 01.01.13) закладка появиться должна. Проверьте Тариф страховых...
В этом периоде очередность проведения не контролировалась 0
Контролировать или нет выбирается в: Сервис - Настройка программы - Контроль проведения Если галка не стоит, то Установить - ОК Если галка уже стоит, то ее Снять - ОК, зайти снова и Установить - ОК
Посмотреть все результаты поиска похожих
Комментарии
E_Migachev
15.09.2010 00:07Комментарий: 4
E_Migachev
akat65, Все уже есть здесь *13
akat65
10.09.2010 19:23Комментарий: 3
akat65
Если можно ещё...
примеры для записи независимых РС.
E_Migachev
01.09.2010 12:20Комментарий: 2
E_Migachev
akat65, Спасибо! Это я опечатался, исправил )
На самом деле лучше сразу писать отбр в выборке:
Код 1C v 8.х
 // Цена в регистре сведений до Рабочей даты включительно
Цена = РегистрыСведений.ЦеныНоменклатуры.СрезПоследних(РабочаяДата, Новый Структура("ТипЦен, Номенклатура", ТипЦен, Номенклатура));
akat65
31.08.2010 21:51Комментарий: 1
akat65
Для чтения данных из регистра сведений ,вместо .....
Отбор = Новый Отбор("ТипЦен, Номенклатура");
Лучше......
Отбор = Новый Структура("ТипЦен, Номенклатура");
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.