Установим периодич­ность этого регистра в пределах секунды. Создание периодического регистра сведений

Цены

Создание периодического регистра сведений

Наряду с возможностью ис­пользования в режиме подчинения регистратору (когда записи ре­гистра сведений «привязаны» к документу-регистратору) регистр сведений может применяться и в независимом режиме, в котором пользователю предоставляется полная свобода интерактивной ра­боты с данными регистра.

Регистр сведений, не использующий подчинение регистратору, называют независимым регистром све­дений.

Приступим к созданию периодического регистра сведений, ко­торый будет хранить развернутые во времени розничные цены ма­териалов и стоимости услуг, оказываемых предприятием.

Откроем конфигуратор и создадим новый объект конфигура­ции Регистр сведений. Назовем его Цены.

Перейдем на закладку Данные и создадим измерениерегист­ра Номенклатура с типом СправочникСсылка.Номенклатура.

Укажем, что это измерение будет ведущим (рис 1.1).

Рис. 1.1. Создадим измерение Номенклатура и укажем, что оно будет ведущим

Свойство Ведущее имеет смысл использовать лишь тогда, когда измерение имеет тип ссылки на объект базы данных.

Уста­новка свойства Ведущее будет говорить о том, что записьрегистра сведенийпредставляет интерес, пока существует этот объект.

При удалении объекта, все записи регистра сведений по этому объек­ту тоже будут автоматически удалены.

Кроме того, в форме списка справочника появляетсякнопка командной панели Перейти.

По ней возможен переход к записям регистра, отобраннымпо значению вы­бранного элемента справочника.

После этого создадим новый ресурс Цена, тип Число, длина 15, точность 2, неотрицательное.

Запустим 1С:Предприятие в режиме отладки и посмот­рим, как работает наш периодический регистр сведений Цены.

Зададим стоимость услуг предприятия следую­щим образом (рис. 1.2).

Рис. 1.2. Регистр сведений Цены

После этого зададим розничные цены на материалы (рис. 1.3).

Рис. 1.3. Регистр сведений Цены

Итак, имеем полезную возможность в программе - установка цен на услуги и материалы.

Поскольку цены хранятся с привязкой к дате, можем заранее установить новые цены и быть уверены в том, что новые цены вступят в действие не раньше указанной для них даты.

Рассмотрим, как можно использовать заданные цены в документе ОказаниеУслуги.

Создание функции Розничная цена()

Сначала создадим функцию, которая будет возвращатьактуальную розничную цену номенклатуры.

Откроем конфигуратор, в ветке Общие ► Общие модули со­здадим новый объект конфигурации Модуль и назовем его РаботаСоСправочниками.

Поместим в нем следующий текст (листинг 1.1).

Листинг 1.1. Функция РозничнаяЦена()

Функция РозничнаяЦена(АктуальнаяДата, ЭлементНоменклатуры)Экспорт

// Создать вспомогательный объект Отбор.

Отбор = Новый Структура("Номенклатура",ЭлементНоменклатуры);

// Получить актуальные значения ресурсов регистра.

ЗначенияРесурсов = РегистрыСведений.Цены.ПолучитьПоследнее(АктуальнаяДата, Отбор);

Возврат ЗначенияРесурсов.Цена;

КонецФункции

Для получения розничной цены будем передавать в функ­цию два параметра:

• АктуальнаяДата - параметр типа Дата определяет точку на оси времени, в которой нас интересует значение розничной цены.

• ЭлементНоменклатуры - ссылка на элемент справочника Номенклатура, для которого хотим получить розничную цену.

В теле процедуры сначала создаем вспомогательный объект Отбор.

С его помощью определяем, что нас будут интересоватьза­писи регистра, в которых измерение Номенклатура равно передан­ной в процедуру ссылкена элемент справочника.

Во второй строке обращаемся к менеджеру регистра сведений Цены (РегистрыСведений.Цены) и выполняем метод Получить Последнее(), который возвращает значения ресурсов наиболее поздней записи регистра, соответствующей передаваемой дате (АктуальнаяДата) и значениям измерений регистра (Отбор).

Значения ресурсов возвращаются в объекте Структура, по­этому в следующей строке получаем искомую рознич­ную цену, просто указав имя нужного ресурса регистра через точку (ЗначенияРесурсов.Цена).

Проверяем, как работает эта функция.

Дата добавления: 2015-07-13