Код

Процедура вспУдалитьПериодическиеРекцизиты(СписокРеквизитов, ВидСправочника)
	Состояние("Удаление периодических реквизитов....");
	// Удалим эти периодические реквизиты за период
	Список = "";
	For j = 1 To СписокРеквизитов.РазмерСписка() Do
		Список = Список + СокрЛП(Запрос.МД.ИДРеквизитаСправочника(ВидСправочника, СписокРеквизитов.ПолучитьЗначение(j)));
		If j <> СписокРеквизитов.РазмерСписка() Then
			Список = Список + ", ";
		EndIf;
	EndDo;

	ТекстЗапроса = "
		|delete FROM
		|	_1SCONST
		|WHERE
		|	ID in (" + Список + ")
		|	and date BETWEEN :НачДата~~ AND :КонДата~~
		|";

	Запрос.УстановитьТекстовыйПараметр("НачДата", НачДата);
	Запрос.УстановитьТекстовыйПараметр("КонДата", КонДата);
	Запрос.Выполнить(ТекстЗапроса);
КонецПроцедуры