Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Войти | Зарегистрироваться )




Свернуть

> Добро пожаловать на наш форум

Здравствуйте уважаемый посетитель. К сожалению вы не были распознаны форумом как зарегистрированный пользователь. Для полноценного использования возможностей нашего форума вам необходимо зарегистрироваться. Если вы уже зарегистрированы на форуме, то вам необходимо пройти авторизацию, используя Ваш логин и пароль.

Логин:   
Пароль:
 

Форум:

Новые темы (за 20 дней):

Последние сообщения:

Наши сервисы:

Дополнительно:

Новости для бухгалтера:

 
Вывести в отчёт данные из внутренней таблицы регистра [раздел Система компоновки данных]
Автор Shiwchik — 29.03.24, 14:29 — 0 комментариев
Добрый день. Очень нужна помощь по СКД.
На данный момент у меня в отчет выводится номенклатура (скрин 1),


но необходимо выводить "Найменування торгових мереж" (скрин 2).


Номенклатура по иерархии находится тут (скрин 3).

Ниже (рядом) расположил "ОтгрузкаПродукцииТовары" из верхнего регистра ПродажиИОбороты
где находится внутренняя таблица "Товари"
с "Найменування торгових мереж" (скрин 4), выделено красным.
Желтым выделено, то что потом буду подвязывать к наименованию торговых сетей.


Пытался как-то их связать (скрин 5).


Крутил вертел по разному, но ничего не выходит.
В общем: мне нужно вывести 1 - наименование торговых сетей, 2 - кол-во, 3 - цена, 4 - сумма документа отгрузка.
Но видимо из-за этой отдельной таблицы я не могу вывести в отчет, да и не смогу сгруппировать по наименованию товар.

Если где-то непонятно описал, скажите предоставлю больше информации.
Просмотров: 4, оставить комментарий   
ОСВ на регистрах [раздел Программирование в 1С Предприятие 7.7]
Автор kostya77 — 29.03.24, 13:58 — 0 комментариев
Добрый день. Подскажите. возможно ли сделати на регистрах что -то похожее на ОСВ, что бы было Сально начальное дебет и Кредит, обороты и Сальдо конечное Дебет и Кредит. Если это возмно, то подскажите как реализовать?
Просмотров: 17, оставить комментарий   
Не выводить итоги в детальных записях СКД [раздел Система компоновки данных]
Автор kostya77 — 28.03.24, 10:28 — 1 комментариев
Добрый день. Подскажите, есть отчет на СКД в нем три группировки - Контрагент, заказ, номенклатура. Выводятся итоги по сумма Заказа по группировкам и Общий итог. Как сделать так, чтобы в строку группировки Номенклатры не выводильсь суммы по Заказу?
Просмотров: 69, последний комментарий от AnryMc   
список элементов без каталогов [раздел Программирование в 1С Предприятие 7.7]
Автор 4andriy — 27.03.24, 17:45 — 1 комментариев
1с 7.7 Предприятие
при использовании в коде:
СписокЭлементов.ДобавитьЗначение(Сотрудники.ТекущийЭлемент());


почему-то в списке сотрудников показывает еще группы, например:
кадри
офис
грузчики
Иванов И.И
Петров И.И
Сидоров И.И

от чего зависит что-бы не показывало группы, а только сотрудников?
Просмотров: 63, последний комментарий от denis84   
Как скрыть некоторые значения перечисления из списка выбора в реквизите формы (Управляемы формы) [раздел Программирование в 1С Предприятие 8.3]
Автор AnryMc — 27.03.24, 14:57 — 3 комментариев
ДАНО:
Есть Перечисление АААААА со значениями:
- Значение 1
- Значение 2
- Значение 3
- Значение 4
- Значение 5

На форме есть реквизит (поле выбора) с данными - Перечисление ААААА

ЗАДАЧА: Показать пользователю в списке выбора только значения:
- Значение 1
- Значение 3
- Значение 5

ВОПРОС: Как это можно реализовать?

