Задался вопросом приведения Даты к строке в запросе. Решение с мисты
Ветка, Пост, Автор Serg_1960
PS ЧислоСтрокой = "00010203040506070809101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899"
ЧислоСтрокой = "00"; Для N = 0 По 99 Цикл ЧислоСтрокой = ЧислоСтрокой + Формат(N,"ЧЦ=2; ЧВН="); КонецЦикла; Запрос = Новый Запрос(); Запрос.УстановитьПараметр("ЧислоСтрокой", ЧислоСтрокой); Запрос.УстановитьПараметр("ТекДата", ТекущаяДата()); Запрос.Текст = " |ВЫБРАТЬ | ""Договор №___ от "" + ВЫБОР | КОГДА ГОД(&ТекДата) > 1900 | ТОГДА ""20"" + ПОДСТРОКА(&ЧислоСтрокой, (ГОД(&ТекДата) - 2000) * 2 + 1, 2) | ИНАЧЕ ""19"" + ПОДСТРОКА(&ЧислоСтрокой, (ГОД(&ТекДата) - 1900) * 2 + 1, 2) КОНЕЦ + ""/"" + | ПОДСТРОКА(&ЧислоСтрокой, МЕСЯЦ(&ТекДата) * 2 + 1, 2) + ""/"" + | ПОДСТРОКА(&ЧислоСтрокой, ДЕНЬ(&ТекДата) * 2 + 1, 2) КАК ДатаСтрокой"; Выборка = Запрос.Выполнить().Выбрать(); Выборка.Следующий(); Сообщить(Выборка.ДатаСтрокой); Возврат;
Ветка, Пост, Автор Serg_1960
PS ЧислоСтрокой = "00010203040506070809101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899"
Комментарии
Отправить комментарий