//Общий модуль "РаботаСПотоками",
//флаг "Сервер", процедура с Экспорт
Процедура СуммаДо(Предел, Адрес) Экспорт
Итог = 0;
Для Н = 1 По Предел Цикл
Итог = Итог + Н;
КонецЦикла;
//Результат возвращают через хранилище
ПоместитьВоВременноеХранилище(Итог, Адрес);
КонецПроцедуры
//В другом модуле:
Идентификатор = Новый УникальныйИдентификатор;
Адрес = ПоместитьВоВременноеХранилище(
Неопределено, Идентификатор);
Параметры = Новый Массив;
Параметры.Добавить(1000000);
Параметры.Добавить(Адрес);
Задание = ФоновыеЗадания.Выполнить(
"РаботаСПотоками.СуммаДо", Параметры);
МассивЗаданий = Новый Массив;
МассивЗаданий.Добавить(Задание);
//Без таймаута возможно зависание
ФоновыеЗадания.ОжидатьЗавершенияВыполнения(
МассивЗаданий, 30);
Сумма = ПолучитьИзВременногоХранилища(Адрес);
//Сумма = 500000500000