P.S.
Код:
НужныйСписок = НОВЫЙ СписокЗначений;
НужныйСписок.Добавить(Перечисления.ААААА.Значение1);
НужныйСписок.Добавить(Перечисления.ААААА.Значение3);
НужныйСписок.Добавить(Перечисления.ААААА.Значение5);

//ВЫРИАНТ 1
//Остается "первоначальный" список и добавляется "новый"
//Получается такой:
//- Значение 1
//- Значение 2
//- Значение 3
//- Значение 4
//- Значение 5
//- Значение 1
//- Значение 3
//- Значение 5

Элементы.МойРеквизит.СписокВыбора.Очистить();
Элементы.МойРеквизит.СписокВыбора.Добавить(НужныйСписок );

//ИЛИ
//ВАРИАНТ 2
//РАБОТАЕТ ТОЛЬКО НА ТОЛСТОМ КЛИЕНТЕ

Элементы.МойРеквизит.СписокВыбора.ДоступныеЗначения(НужныйСписок );
Просмотров: 93, последний комментарий от alexxbely   
Умова ИЛИ у швидкому відборі універсального звіту [раздел Программирование обычных форм 1С 8.2 и не интерфейсной логики]
Автор zay — 27.03.24, 9:59 — 3 комментариев
Доброго дня
Звичайні форми 8.3.10.2375, самописна конфігурація

У клієнта є звіт на базі універсального звіту (универсальный отчет). У звіті є поля Контрагент1, Контрагент2 і ці поля додані у швидкій відбір. При використанні звіту виявилося що клієнту зручно було б робити відбір вказуючи просто одного контрагента, байдуже хто він буде Контрагент1 чи Контрагент2

Чи можливо це зробити в універсальному звіті через відбори?
Чи треба прибирати швидкі відбори і робити як у звичайному звіті
|    И (Таб.Контрагент1 = &Контрагент ИЛИ Таб.Контрагент2 = &Контрагент)

?
Просмотров: 75, последний комментарий от AnryMc   
Как вывести на печать штрих код? [раздел Программирование в 1С Предприятие 8.3]
Автор kostya77 — 25.03.24, 13:57 — 2 комментариев
Добрый день. Подскажити ка вывести на печать Штрих код? Делаю так - на ПФ помещаю Таблица - Рисунки - Картина.в свойствах картинки выбираю Картинка - Штрих код. Присваиваю картинке имя ШтрихКод Пишу код

ПараметрыШтрихкода=Новый Структура("Ширина,Высота,ТипКода,ОтображатьТекст,Штрихкод",200,80,4,Истина,"12345678");
КартинкаШтрихКода=МенеджерОборудованияВызовСервера.ПолучитьКартинкуШтрихкода(ПараметрыШтрихкода);
ОбластьМакета.Рисунки.Штрихкод.Картинка=КартинкаШтрихКода;
ТабличныйДокумент.Вывести(ОбластьМакета);


