Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
09 дек 2024, 17:00

Рассчитать остаток срока гарантии

Автор Алексей_1985_06, 26 ноя 2024, 15:51

0 Пользователей и 1 гость просматривают эту тему.

Алексей_1985_06

Всем привет, помогите сделать следующие:
Необходимо рассчитать оставшийся срок гарантии изделия на текущую дату, исходя из даты его ввода в эксплуатацию и срока гарантии.
На форме справочника создал реквизиты:
1. ДатаВводаВЭксплуатацию - тип Дата
2. ГарантийныйСрокЭксплуатации - тип число

При открытии формы элемента необходимо отобразить остаток гарантии на текущую дату
Для этого создал реквизит формы: ОстатокГарантийногоРесурса - тип число

Может кто-то реализовывал подобное?

LexaK

Алексей_1985_06, так расчитайте процент и выведите поле индикатора!
очень похоже на вашу полоску
если помогло нажмите: Спасибо!

antoneus

Срок гарантии в годах?

ТекДата = ТекущаяДата();
ДатаОкончания = ДобавитьМесяц(ДатаВводаВЭксплуатацию, ГарантийныйСрокЭксплуатации * 12);
ОстатокГарантийногоРесурса = 100 - Мин((ТекДата - ДатаВводаВЭксплуатацию) / (ДатаОкончания - ДатаВводаВЭксплуатацию), 1) * 100

Алексей_1985_06

antoneus, Огромное спасибо :zebzdr: ! Срок будет в месяцах, что-то туплю...что в таком случае нужно подправить в Вашем коде?

antoneus


Алексей_1985_06

antoneus, это то я понял  :D , не понятно как в эту переменную получить теперь остаток в разрезе месяца:

ОстатокГарантийногоРесурса = 100 - Мин((ТекДата - Объект.ДатаВводаВЭксплуатацию) / (ДатаОкончания - Объект.ДатаВводаВЭксплуатацию), 1) * 100

LexaK

Алексей_1985_06, в "эту" переменную ни чего помещать не надо, в ней рассчитывается % остатка
если помогло нажмите: Спасибо!

Алексей_1985_06

LexaK, Все заканчиваю работать, туплю...простите!

LexaK

Алексей_1985_06,
ЦитироватьВсе заканчиваю работать
Все? Совсем? (правильно, ну ее эту непонятную 1С)  :bleh:
если помогло нажмите: Спасибо!

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск