Выбор периода и вызов подпрограммы в цикле за каждый день этого периода — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м |
||
Строка 10: | Строка 10: | ||
my := my + 1 | my := my + 1 | ||
end | end | ||
+ | |||
+ | M->QwrTitle := ' ( ' + StoD( ip[1] ) + ' - ' + StoD( ip[2] ) + ' )' | ||
= Пример = | = Пример = | ||
[[DRILL_AND_FILL]] | [[DRILL_AND_FILL]] |
Версия 11:16, 8 декабря 2017
local ip, my, end_data ip := INPUTPERIOD( true ) if EMPTY( ip ) return endif my := STOD( ip[1] ) end_data := STOD( ip[2] ) + 1 while my <> end_data
my := my + 1 end
M->QwrTitle := ' ( ' + StoD( ip[1] ) + ' - ' + StoD( ip[2] ) + ' )'
Пример
Смотрите также
Шаблоны программ на внутреннем языке фабиуса для повторного использования