Доброго день уважаемые форумчане!
Вот, возник вопрос следующего характера:
База: Контроль поставок
0|Системный номер|Ц|10|||
8|Относится к лицу|О|||МН|ЛЦ23
2|КОД поставок|С||КОД|ИФ|
5|Номер поставки|Т|10||ИФ|
3|Дата поставки|Д|||ИФ|
10|Срок выполнения поставки|Т|20||ИФ|
6|Дата ввода|Т|20||НК|
7|Дата изменения|Т|20||НК;МН|

КОД поставок – словарное поле, из которого выбирается одно из значений, которое в свою очередь равно определенному интервалу времени, например:
К1 = 1 месяц
К2 = 1 год
К3 = 2 года
К4 = 5 лет и т.д.

Мне необходимо:
1. Чтобы формула, при выборе одного из значений в поле «КОД поставок», понимала, что
К1 = 28, 29, 30 или 31 день
К2 = 365 или 366 дней
К3 = 730 или 731 день
К4 = 1825 или 1826 дней и т.д.
Количество дней зависит от:
- даты поставки
- високосный год или нет.
К примеру, в Excel есть формула, в которой можно увидеть количество дней в том или ином году:
Код:

=ДЕНЬ(ДАТА(ГОД(A1);3;0))+337
 

или
Код:

=ДАТА(A2;12;31)-ДАТА(A2-1;12;31).
 

2. Чтобы формула дату поставки умножила на количество дней из поля «КОД поставок» и итог внесла в поле «Срок выполнения поставки» в виде даты типа ДД.ММ.ГГГГ.

Я пробовал использовать данную формулу:
Код:

ДГ10 := DATETOYMD(DATE(ДГ3) + 365);
 

Где + 365 – количество дней, которое у меня получилось при ручном подсчете

Собственно и сам вопрос – возможно ли создать такую формулу? Если да, то помогите ее доработать. Для Вас это будет разминка для мозга, а для меня неоценимая помощь.
Спасибо!

Уважаемый dron_ffk в мануале я читал про эту функцию, но как в формулу добавить переменную, которая КОД переводила бы в дни:
К1 = 28, 29, 30 или 31 день
К2 = 365 или 366 дней
К3 = 730 или 731 день
К4 = 1825 или 1826 дней и т.д.
Количество дней зависит от:
- даты поставки
- високосный год или нет.

Я имею ввиду есть Дата поставки, например 01.03.2021 года, в поле Срок выполнения поставки мне нужно дату 12.03.2021 * на К1 или К2 и т.д. и получить дату выполнения поставки, к примеру 01.04.2021.

Спасибо за оперативность!
Подскажите пожалуйста, а есть ли аналог LOCATEVALEX и EXISTEX для CRONOSa 5.0?

Спасибо!
Может быть есть другой вариант исполнения данной формулы?

Спасибо за оказание помощи, но увы формула почему-то не работает, пробовал менять:
- поле 10|Срок выполнения поставки|Т|20||ИФ| с текстового на тип дата;
- @currentdate на ДГ3.
Но формула не срабатывает и вносит значение текущей даты. И еще заметил, что если поле 3|Дата поставки|Д|||ИФ| не содержит значения, то в поле 10|Срок выполнения поставки|Т|20||ИФ| вносится текущая дата.
Что не так

graffserg писал(а) 13.03.2021 :: 09:31:33:


если поле 3 не содержит дату, то нужно создать условие
if ДГ3 then ДГ10:=addage(ДГ3,@kod)

Вот подправил:
Код:

// таблица значений
@a(1):="К1"<<@valueseparator1<<"00.01.0000" // 1 месяц
@a(2):="К2"<<@valueseparator1<<"00.00.0001" // 1 год
@a(3):="К3"<<@valueseparator1<<"00.00.0002" // 2 года
@a(4):="К4"<<@valueseparator1<<"00.00.0005" // 5 лет и т.д.

@r:=1;
WHILE @r<=valcount(@a) DO //создаем цикл для сравнения кода
					[
					if (DECODE(ДГ2,0)=@a(@r,1)) then
												[
												@kod:=@a(@r,2);
												@r:=@r+valcount(@a)
												]
											else @r:=@r+1
					];

if ДГ4 then ДГ10:=addage(ДГ4,@kod)
 

Загвоздка была в том, что ДГ2 словарь, а его значения не декодируются - добавил DECODE.

Но вот что еще, если ввести дату 01.01.2021, то и срок будет 01.01.2022. Получается формула выдает значение но не учитывает количество оставшихся дней в году (я имею ввиду не понимает високосный год или нет).
Возможно ли данную формулу "причесать"?

dron_ffk спасибо за Вашу отзывчивость!
Возможно я не так выразился, но я имел ввиду если в поле 3|Дата поставки|Д|||ИФ| = 01.01.2021 и нам необходимо прибавить, к примеру, 1 год (365 или 366) дней, то 10|Срок выполнения поставки|Т|20||ИФ| должен быть равен 31.12.2021. Не так ли?
Это если заключить контракт с сотрудником фирмы на 1 год, то крайний день его работы будет 31.12.2021, а не до 01.01.2022.