FILL AND DANCE 2 — различия между версиями

Материал из Фабиус wiki
Перейти к: навигация, поиск
(Новая страница: «FILL_AND_DANCE_2 - это процедура из справочника R266»)
 
м
Строка 1: Строка 1:
 
FILL_AND_DANCE_2 - это процедура из справочника [[R266]]
 
FILL_AND_DANCE_2 - это процедура из справочника [[R266]]
 +
 +
Заполнить документ [[AND]] за период
 +
 +
= Текст программы =
 +
 +
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
 +
  Fill_and_dance( my )
 +
  my := my + 1
 +
end

Версия 11:44, 4 мая 2016

FILL_AND_DANCE_2 - это процедура из справочника R266

Заполнить документ AND за период

Текст программы

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
  Fill_and_dance( my )
  my := my + 1
end