||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | ||| | |||
Обработка записей регистра сведений перед записью
  • demo23 0. 17.09.2015, 18:34

    Событие ПередЗаписью возникает перед выполнением записи набора регистра сведений. Процедура-обработчик вызывается после начала транзакции записи, но до начала записи набора регистра сведений.
    Ниже приведен пример процедуры ПередЗаписью для регистра сведений «Курсы», который содержит курсы валют по периодам. При попытке ввести или изменить курс валюты период которого раньше даты регистрации фирмы будет выведено два сообщения.

    Процедура ПередЗаписью (Отказ, Замещение)
    	ДатаРегистрации = Константы.ДатаРегистрации.Получить ();
    	Для Каждого ТекЗапись Из ЭтотОбъект Цикл
    		
    		Если ТекЗапись.Период < ДатаРегистрации Тогда
    			// Если период раньше даты регистрации
    			Отказ = Истина; // отказ от записи
    			Сообщить(" Запись от " + ТекЗапись.Период +
    			" с курсом " + ТекЗапись.Курс +
    			" раньше даты регистрации фирмы!");
    		КонецЕсли;
    	КонецЦикла;
    	
    	Если Отказ Тогда
    		Сообщить ("Запись не выполнена!");
    	КонецЕсли;
    КонецПроцедуры
    
    Источник:
    http://moremobile.narod.ru/sobitiya/sobitie_peredzapisu_registra_svedeniy.htm

Ответы
  • Ответов: 0

Я Реклама

Веб-сайты на 1С! Сравнение рабочих макетов...