Процедура ПриОкончанииРедактированияСтроки(Флаг);
              ДнейВсего=(Дата(Дата2)-Дата(Дата1));
              Лет=Цел(ДнейВсего)/365;
              Месяц=Цел((Цел(ДнейВсего)-Цел(ЛетНе))*365)/30;
              Дней =(Цел(ДнейВсего)-Цел(ЛетНе)-Цел(Месяц))/30;
        КонецПроцедуры

не могу понять где я не прав

Переменная неопределена "ЛетНе"

уточняй - в чем проблема-то?) ошибки валятся. или результаты не сходятся?

Ой
Процедура ПриОкончанииРедактированияСтроки(Флаг);
              ДнейВсего=(Дата(Дата2)-Дата(Дата1));
              Лет=Цел(ДнейВсего)/365;
              Месяц=Цел((Цел(ДнейВсего)-Цел(Лет))*365)/30;
              Дней =(Цел(ДнейВсего)-Цел(Лет)-Цел(Месяц))/30;
        КонецПроцедуры

результату не правильно

Процедура ПриОкончанииРедактированияСтроки(Флаг);
   ДнейВсего=Дата2-Дата1+1;
   Лет=Цел(ДнейВсего/365);
   Месяц=Цел(ДнейВсего%365)/30;
   Дней =ДнейВсего-Лет*365-Месяц*30;
КонецПроцедуры

когда уже будем на 86400 для ДнейВсего делать?

(4) *делить на 86400

(5) Это семерка...
(3) Поправочка.
Месяц=Цел(ДнейВсего%365/30);
или
Месяц=Цел((ДнейВсего - Лет*365)/30);

Бред

кстати а почему 30 а не 30.25 как принято?

(0)
везде не прав
надо наверное так
ДнейВсего=(Дата(Дата2)-Дата(Дата1));
Лет=Цел(ДнейВсего/365);
ОставшихсяДней=(ДнейВсего-Лет*365);
Месяцев=Цел(ОставшихсяДней/30);
Дней =ОставшихсяДней-Месяцев*30;

Пример из справки 8.2:

Процедура ПолучитьСтажЗаПериод(Знач ДатаОкончанияПериода,
           Знач ДатаНачалаПериода,
           Лет=0, Месяцев=0, Дней=0) Экспорт
   Если ДатаОкончанияПериода >= ДатаНачалаПериода тогда
       Лет1 = Год(ДатаОкончанияПериода);
       Месяцев1 = Месяц(ДатаОкончанияПериода);
       Если НачалоДня(ДатаОкончанияПериода) <> НачалоДня(КонецМесяца(ДатаОкончанияПериода)) Тогда
           Дней1 = День(ДатаОкончанияПериода);
       Иначе
           Дней1 = 30;//В каждом месяце ровно 30 дней

       КонецЕсли;    

       Лет2 = Год(ДатаНачалаПериода);
       Месяцев2 = Месяц(ДатаНачалаПериода);
       Если НачалоДня(ДатаНачалаПериода) <> НачалоДня(КонецМесяца(ДатаНачалаПериода)) Тогда
           Дней2 = День(ДатаНачалаПериода);
       Иначе
           Дней2 = 30;//В каждом месяце ровно 30 дней

       КонецЕсли;

       Лет = Лет1 - Лет2;
       Месяцев = Месяцев1 - Месяцев2;
       Дней = Дней1 - Дней2 + 1; //1 день на увольнение

   Иначе
       Лет = 0;
       Месяцев = 0;
       Дней = 0;
   КонецЕсли;    
КонецПроцедуры //ПолучитьСтажЗаПериод