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

Материал из Фабиус 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 - дата, а _ - таблица для заполнения
 
   // подпрограмма, например CAM_1901( my, _ ), где my - дата, а _ - таблица для заполнения
 
 
   my := my + 1
 
   my := my + 1
 
+
end
end
+

Версия 09:35, 24 июня 2016

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
  // подпрограмма, например CAM_1901( my, _ ), где my - дата, а _ - таблица для заполнения
  my := my + 1
end