Вылетает с ошибкой - Поле об`єкту не виявлено (Штрихкод)
Просмотров: 116, последний комментарий от Slon747   
Загрузка EXEL c сервера через COM [раздел Программирование в 1С Предприятие 8.3]
Автор burza — 21.03.24, 10:43 — 11 комментариев
На клиенте данные загружает, когда процедуру переношу на сервер, ругается на МассивКолонок = arr.Выгрузить(); именно Выгрузить, что нужно сделать?)

я знаю что есть код для сервера другой я и сам им удачно пользуюсь, но нужен именно этот по причинам.

        
Попытка    
        Excel = Новый COMОбъект("Excel.Application");
        WB   =  Excel.Workbooks.Open(файл);
        WS = WB.Worksheets(1);
        arr = WS.UsedRange.Value;
        WB.Close(0);
        
        Исключение    
        КонецПопытки;
        
        МассивКолонок = arr.Выгрузить();
        ВсегоСтрок = (МассивКолонок.Получить(0).Количество()) - 1;
Просмотров: 255, последний комментарий от Slon747   
Интеграция с CheckBox: как добавлять налоги и акцизы (вместе или по одному) [раздел Программирование обычных форм 1С 8.2 и не интерфейсной логики]
Автор alexandr_f — 19.03.24, 16:56 — 0 комментариев
При создании чека, как добавлять налоги и акцизі. У меня есть только А и Є, З и Б. Смотрю с сайта только один налог. но в АРИ там массив.
Просмотров: 142, оставить комментарий   
Як створити форму налаштування відборів для ТЗ на основі ПостроителяЗапроса или ПостроителяОтчета [раздел Программирование в 1С Предприятие 8.3]
Автор alex_shkut — 19.03.24, 15:28 — 7 комментариев
Власне завдання: Створити множинний відбір для ТЗ як у списках документів і т.і.
Є форма з ТЗ.
Форма додана до Документу.
Сам відбір доступний у ПострительЗапроса - все гарно.
Як створити та відобразити форму налаштування цих відборів як у стандартних списках типу: Використання, Поле, Тип порівняння, значення?
В мене проблема сформувати та показати цю форму.
Які є ідеї?

alex_shkut @ Сегодня, 15:24 * ,
У мене є ідея винести цю форму у Обробку і там це трохи простіше.
Користувач взагалі нічого не помітить, бо явного зв'язку з Документом немає ніякого.

alex_shkut @ Сегодня, 15:27 * ,
І прошу мене не хаяти - "це папереднікі", розгрібаю г...
Просмотров: 377, последний комментарий от alex_shkut   
Інтеграція CheckBox з 1с 7.7 [раздел Программирование в 1С Предприятие 7.7]
Автор Lunatik_5 — 18.03.24, 16:06 — 1 комментариев
Власне потрібна інтеграція CheckBox з 1с 7.7. Варіант з ВебЧек бухгалтер не хоче. Чи є у когось обробка чи приклад в конфігураціі, щоб налаштувати взаємодію з CheckBox? Якщо таке рішення має свою ціну, пишить, розглянемо.
Просмотров: 163, последний комментарий от nik389   
Загрузка документа в Excel. Формат файла не поддерживается [раздел Программирование в 1С Предприятие 8.3]
Автор Slon747 — 15.03.24, 7:59 — 12 комментариев
ТабличныйДокумент = Новый ТабличныйДокумент;
ТабличныйДокумент.Прочитать("D:\Temp\123.xls", СпособЧтенияЗначенийТабличногоДокумента.Значение);


Сохраняю на диск банковские выписки из "Приват24 для бизнеса".
При попытке загрузить в ТабличныйДокумент возникает ошибка:
Ошибка при выполнении файловой операции . Формат файла не поддерживается.

Открываю документ в Excel и сохранить его (после этого размер файла увеличивается).
После этого загрузка проходит нормально.
Как до так и после пересохранения формат файла не меняется (в заголовке символы "РПаЎ±б").
Ни версия платформы 1С, ни изменение расширения файла на это влияет.
Чтобы обойти эту проблему, перед чтением документа в табличный документ, запускаю Application.Excel, открываю его и пересохраняю.
Но если на пк не установлен Excel, то это уже не поможет.

Можно ли как-то это исправить?
Или есть ли какая-то утилита для или способ открытия/сохранения документа excel без установленного Excel?
Просмотров: 305, последний комментарий от Slon747   
Ошибка в печатной форме счета. :(((( [раздел Платформа 7.7]
Автор babykiev — 14.03.24, 22:12 — 3 комментариев
Дорогие программисты, ПАМАГИТЕ:((( Пожалуйста, только не спрашивайте зачем я туда лезла, я не знаю:((( 1 С 7.7. Суть проблемы. Нужно было отредактировать информацию в шапке счета. У меня ФОП и я хотела удалить строку ІПН і свідоцтво ( просто не нужні, хотела тчобі біло красиво) Нашла на каком-то форуме информацию. Зашла в конфигуратор-"Конфигурация"-"Открыть конфигурацию"-"документы"-"Счет", нажала на вкладку, высветилось окно, нажала "Форма"-"Таблица_укр" Появилась шапка. Я удалила строку <ІПН [Фирма.ИНН], номер свідоцтва [Фирма.НомерСвидетельства]>, потом все сохранила. Зашла в 1С, формирую счет, действительно ИНН и свидетельство пропали из шапки, НО вверху, где фирма, у меня наименование ФОП было пишет "Фирма.ПолнНаименование". Я снова зашла туда же в конфигуратор, назад добавила то, что удалила. Но все равно в шапке осталось "Фирма.ПолнНаименование" плюс при выводе на печать было просто ІПН, свідоцтво,а сейчас вот такое ІПН [Фирма.ИНН], номер свідоцтва [Фирма.НомерСвидетельства] Подскажите пожалуйста, как исправить ошибку? Чтобы выводось наменование фирмы вверху (грубо мои данные ФОП, как было и по возможности, не выводилось ИНН и свидетельство.Ну или пусть хоть наименование фирмы выводится. Прошу Вас, помогите:(((

Фото экранов не смогла добавить sad.gif


Просмотров: 166, последний комментарий от Pepe   
Многоуровневая шапка отчёта разными цветами (СКД) [раздел Система компоновки данных]
Автор Shiwchik — 13.03.24, 17:20 — 13 комментариев
Добрый день.
Многоуровневая шапка отчёта разными цветами (СКД) соответственно и группировки тоже.
Это вообще возможно? А то колупаюсь сутки и ничего не выходит.
Вот пример:

Просмотров: 359, последний комментарий от Shiwchik   
УНФ загрузка внешный данных [раздел Программирование в 1С Предприятие 8.3]
Автор burza — 13.03.24, 12:39 — 2 комментариев
в УНФ штатная загрузка внешных данных, делаю загрузку из ексель. В справочники номенклатуры добавил поле КатегорияОбмена- ведет на другой справочник(поле выбора). При загрузке все показывает а когда создаеться номен то поле пустое.Если поле простое строка то все ок, а если там стоит выбор то не как. Вроде по аналогии добавил в модули но ничего. Может кто-то сталкивался.
Это в менеджере Номенклатуры
ЗагрузкаДанныхИзВнешнегоИсточника.ДобавитьПолеОписанияЗагрузки(ТаблицаПолейЗагрузки, "КатегорияОбмена", "КатегорияОбмена", ОписаниеТиповСтрока25,ОписаниеТиповКолонка,"Номенклатура",2,,Истина);

 ЗагрузкаДанныхИзВнешнегоИсточникаПереопределяемый.СопоставитьНоменклатуруКатегорияОбмена(СтрокаТаблицыФормы.КатегорияОбмена);


Это в общем
Процедура СопоставитьНоменклатуруКатегорияОбмена(КатегорияОбмена) Экспорт
     ЗначениеБылоСопоставлено = Ложь;
    
    Если НЕ ЗначениеБылоСопоставлено И ЗначениеЗаполнено(КатегорияОбмена) Тогда
        
        СправочникСсылка = Справочники.КатегорияОбмена.НайтиПоНаименованию(КатегорияОбмена);
        Если НЕ СправочникСсылка.Пустая() Тогда
            
            
            ЗначениеБылоСопоставлено = Истина;
            Номенклатура = СправочникСсылка.Наименование;
            
        КонецЕсли;
        
    КонецЕсли;
        
КонецПроцедуры


Отладка туда не пускает,ничего не происходит(
Просмотров: 213, последний комментарий от takefive   
Нужно найти КонечнаяДата = ДатаДокумента + КоличествоДней [раздел Система компоновки данных]
Автор Shiwchik — 12.03.24, 11:32 — 4 комментариев
Добрый день.
Помогите решить задачу.
В столбце "Строк оплати договору" необходимо вывести конечную дату по договору.
КонечнаяДата = ДатаДокумента + КоличествоДней
Т.е. к дате документа прибавить количество дней (число) указанное в договоре и вывести в столбец дату.
Я так понимаю нужно 14 дней (например) перевести в секунды = 1209600
и прибавить к дате, которую тоже перевести в число и потом обратно?
Или как?
Просмотров: 206, последний комментарий от Shiwchik   
Сумма документа выводится ресурсом не правильно [раздел Система компоновки данных]
Автор Shiwchik — 11.03.24, 12:12 — 4 комментариев
Добрый день.
Делаю отчёт в СКД, добавил документы продажи, вывел все ресурсы, работает норм.
Но понадобилось вывести ещё данные поддокумента "Корректировка" и не могу показать нормальные цифры.
В общем как я понял, неправильная цифра которую выводит 1С -
это сумма документа "Корректировка" умноженное на количество строк в документе.
Т.е. Если сумма документа 50 и в документе 4 позиции номенклатуры, выводит 200.
Если 100 и 3 позиции номенклатуры, выводит 300.
Почему программа перемножает на количество строк документа?
Могу вывести сумму из документа, не как ресурс, но тогда не могу поставить вывести сумму по контрагенту.
Я новичок, не пинайте сильно.
1C:Предприятие 8.3 (8.3.19.1659)






Shiwchik @ Сегодня, 11:38 * ,

Да и изначально сумма не была ресурсом, может в этом причина?



Просмотров: 232, последний комментарий от Shiwchik   
BAF не выводит значение Период в запросе из регистра накопления по периоду ДЕНЬ [раздел Программирование в 1С Предприятие 8.3]
Автор ItalianoVero — 08.03.24, 11:13 — 1 комментариев
Установили последнюю версию BAF 8.3.19.1529, поломался вывод из регистров накоплений по периоду ДЕНЬ.
Запрос простейший:
Запрос = Новый Запрос;
ТекстЗапроса = "        
        |ВЫБРАТЬ
        |  ГВСОбороты.Период,
        |  ГВСОбороты.Договор
        |ИЗ
        |  РегистрНакопления.ГВС.Обороты(&Дата1, &Дата2, День) КАК ГВСОбороты";
        Запрос.Текст = ТекстЗапроса;
        Запрос.УстановитьПараметр("Дата1", НачалоДня(Дата1));
        Запрос.УстановитьПараметр("Дата2", КонецДня(Дата2));

Выборка выдает значения Договор, но Период возвращает пустую дату.
При этом если заменить периодичность на Регистратор или Секунда или Месяц - то возвращает заполненный Период.
Кроме того замечено, что если запрос изменить следующим облазом, чтобы данные вначале записались во временную таблицу, а потом вывести все из временной таблицы:
ТекстЗапроса = "        
        |ВЫБРАТЬ
        |  ГВСОбороты.Период,
        |  ГВСОбороты.Договор
        |Поместить ВРТаб
        |ИЗ
        |  РегистрНакопления.ГВС.Обороты(&Дата1, &Дата2, День) КАК ГВСОбороты
        |;
        |ВЫБРАТЬ
        |  ВРТаб.Период,
        |  ВРТаб.Договор
        |ИЗ
        |  ВРТаб КАК ВРТаб";

то реквизит Период будет заполнен, а не пустым.
При этом, если подключить SQL базу обратно на 1С, то все работает и Период выводится.
Просмотров: 190, последний комментарий от Vofka   
Фото в отчете номенклатуры [раздел Программирование в 1С Предприятие 8.3]
Автор burza — 08.03.24, 10:10 — 2 комментариев
Здравствуйте. Задача стоит вывести всю номен с ее фото в отчет. У меня ошибка где-то . Когда вывожу один товар всё ок, а когда все то картинка растягиваеться на всю номен а не отдельно на каждую строку.Что не так подскажите?

Запрос
ВЫБРАТЬ
    Номенклатура.Ссылка КАК Ссылка,
    Номенклатура.ФайлКартинки КАК ФайлКартинки
ИЗ
    Справочник.Номенклатура КАК Номенклатура
ГДЕ
    Номенклатура.КатегорияНоменклатуры.Родитель.Наименование = &Наименование

И сам модуль
Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
    
    СтандартнаяОбработка = Ложь; // отключаем стандартный вывод отчета - будем выводить программно         
    Настройки = КомпоновщикНастроек.Настройки;// Получаем настройки отчета  
    
    //ketr
    НастройкиОтчета = КомпоновщикНастроек.ПолучитьНастройки();
    
    ПараметрПериод = НастройкиОтчета.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("ДатаОстатка"));
    Если ПараметрПериод <> Неопределено
        И ПараметрПериод.Использование
        И ЗначениеЗаполнено(ПараметрПериод.Значение) Тогда
        
        ПараметрПериод.Значение = КонецДня(ПараметрПериод.Значение);
    КонецЕсли;

     ПараметрыОтчета = ПодготовитьПараметрыОтчета(НастройкиОтчета);

    //ketr
    
    
    // Устанавливаем настройки отбора в соответствии с пользовательскими настройками
    ТаблицаОтборов = КомпоновщикНастроек.ПользовательскиеНастройки.Элементы;
    Для Каждого ЭлементОтбора Из КомпоновщикНастроек.Настройки.Отбор.Элементы Цикл        
        НайденнаяПользовательскаяНастройка =
            ТаблицаОтборов.Найти(ЭлементОтбора.ИдентификаторПользовательскойНастройки);        
        Если НайденнаяПользовательскаяНастройка <> Неопределено Тогда
            ЭлементОтбора.ВидСравнения = НайденнаяПользовательскаяНастройка.ВидСравнения;
            ЭлементОтбора.Использование = НайденнаяПользовательскаяНастройка.Использование;
            ЭлементОтбора.ПравоеЗначение = НайденнаяПользовательскаяНастройка.ПравоеЗначение;
        КонецЕсли;        
    КонецЦикла;
    
    ДанныеРасшифровки = Новый ДанныеРасшифровкиКомпоновкиДанных; // Создаем данные расшифровки             
    КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных; // Создаем компоновщик макета        
    // Инициализируем макет компоновки используя схему компоновки данных
    // и созданные ранее настройки и данные расшифровки
    СхемаКомпоновкиДанных = ПолучитьМакет("ОсновнаяСхемаКомпоновкиДанных");
    МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, НастройкиОтчета, ДанныеРасшифровки);
    
    // Скомпонуем результат
    ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
    ПроцессорКомпоновки.Инициализировать(МакетКомпоновки, , ДанныеРасшифровки);
    
    ДокументРезультат.Очистить();
    
    // Выводим результат в табличный документ
    ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
    ПроцессорВывода.УстановитьДокумент(ДокументРезультат);    
    //....
    ПроцессорВывода.Вывести(ПроцессорКомпоновки);
    

    // Заполняем рисунки для полей, в данных расшифровки которых находятся элементы справочника
    // "НоменклатураПрисоединенныеФайлы"
    КоличествоКолонокТаблицы = ДокументРезультат.ШиринаТаблицы; // Количество колонок в отчете
    КоличествоСтрокТаблицы = ДокументРезультат.ВысотаТаблицы;     // Количество строк в отчете
    Рис1 = 0;
    стПерв = 0;
    Номен = "";
    // Обходим все ячейки отчета
    Для Кл = 1 По КоличествоКолонокТаблицы Цикл         
        Для Ст = 1 По КоличествоСтрокТаблицы Цикл              
            ТекОбласть = ДокументРезультат.Область(Ст, Кл);  
            // Если имеется расшифровка ячейки, то проверям наличие полей расшифровки
            Если ТекОбласть.Расшифровка <> Неопределено Тогда
                ПоляРасшифровки = ДанныеРасшифровки.Элементы[ТекОбласть.Расшифровка].ПолучитьПоля();
                Если ПоляРасшифровки.Количество() > 0 Тогда
                    // Если тип значения поля расшифровки соответствует справочнику прикрепленных файлов, то
                    // выводим связанную картинку
                                    
    
                    Рисунок = ПолучитьИзображение(ПоляРасшифровки.Получить(0).Значение);
                    Если Рисунок <> Неопределено  Тогда
                        Если ДокументРезультат.Область(ст, 4, Ст, 4).Текст <> Номен и стПерв <> 0  Тогда
                            ТекОбласть = ДокументРезультат.Область(стПерв, Кл, Ст-1,Кл);
                            Если  Ст - стПерв = 1 Тогда
                                ТекОбласть.ВысотаСтроки = 20.5*9;
                            Иначе
                                ТекОбласть.ВысотаСтроки = 20.5*9/ (Ст - стПерв);
                            КонецЕсли;
                            
                            Рис = ДокументРезультат.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
                            Рис.РазмерКартинки = РазмерКартинки.Пропорционально;
                            Рис.Картинка = Рис1;
                            Рис.Расположить(ТекОбласть);
                            Рис1 = Рисунок;
                            стПерв = ст;                                
                            Номен = ДокументРезультат.Область(ст, 4, Ст, 4).Текст;
                        ИначеЕсли  стПерв = 0 Тогда
                            стПерв = ст;
                            Рис1 = Рисунок;
                            Номен = ДокументРезультат.Область(ст, 4, Ст, 4).Текст;

                        КонецЕсли;
                                            
                    КонецЕсли;
                КонецЕсли;
            КонецЕсли;              
        КонецЦикла;  
        
        Если Рисунок <> Неопределено  Тогда
            ТекОбласть = ДокументРезультат.Область(стПерв, Кл, Ст-1,Кл);
            Если  Ст - стПерв = 1 Тогда
                ТекОбласть.ВысотаСтроки = 20.5*9;
            Иначе
                ТекОбласть.ВысотаСтроки = 20.5*9/ (Ст - стПерв);
            КонецЕсли;
            
            Рис = ДокументРезультат.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
            Рис.РазмерКартинки = РазмерКартинки.Пропорционально;
            Рис.Картинка = Рис1;
            Рис.Расположить(ТекОбласть);
        КонецЕсли;

    КонецЦикла;
            
КонецПроцедуры

Функция ПолучитьИзображение(ПрисоединенныйФайл)
    
    КартинкаПоумолчанию = Неопределено;
    
    Если ТипЗнч(ПрисоединенныйФайл) =
            Тип("СправочникСсылка.НоменклатураПрисоединенныеФайлы") Тогда                
        Запрос = Новый Запрос;
        Запрос.Текст =
        "ВЫБРАТЬ
        |    НоменклатураПрисоединенныеФайлы.Ссылка КАК ХранимыйФайл
        |ИЗ
        |    Справочник.НоменклатураПрисоединенныеФайлы КАК НоменклатураПрисоединенныеФайлы
        |ГДЕ
        |    НоменклатураПрисоединенныеФайлы.Наименование = &ПрисоединенныйФайл";         
        Запрос.УстановитьПараметр("ПрисоединенныйФайл", ПрисоединенныйФайл.Наименование);         
        Результат = Запрос.Выполнить();
        Если НЕ Результат.Пустой() Тогда
            Выборка = Результат.Выбрать();
            Выборка.Следующий(); // Получаем двоичные данные катинки
            Если НЕ ЗначениеЗаполнено(Выборка.ХранимыйФайл) Тогда
                Возврат Новый Картинка(ПолучитьМакет("НетКартинки"));
            Иначе
                ДанныеФайла = РаботаСФайлами.ДвоичныеДанныеФайла(Выборка.ХранимыйФайл, Неопределено);
                Возврат Новый Картинка(ДанныеФайла);
            КонецЕсли;
        Иначе //// Если данные отсутствуют, получаем стандартное изображение из
              // дополнительного макета внешнего отчета
            Возврат Новый Картинка(ПолучитьМакет("НетКартинки"));
        КонецЕсли;
    КонецЕсли;
    
    Возврат КартинкаПоумолчанию;
    
КонецФункции


burza @ Сегодня, 10:01 * ,
сам отчет https://dropmefiles.com.ua/ua/zN8hv52w
Просмотров: 275, последний комментарий от alex_shkut   
Дополнительный словарь полнотекстового поиска в режиме Предприятия [раздел Программирование в 1С Предприятие 8.3]
Автор AnryMc — 08.03.24, 9:18 — 0 комментариев
Можно ли сделать дополнительный словарь для полнотекстового поиска который можно редактировать (дополнять) в режиме "Предприятия" (Пользователем)?
Просмотров: 134, оставить комментарий   
RSS Текстовая версия Сейчас: 29.03.24, 14:34
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!