Настройка формы

[Whes]

На самом деле "не бред":blush:
Дата(ТекущаяДата()) - Дата(ДатаРождения) - это "разность дат" с секундах"
Год(ТекущаяДата()) - Год(ДатаРождения) - это "разность дат" с годах"

Но при этом нужно обработать три ситуации:
"номер месяца" рождения - больше "номера месяца" текущей даты
"номер месяца" рождения - равен "номеру месяца" текущей даты
"номер месяца" рождения - меньше "номера месяца" текущей даты


Ну и все

Но с этим кодом он должен то показывать результат? (Пусть и не правильный) Или нет?
Процедура ПолныхЛет();
Возраст = Год(ТекущаяДата()) - Год(ДатаРождения);
Если Месяц(ТекущаяДата()) < Месяц(ДатаРождения) Тогда
Возраст = Возраст - 1;
ИначеЕсли Месяц(ТекущаяДата()) = Месяц(ДатаРождения) Тогда
Если День(ТекущаяДата()) < День(ДатаРождения) Тогда
Возраст = Возраст - 1;
КонецЕсли;
КонецЕсли;
КонецПроцедуры

[avm3110]

Но с этим кодом он должен то показывать результат? (Пусть и не правильный) Или нет?

А где (как) смотрите результат?

пробовали отладчик?

Как вариант проверить - а что находится в "ДатаРождения" - "строка", "число" или "дата"?

[Whes]

А где (как) смотрите результат?

пробовали отладчик?

Как вариант проверить - а что находится в "ДатаРождения" - "строка", "число" или "дата"?

В справочнике создал 2 реквизита ДатаРождения(Дата) и Возраст(Число). Создал форму справочника и поместил на неё ДатуРождения и Возраст. Открыл справочник: Прочее->Модуль объекта и вставил код. Запустил, ошибок нет но и результата нет.

[avm3110]

А форма какая? Обычная или управляемая?
поставь в отладчике точку останова на строке
Возраст = Год(ТекущаяДата()) - Год(ДатаРождения);

и посмотри в окне отладки что у тебя возвращает ДатаРождения, что ТекущаяДата(), а что само выражение Год(ТекущаяДата()) - Год(ДатаРождения)

[Whes]

А форма какая? Обычная или управляемая?
поставь в отладчике точку останова на строке
Возраст = Год(ТекущаяДата()) - Год(ДатаРождения);

и посмотри в окне отладки что у тебя возвращает ДатаРождения, что ТекущаяДата(), а что само выражение Год(ТекущаяДата()) - Год(ДатаРождения)

А управляемая или обычная это как? Поставил точку он на неё не реагирует. Из-за чего?

[avm3110]

Поставил точку он на неё не реагирует. Из-за чего?

А тестишь в файловой базе или в клиент сервере? Если в клиент-сервере, то как вариант не подключился отладчик к сессии

А управляемая или обычная это как?

э-э-э.. Ну как бы тут тебе объяснить :blush:

Ну например тут "про это" - http://1c-programs.ru/chastye-vopros...mogo-v-1s.html

[Whes]

А тестишь в файловой базе или в клиент сервере? Если в клиент-сервере, то как вариант не подключился отладчик к сессии

Вообщем сделал так и заработало

Процедура ПриЗаписи();

Наименование = СокрЛП(Фамилия)+" "+СокрЛП(Имя)+" "+СокрЛП(Отчество);

//ПолныхЛет
Возраст = Год(ТекущаяДата()) - Год(ДатаРождения);
Если Месяц(ТекущаяДата()) < Месяц(ДатаРождения) Тогда
Возраст = Возраст - 1;
ИначеЕсли Месяц(ТекущаяДата()) = Месяц(ДатаРождения) Тогда
Если День(ТекущаяДата()) < День(ДатаРождения) Тогда
Возраст = Возраст - 1;
КонецЕсли;
КонецЕсли;

КонецПроцедуры;