FILL AND DANCE 2 - История изменений

Hisava в 13:58, 2 августа 2017

2017-08-02T13:58:09Z

2017-04-10T08:37:25Z

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

2017-04-10T08:35:02Z

2017-04-10T08:34:17Z

2016-05-04T08:44:20Z

2016-05-04T08:43:44Z

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

Новая страница

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

@@ Строка 1: / Строка 1: @@
 [[FILL_AND_DANCE_2]] - это процедура из справочника [[R266]]
+ Заполнить документ [[AND]] за период
-Заполнить документ [[AND]] за период
+= Текст =
+ local ip, my, end_data
-= Текст программы =
-−
 local ip, my, end_data
   ip := [[InputPeriod]]( true )
@@ Строка 20: / Строка 17: @@
     my := my + 1
   end
 = Смотрите также =
 [[Полезные функции]]
 [[Функции Delphi]]

@@ Строка 7: / Строка 7: @@
 local ip, my, end_data
-  ip := InputPeriod( true )
+  ip := [[InputPeriod]]( true )
-  if Empty( ip )
+  if [[Empty]]( ip )
     return
   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
-    Fill_and_dance( my )
+    [[Fill_and_dance]]( my )
     my := my + 1
   end

← Предыдущая		Версия 08:34, 10 апреля 2017
Строка 1:		Строка 1:
−	FILL_AND_DANCE_2 - это процедура из справочника [[R266]]	+	[[FILL_AND_DANCE_2]] - это процедура из справочника [[R266]]

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

← Предыдущая		Версия 08:44, 4 мая 2016
Строка 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