На встроенном языке можно такой вариант использовать:
ПодчиненныеФайлы = РаботаСФайламиВызовСервера.ПолучитьВсеПодчиненныеФайлы(Предмет, Ложь);
Если ПодчиненныеФайлы.Количество() > 0 Тогда
Результат = Истина;
Иначе
Результат = Ложь;
КонецЕсли;
Добрый день. Как настроить условия маршрутизации процесса в 1с документооборот корп 2.1.11 что бы договор нельзя было согласовать если сумма не заполнена. или другие настройки для обязательного заполнения данного поля.
Без влезания в конфигурацию можно сделать так: в процессе согласования первым этапом поставить Исполнение инициатором, с названием "Проверить правильность заполнения", например. И в этой задаче Исполнение при настройке уже можно поставить условия, без которых система не даст её закрыть. Вот там и пишете проверку на заполненность суммы.
Добрый день! Подскажите, что я не правильно делаю! Есть внешняя обработка. В ней функция (на клиенте), которая должна получить массив прикрепленных файлов к конкретному документу.
ВладелецФайла = Документ; // Наименование документа "Договор аренды (№ 6-ДА от 27.04.2011)" - он же владелец файла
//Проверка наличия подчиненных файлов
ПодчиненныеФайлы = РаботаСФайламиВызовСервера.ПолучитьВсеПодчиненныеФайлы(ВладелецФайла, Истина,
Ложь);
Если ПодчиненныеФайлы.Количество() > 0 Тогда
Результат = Истина;
Иначе
Результат = Ложь;
КонецЕсли;
В модуль параметры передаются, но массив файлов возвращается пустой.
(8) Если посмотреть описание функции "ПолучитьВсеПодчиненныеФайлы" то:
// Получает все подчиненные файлы
// Параметры
// ВладелецФайла - ЛюбаяСсылка - владелец файла
//
// Возвращаемое значение:
// Массив - массив файлов
т.е. вот это: ВладелецФайла = Документ должно быть ссылкой
(8) и соответственно не надо делать лишних движений и создавать еще одну переменную "ВладелецФайла", можно сразу:
ПодчиненныеФайлы = РаботаСФайламиВызовСервера.ПолучитьВсеПодчиненныеФайлы(Документ, Истина, Ложь);
инд=0;
Для Каждого СтрокаМ из ПодчиненныеФайлы Цикл
Расширение =СтрокаМ.ТекущаяВерсияРасширение;
ИмяФайла = СтрокаМ.ПолноеНаименование+"."+Расширение;
Если СтрокаМ.ТекущаяВерсияПутьКФайлу="" Тогда
Продолжить;
КонецЕсли;
ПолныйПуть = СтрокаМ.ТекущаяВерсияПутьКФайлу;
Попытка
ДвоичныеДанные = Новый ДвоичныеДанные(ПолныйПуть);
ДвоичныеДанныеСтрока = Base64Строка(ДвоичныеДанные);
Исключение
Сообщить(СтрокаМ.ПутьКФайлу + " Ошибка получения файла: "+ОписаниеОшибки());
Продолжить;
КонецПопытки;
инд=инд+1
КонецЦикла;
Значение ТекущаяВерсияПутьКФайлу пустое. Соответственно документ выгружается но 0 б.