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