Выбор периода и вызов подпрограммы в цикле за каждый день этого периода

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] ) + ' )'

Пример

DRILL_AND_FILL

Смотрите также

Шаблоны программ на внутреннем языке фабиуса для повторного использования

QwrTitle