Перенос файлов из справочника присоединенных файлов в справочник файлов ERP
По теме из базы знаний
- Печать договоров по шаблонам для УТ 11, КА 2, ERP 2
- Новые возможности обработки Печать договоров по шаблонам для УТ 11, КА 2, ERP 2
- Перенос присоединенных файлов в документооборот при бесшовной интеграции
- Интеграции с маркетплейсами из одного окна: Озон, ВБ, Яндекс, Сбер, Али, ЛаМода для 1С:УНФ, УТ, КА, ERP
- Расширяемый фреймворк на 1С, или Нюансы натягивания совы на глобус
Найденные решения
Решение проблемы:
1. Пишем запрос к регистру сведений присоединенные файлы где обходим нужные нам файлы.
2. В выборке обрабатываем хранимый файл:
3. После создаем структуру для процедуры типовой РаботаСФайламиСлужебныйВызовСервера.СоздатьФайлСВерсией(Объект.Спецификация, СведенияОФайле);, где 1 параметром передаем спецификацию, а 2 структуру:
И уаля!)
1. Пишем запрос к регистру сведений присоединенные файлы где обходим нужные нам файлы.
2. В выборке обрабатываем хранимый файл:
ХВ = Выборка.ХранимыйФайл.Получить();
Адрес = ПоместитьВоВременноеХранилище(ХВ);
3. После создаем структуру для процедуры типовой РаботаСФайламиСлужебныйВызовСервера.СоздатьФайлСВерсией(Объект.Спецификация, СведенияОФайле);, где 1 параметром передаем спецификацию, а 2 структуру:
СведенияОФайле.Вставить("АдресВременногоХранилищаФайла", Адрес);
СведенияОФайле.Вставить("ВремяИзменения", Выборка.ПрисоединенныйФайл.ДатаСоздания);
СведенияОФайле.Вставить("ВремяИзмененияУниверсальное", Выборка.ПрисоединенныйФайл.ДатаСоздания);
СведенияОФайле.Вставить("ЗаписатьВИсторию", Истина);
СведенияОФайле.Вставить("ИмяБезРасширения", Выборка.ПрисоединенныйФайл.Наименование);
СведенияОФайле.Вставить("РасширениеБезТочки", Выборка.ПрисоединенныйФайл.Расширение);
СведенияОФайле.Вставить("ХранитьВерсии", Истина);
СведенияОФайле.Вставить("Автор", "Автор");
СведенияОФайле.Вставить("Зашифрован", Ложь);
ПоказатьИ уаля!)
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1) Уточните, пожалуйста, все таки откуда и куда нужно перенести файлы?
Например, в ERP 2.4.7.141 есть библиотечная процедура переноса файлов:
Но как я понимаю, она сохраняет за файлом его прежнего владельца. Подходит ли Вам это?
Например, в ERP 2.4.7.141 есть библиотечная процедура переноса файлов:
РаботаСФайлами.ИзменитьСправочникХраненияФайлов(ВладелецФайлов, ИмяСправочника);
(1) Если же Вам требуется "свалить" все присоединенные файлы в одну "кучу", отвязав их от прежнего владельца, рассмотрите следующие процедуры и функции:
// получение массива всех присоединенных файлов
РаботаСФайлами.ЗаполнитьПрисоединенныеФайлыКОбъекту(ВладелецФайла, Файлы);
// извлечение двоичных данных и прочей информации присоединенного файла
РаботаСФайлами.ДанныеФайла(ПрисоединенныйФайл, ИдентификаторФормы, ПолучатьСсылкуНаДвоичныеДанные, ДляРедактирования);
// присоединение файла к новому владельцу или папке с файлами
РаботаСФайлами.ДобавитьФайл(ПараметрыФайла, АдресФайлаВоВременномХранилище);
Решение проблемы:
1. Пишем запрос к регистру сведений присоединенные файлы где обходим нужные нам файлы.
2. В выборке обрабатываем хранимый файл:
3. После создаем структуру для процедуры типовой РаботаСФайламиСлужебныйВызовСервера.СоздатьФайлСВерсией(Объект.Спецификация, СведенияОФайле);, где 1 параметром передаем спецификацию, а 2 структуру:
И уаля!)
1. Пишем запрос к регистру сведений присоединенные файлы где обходим нужные нам файлы.
2. В выборке обрабатываем хранимый файл:
ХВ = Выборка.ХранимыйФайл.Получить();
Адрес = ПоместитьВоВременноеХранилище(ХВ);
3. После создаем структуру для процедуры типовой РаботаСФайламиСлужебныйВызовСервера.СоздатьФайлСВерсией(Объект.Спецификация, СведенияОФайле);, где 1 параметром передаем спецификацию, а 2 структуру:
СведенияОФайле.Вставить("АдресВременногоХранилищаФайла", Адрес);
СведенияОФайле.Вставить("ВремяИзменения", Выборка.ПрисоединенныйФайл.ДатаСоздания);
СведенияОФайле.Вставить("ВремяИзмененияУниверсальное", Выборка.ПрисоединенныйФайл.ДатаСоздания);
СведенияОФайле.Вставить("ЗаписатьВИсторию", Истина);
СведенияОФайле.Вставить("ИмяБезРасширения", Выборка.ПрисоединенныйФайл.Наименование);
СведенияОФайле.Вставить("РасширениеБезТочки", Выборка.ПрисоединенныйФайл.Расширение);
СведенияОФайле.Вставить("ХранитьВерсии", Истина);
СведенияОФайле.Вставить("Автор", "Автор");
СведенияОФайле.Вставить("Зашифрован", Ложь);
ПоказатьИ уаля!)
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот