Помогите!!!!!

Если ЭтоНовый() Тогда
Номер = Формат(ТекущаяДата(), "ДФ='yy.MM.dd'");
ТекущаяДатаДокумента = Дата;
Запрос = Новый Запрос ("ВЫБРАТЬ ПЕРВЫЕ 1 Номер ИЗ Справочник.ДоговорыКонтрагентов ГДЕ Дата =' &Дата И Номер Подобно &Номер '
' Упорядочить ПО Номер Убыв");
Запрос.УстановитьПараметр("Дата",ТекущаяДата());
Запрос.УстановитьПараметр("Дата",Номер+(24*60*60));
КонецЕсли;

Нужно что бы присваивался порядковый номер с периодичностью день.