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

Материал из Фабиус wiki
Перейти к: навигация, поиск
м (Смотрите также)
м
Строка 1: Строка 1:
 
  local ip, my, end_data
 
  local ip, my, end_data
  ip := [[InputPeriod]]( true )
+
  ip := [[INPUTPERIOD]]( true )
  if [[Empty]]( ip )
+
  if [[EMPTY]]( ip )
 
   return
 
   return
 
  endif
 
  endif
  my := [[StoD]]( ip[1] )
+
  my := [[STOD]]( ip[1] )
  end_data := [[StoD]]( ip[2] ) + 1
+
  end_data := [[STOD]]( ip[2] ) + 1
 
  while my <> end_data
 
  while my <> end_data
  // подпрограмма, например CAM_1901( my, _ ), где my - дата, а _ - таблица для заполнения
+
 
 
   my := my + 1
 
   my := my + 1
 
  end
 
  end
 
 
= Пример =
 
= Пример =
 
 
[[DRILL_AND_FILL]]
 
[[DRILL_AND_FILL]]
 
 
= Смотрите также =
 
= Смотрите также =
 
[[Шаблоны программ на внутреннем языке фабиуса для повторного использования]]
 
[[Шаблоны программ на внутреннем языке фабиуса для повторного использования]]
  
 
[[QwrTitle]]
 
[[QwrTitle]]

Версия 08:13, 12 октября 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

Пример

DRILL_AND_FILL

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

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

QwrTitle