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

[Whes]

Есть еще вопрос. Хочу сделать строку в корой будет считаться кол-во полных лет. Написал вставил в модуль формы, а она не считает.

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

[alexandr_ll]

Есть еще вопрос. Хочу сделать строку в корой будет считаться кол-во полных лет. Написал вставил в модуль формы, а она не считает.

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

Проверьте, каков результат вычисления
Возраст = Дата(ТекущаяДата()) - Дата(ДатаРождения);?
Кстати, почему вы не указываете платформу, конфигурацию и вид приложения? Одни догадки

[Whes]

Проверьте, каков результат вычисления
Возраст = Дата(ТекущаяДата()) - Дата(ДатаРождения);?
Кстати, почему вы не указываете платформу, конфигурацию и вид приложения? Одни догадки

Ну да бред получается. Там где Дата он должен год считать.

1С 8.3: Технологическая поставка

[avm3110]

Ну да бред получается. Там где Дата он должен год считать.

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

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


Ну и все

[Whes]

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

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


Ну и все

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

[avm3110]

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

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

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

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

[Whes]

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

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

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

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

[Whes]

Подскажи как в базу добавить Адресный классификатор(Фиас или Кладр)?

[avm3110]

Смотря в какую базу. Если это типовая конфа типа ЗУПа, то заливка идет через регистр сведений "Адресный классификатор", там для этого есть соответствующая функциональность

[Whes]

Смотря в какую базу. Если это типовая конфа типа ЗУПа, то заливка идет через регистр сведений "Адресный классификатор", там для этого есть соответствующая функциональность

А если новая(голая) база?