Функция ЭтоЧисло(Строка) // Экспорт

	

	РезультатЭтоЧисло = 1; // Истина

	

	ДлинаСтроки = СтрДлина(Строка);

	

	Для i = 1 По ДлинаСтроки Цикл

		

		Символ = Лев(Строка, 1);

		Строка = Сред(Строка, 2);

		

		Если Не (Символ = "1" Или Символ = "2" Или Символ = "3" Или Символ = "4" Или Символ = "5" Или Символ = "6" Или Символ = "7" Или Символ = "8" Или Символ = "9" Или Символ = "0") Тогда 

			РезультатЭтоЧисло = 0; // Ложь

			Прервать;

		КонецЕсли;

	

	КонецЦикла;

		

	Возврат РезультатЭтоЧисло;

	

КонецФункции // ЭтоЧисло

   

 

Выборка = БизнесПроцессы.Продажа.Выбрать(ДатаНач, ДатаКон);

Пока Выборка.Следующий() Цикл

	//код

КонецЦикла;

   

 

Выборка = Задачи.Дела.Выбрать();

Пока Выборка.Следующий() Цикл

	//код

КонецЦикла;

   

 Запрос = Новый Запрос;

	Запрос.Текст =

	"ВЫБРАТЬ

	|	CRM_Задача.Ссылка,

	|	CRM_Задача.ТочкаМаршрута КАК Задачи_CRM,

	|	CRM_Задача.БизнесПроцесс.ДокументДоставки.Номер КАК Доставка_Номер,

	|	CRM_Задача.ДатаВыполнения КАК Выполнить_до

	|ИЗ

	|	Задача.CRM_Задача КАК CRM_Задача

	|ГДЕ

	|	CRM_Задача.ТочкаМаршрута В(&ТочкаМаршрута)

	|	И CRM_Задача.Выполнена = ЛОЖЬ

	|	И CRM_Задача.БизнесПроцесс.ДокументДоставки <> ЗНАЧЕНИЕ(Документ.Доставка.ПустаяСсылка)

	|	И (CRM_Задача.Пользователь = &Пользователь

	|			ИЛИ CRM_Задача.Подразделение = &Подразделение)

	|

	|УПОРЯДОЧИТЬ ПО

	|	Выполнить_до

	|АВТОУПОРЯДОЧИВАНИЕ";

	Запрос.УстановитьПараметр("ТочкаМаршрута", СписокТ);

	Запрос.УстановитьПараметр("Пользователь", ПараметрыСеанса.ТекущийПользователь);

	Запрос.УстановитьПараметр("Подразделение", ПараметрыСеанса.ТекущийПользователь.Подразделение);



	Задачи_CRM = Запрос.Выполнить().Выгрузить();

	ЭлементыФормы.Задачи_CRM.СоздатьКолонки();

	ЭлементыФормы.Задачи_CRM.Колонки.Ссылка.Видимость=Ложь;

   

 

Выборка = ПланыВидовРасчета.УдержанияОрганизаций.Выбрать();

Пока Выборка.Следующий() Цикл

	//код обработки выбора	

КонецЦикла;