Как програмно получить  номер квартала по дате

я думаю по месяцам

Месяц(КонецКвартала(МояДата)) / 3

число(формат(дата,"ДФ=к"));

работает спасибо