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

Материал из Фабиус 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

Версия 15:34, 19 июля 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