Есть дата()
Как получить номер квартала с даты

Если номер месяца <=3 Then 1
Иначеесли  номер месяца <=6 then 2...

(1) Извращенец.
Сообщить(КонецКвартала(ТекущаяДата()));

Только перебором чтоли

(2) а может так Цел(Месяц(Дата)/3)+1 ?)

ой не правильно
Цел((Месяц(Дата)+2)/3)

(2) Млин, ступил. (1) Прости, а ;)

(2) ну получаю я конец квартала, а номер то как извлечь

(5) мы так будем всегда второй квартал получать

(8) как это

(8) Почему? лаботамию делал?

(1) вариант нормально сработал
Если Месяц(Период)<= 1 или Месяц(Период)<= 2 или Месяц(Период)<= 3 Тогда
   НовСтрока.Кв1 = ЧасыРаботыПервойСмены;
ИначеЕсли
   Месяц(Период)<= 4 или Месяц(Период)<= 5 или Месяц(Период)<= 6 Тогда
   НовСтрока.Кв2 =ЧасыРаботыПервойСмены;
ИначеЕсли
   Месяц(Период)<= 7 или Месяц(Период)<= 8 или Месяц(Период)<= 9 Тогда
   НовСтрока.Кв3 = ЧасыРаботыПервойСмены;
ИначеЕсли
   Месяц(Период)<= 10 или Месяц(Период)<= 11 или Месяц(Период)<= 12 Тогда
   НовСтрока.Кв4 = ЧасыРаботыПервойСмены;
КонецЕсли;


(5)прошу извинить, для определенной даты работает а в случае с выбором периода не сработал

ппц а этом чем не устраиваете? (продолжение ответа 2)
Формат(КонецКвартала(ТекущаяДата()),"ДФ=" "к")

вот конкретно в числовом виде:
Число(Формат(КонецКвартала(ТекущаяДата()),"ДФ=" "к"))

(11) ну твой вариант конечно намного логичней и стройней чем в (8)
да про "период" то я и не подумал.

(14) чем в (5) то есть

(11) Избыточно, тупо и в лоб. Хотя для 1С сойдет :) ПО крайней мере понятно, что делает этот код.

Выбрать Квартал(&МояДата)

(16) для 1С "тупо" никогда не проходило.

(11) 3.14-ц

(18) Шо, правда? :)

(20) что ж вы так не любите работу которой вы занимаетесь ?

(21) Я работу люблю, но я реалист. Ибо слишком часто видел похожее на (11) в модулях.

(22) "видел" и "для 1С сойдет" не всегда и не для каждого тождество. каждый решает сам.
зы. а у вас в профиле написано что вы фикси. стало быть более ограждены от подобных психологических травм.

блин, мне нравиться в личке "показать"...

(23) Я 3 года во франче проработал, до того как на фикси перейти.

(25)я тоже. ушел с должности начальник отдела разработки 1cv8. но это не ответ )

(26) Это ответ, потому что видел вещи куда более стремные, чем код в (11).

(27) не хочу ссорится но просьба еще раз перечитать первое предложение из (23)

(28) И что? Будешь возражать, что (11) - тупо, но ПОНЯТНО?

(29) буду. увы но мне не понятно ЗАЧЕМ сделано так. наверно тупой.

(30) Это мне тоже непонятно. Хотя нет, понятно. Лень думать было.

(31) вопервых "лень думать было" не всегда очевидно. иногда случается что вроде бы тупой код нес некий не очевидный на первый взгляд смысл.
а во вторых спор зашел о том что "видел" и "для 1С сойдет" не всегда и не для каждого тождество. каждый решает сам.
:)

(32) Что ж ты упертый такой. "Для 1С сойдет" - означает, что я видел и более корявые куски кода, которые благополучно работали, и клиенту было глубоко фиолетово на то, что там внутри. А тут - ну тупо, ну избыточно, но далеко не самое страшное, потому и "сойдет".

извини коллега но позволю себе не согласиться ) сей код вопервых вызывает глубокий психологический дискомфорт того кто его читает
а во вторых если человек так пишет код на языке 1с то он примерно так же относится к запросам. а тут уже совсем другая история в плане конечных результатов

(34) "а во вторых если человек так пишет код на языке 1с то он примерно так же относится к запросам"
Экстраполяция ничем не лучше моей. Ты не видел, как данный человек пишет запросы, так что утверждать ничего не можешь. That's all, folks!

(35) специально посмотрел. нормальная у меня экстраполяция. впрочем думаю и сам это понимал ))