8.х Движение по регистру сведений

Тема в разделе "Конфигурирование на платформе "1С:Предприятие 8"", создана пользователем PavelBaryshev, 29 дек 2009.

  1. TopicStarter Overlay
    PavelBaryshev
    Offline

    PavelBaryshev Опытный в 1С

    Регистрация:
    9 сен 2008
    Сообщения:
    316
    Симпатии:
    0
    Баллы:
    26
    Подскажите как с помощью обработки сделать запись в рег сведений?
  2. x_under
    Offline

    x_under Модераторы Команда форума Модератор

    Регистрация:
    25 апр 2007
    Сообщения:
    2.576
    Симпатии:
    13
    Баллы:
    29
    Через набор записей например. Если подчинен документу, то можно прям через движения документа.
  3. Draco
    Offline

    Draco Модераторы Команда форума Модератор

    Регистрация:
    28 окт 2009
    Сообщения:
    13.647
    Симпатии:
    948
    Баллы:
    204
    Вот пример из Синтаксис помощника. Используйте Помощник там все есть
    Код:
    КурсыВалют = РегистрыСведений.КурсыВалют;
    НаборКурсов = КурсыВалют.СоздатьНаборЗаписей();
    Доллар = Справочники.Валюты.НайтиПоНаименованию("USD");
    НаборКурсов.Отбор.Валюта.Установить(Доллар);
    НаборКурсов.Отбор.Период.Установить(НачалоДня(ТекущаяДата()));
    НаборКурсов.Прочитать();
    Если НаборКурсов.Количество() = 0 Тогда
    НовыйКурс = НаборКурсов.Добавить();
    НовыйКурс.Валюта = Доллар;
    НовыйКурс.Период = ТекущаяДата();
    ИначеЕсли НаборКурсов.Количество() = 1 Тогда
    НовыйКурс = НаборКурсов[0];
    Иначе
    Предупреждение("Курс валюты задается один раз в день.", 60);
    Возврат;
    КонецЕсли;
    НовыйКурс.Курс = 31.44;
    НовыйКурс.Кратность = 1;
    НаборКурсов.Записать();
    Сообщить("Курс " + СокрЛП(НовыйКурс.Валюта) + " на сегодня: "+ 
    НовыйКурс.Курс + " руб.");
    

Поделиться этой страницей