Хранение присоединенных файлов в томах на диске в КА 1.1

17.05.16

Задачи пользователя - Адаптация типовых решений

Описание необходимых изменений в Комплексная автоматизация 1.1 для хранения файлов в томах на диске. Можно разделить тома хранения по объектам конфигурации.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Модуль формы ФормаСпискаФайловИИзображений
.txt 36,33Kb
25
25 Скачать (1 SM) Купить за 1 850 руб.

Типовая конфигурация не позволяет хранить файлы в томах на диске, несмотря на заполненные настройки конфигурации. Небольшая доработка, незначительно влияющая на обновление конфигурации, позволяет это делать.

1. В справочнике ХранилищеДополнительнойИнформации необходимо добавить реквизит для хранения пути к файлу (тип Строка 0).

2. Далее 2 способа - либо изменение формы "ФормаСпискаФайловИИзображений" справочника ХранилищеДополнительнойИнформации, либо создавать свою форму, но менять вызов из документов.

Строки- проверки изменения Хранилища - дополняем проверкой заполнения пути к файлу:

Если Не ОтменаРедактирования
       И НоваяСтрока
       И ЭлементыФормы.ДополнительныеФайлы.ТекущиеДанные.Хранилище.Получить() = Неопределено 
       И ЭлементыФормы.ДополнительныеФайлы.ТекущиеДанные.нашПутьКФайлу = "" Тогда

Код сохранения во внешнее хранилище:

ТекОбъект.Хранилище = Новый ХранилищеЗначения(Новый ДвоичныеДанные(Диалог.ПолноеИмяФайла), Новый СжатиеДанных);

заменяем на следующий:

Попытка
        ТекОбъект = ЭлементыФормы.ДополнительныеФайлы.ТекущиеДанные;
        ДвоичныеДанные = Новый ДвоичныеДанные(Диалог.ПолноеИмяФайла);
        ФайловыеФункции.ДобавитьНаДиск(ДвоичныеДанные, ПутьКФайлу, СсылкаНаТом, ТекущаяДатаСеанса(), "", ИмяБезРасширения, Расширение, "", Ложь, Неопределено);
        ТекОбъект.нашПутьКФайлу = ФайловыеФункции.ПолныйПутьТома(СсылкаНаТом) + ПутьКФайлу;
        ТекОбъект.ИмяФайла = Сред(Диалог.ПолноеИмяФайла, СтрДлина(Диалог.Каталог) + 1);
    Исключение
        Сообщить("" + ОписаниеОшибки());
    КонецПопытки;

Весь текст модуля формы "ФормаСпискаФайловИИзображений" приведен во вложении.

храниние том файл присоединение

См. также

Адаптация типовых решений Платформа 1С v8.3 1С:Документооборот Россия Платные (руб)

Расширение конфигурации для «1С:Документооборот КОРП», редакция 3.0. позволяет: 1.использовать произвольные табличные части в качестве дополнительных реквизитов к документу; 2 использовать произвольные табличные части в шаблонах в формате docx для автоматического заполнения таблиц.

29400 руб.

29.06.2023    5635    14    5    

24

Логистика, склад и ТМЦ Адаптация типовых решений Пользователь Платформа 1С v8.3 1С:Управление нашей фирмой 1.6 1С:Управление нашей фирмой 3.0 Россия Управленческий учет Платные (руб)

Чтобы не допустить путаницы с обещаниями клиентам и для четкого контроля исполнения заказов мы используем резервирование товаров. Мы доработали УНФ, чтобы она автоматически отменяла старые резервы и не мешала эффективно продавать.

7200 руб.

02.08.2023    3896    11    0    

29

Адаптация типовых решений Программист Пользователь Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Абонемент ($m)

Каждый из нас сталкивается с ситуацией, когда какой-нибудь менеджер показывает свой Excel и рассказывает, как он что-то из 1С копирует в него, снабжает пояснениями, выделяет цветом и т.д. и т.п. Заканчивается все просьбой сделать вот чтобы также было в 1С. И оказывается такой человек (почти с гарантией) либо лучшим продажником, либо каким-то важным, за все отвечающим, - на ком все держится.

2 стартмани

22.04.2024    5083    dimanich70    15    

21

БСП (Библиотека стандартных подсистем) Адаптация типовых решений Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 Бесплатно (free)

Понадобилось в подменю "Создать на основании" добавить свою команду, которая открывает обработку. В процессе доработок появилась проблема двух подменю "Создать на основании". В статье о том, как решились проблемы.

01.03.2024    5424    dimanich70    9    

18
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. Pim 185 18.05.16 16:33 Сейчас в теме
Рекомендую автору не придумывать велосипед, а использовать объект Файл для получения данных.
Т.к. если в имени файла будет точка (кроме разделителя с расширением), ваш алгоритм не сработает.
2. Pim 185 18.05.16 16:47 Сейчас в теме
А где обработчик "КоманднаяПанельДополнительныхФайловСохранитьНаДиске"?
Зря скачал, много придётся допиливать...
3. oafan 27 18.05.16 20:50 Сейчас в теме
(2) Pim, Спасибо за замечание. Обязательно оптимизирую и подправлю файл модуля. На предприятии была немного другая задача - только файлы, без изображений. Там немного больше необходимо поправить. обязательно подправлю.
Оставьте свое сообщение