Выбор периода и вызов подпрограммы в цикле за каждый день этого периода — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) м |
Hisava (обсуждение | вклад) м |
||
| (не показано 9 промежуточных версий этого же участника) | |||
| Строка 1: | Строка 1: | ||
| − | local ip, my, end_data | + | local sql, ip, my, end_data |
| − | ip := | + | ip := inputperiod( true ) |
| − | if | + | if empty( ip ) |
return | return | ||
endif | endif | ||
| − | my := | + | my := stod( ip[1] ) |
| − | end_data := | + | end_data := stod( ip[2] ) + 1 |
while my <> end_data | while my <> end_data | ||
| − | + | ||
my := my + 1 | my := my + 1 | ||
end | end | ||
| + | m->qwrtitle := ' ( ' + stod( ip[1] ) + ' - ' + stod( ip[2] ) + ' )' | ||
| + | = Пример = | ||
| + | [[DRILL_AND_FILL]] | ||
= Смотрите также = | = Смотрите также = | ||
| − | |||
[[Шаблоны программ на внутреннем языке фабиуса для повторного использования]] | [[Шаблоны программ на внутреннем языке фабиуса для повторного использования]] | ||
| + | |||
| + | [[QwrTitle]] | ||
Текущая версия на 15:48, 22 января 2020
local sql, 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] ) + ' )'
Пример
Смотрите также
Шаблоны программ на внутреннем языке фабиуса для повторного использования
