1С 8.3 : Подсчет реального количества месяцев между датами, включая начало и конец месяца

В одном проекте понадобилось подсчитывать полное количество месяцев между датами, 

Допустим надо получить кол-во месяцев между датами 25.10.14 и 21.11.14

Функция РазницаДатВМесяцах ( Как вычислить разницу между двумя датами в месяцах )вернет 1, по сути разница между датами = одному месяцу,

но по факту работы будут в 10 и 11 месяцах, т.е. всего 2,  в итоге была написана простая функция, ее код ниже:

 тДат=ДатаНачала; КолМес = 0;

Пока Месяц(тДат)<> Месяц(ДатаОкончания) Цикл 

КолМес = КолМес+1;	

тДат = ДобавитьМесяц(тДат,1);

КонецЦикла;

Результат = КолМес+1;