Вычисление стажа

Самописная конфа версии 7.7<br>Суть : нужно любым образом сделать вычисление стажа сотрудника на текущуюю дату<br>Вычисление идет от даты приема, я вот написал, но ето не очень:<br>Цел((ТекущаяДата()-ДатаПрийома)/365.25) - выч. кол лет, такой же принцип и для месяцев, дней..<br>Если есть другие способы, то напишите, пожалуйста...

"Функция РазницаМесяцев(Дата1, Дата2)<br> Возврат 12*(ДатаГод(Дата2) - ДатаГод(Дата1)) + ДатаМесяцы(Дата2) - ДатаМесяц(Дата1);<br>КонецФункции"

Мне нужно типа вот:<br>ф.эл, текстовое поле, в котором обчисл. стаж _Лет, 2 текстовое поле - _Месяцев , 3 -_Дней<br>Но количество целое не подходит, тоесть надо типа 2 года 3 месяца 13 дней, а не 132 месяца..

> Мне нужно типа вот:<br>> ф.эл, текстовое поле, в котором обчисл. стаж _Лет, 2 текстовое поле - _Месяцев , 3 -_Дней<br>> Но количество целое не подходит, тоесть надо типа 2 года 3 месяца 13 дней, а не 132 месяца..<br><br>подумать трудно?

Ой, извиняюсь, все круто, только вот в чем загвоздка:<br>если обчисляю дни, и сегодня 16, а датаприема 19, то мне выбивает -3 дня

"Функция глФормаМножественногоЧисла(Слово1,Слово2,Слово3,ЦелоеЧисло) Экспорт<br><br> Если ЦелоеЧисло<>Цел(ЦелоеЧисло) Тогда <br> // для нецелых чисел - всегда вторая форма<br> Возврат Слово2;<br> КонецЕсли;<br> <br> // остаток<br> Остаток = ЦелоеЧисло%10;<br> Если (ЦелоеЧисло >10) И (ЦелоеЧисло<20) Тогда<br> // для второго десятка - всегда третья форма<br> Возврат Слово3;<br> ИначеЕсли Остаток=1 Тогда<br> Возврат Слово1;<br> ИначеЕсли (Остаток>1) И (Остаток<5) Тогда<br> Возврат Слово2;<br> Иначе<br> Возврат Слово3;<br> КонецЕсли;<br><br>КонецФункции<br><br>Функция глПредставлениеСтажа(Знач ДатаСтажа,ТекстСтажа,Лет=0,Месяцев=0,Дней=0) Экспорт<br> Лет = 0; Месяцев = 0; Дней = 0;<br> // если в тексте стажа пустая строка, то стаж не задан<br> Если ПустаяСтрока(ТекстСтажа)=1 Тогда<br> Возврат "<<Стаж не задан>>"<br> КонецЕсли;<br> глРазобратьРазностьДат(ДатаСтажа,Дата(ТекстСтажа),Лет,Месяцев,Дней);<br> Возврат """" +Лет +" "+глФормаМножественногоЧисла("год","года","лет",Лет)<br> +" "+Месяцев+" "+глФормаМножественногоЧисла("месяц","месяца","месяцев",Месяцев)<br> +" "+Дней +" "+глФормаМножественногоЧисла("день","дня","дней",Число(Дней))<br>КонецФункции"