Имя: Пароль:
1C
1С v8
Передать переменную в имя файла при сохранении в PDF
0 vooviik
 
19.10.18
13:56
Привет, подскажите как передать переменную в имя сохраняемого файла?

Нужно добавить Номер заказа (ЗаказПокупателя.Номер)

Сейчас отлично сохраняет так: ТабличныйДокумент.Записать("\\server\Сетевая\Склад\Заявка_на_сбор_"+строка(Формат(ТекущаяДата(), "ДЛФ=Д"))+".pdf",ТипФайлаТабличногоДокумента.PDF);
1 vooviik
 
19.10.18
13:57
Полный код ВПФ

Функция Печать() Экспорт
    ТабличныйДокумент    = Новый ТабличныйДокумент;
    Макет                = ПолучитьМакет("НашМакет");
    
    ЗапросДанных    = Новый Запрос("ВЫБРАТЬ
                                   |    ПРЕДСТАВЛЕНИЕ(ЗаказПокупателя.Контрагент) КАК Контрагент,
                                   |    ПРЕДСТАВЛЕНИЕ(ЗаказПокупателя.Организация) КАК Организация,
                                   |    ПРЕДСТАВЛЕНИЕ(ЗаказПокупателя.Ответственный)  КАК Ответственный,
                                   |    ПРЕДСТАВЛЕНИЕ(ЗаказПокупателя.Номер) КАК НомерЗаказа
                                   |ИЗ
                                   |    Документ.ЗаказПокупателя КАК ЗаказПокупателя
                                   |ГДЕ
                                   |    ЗаказПокупателя.Ссылка = &Ссылка");
    ЗапросДанных.УстановитьПараметр("Ссылка", СсылкаНаОбъект);
    Шапка    = ЗапросДанных.Выполнить().Выбрать();
    Шапка.Следующий();
    
    Область    = Макет.ПолучитьОбласть("Шапка");
    Область.Параметры.Заполнить(Шапка);
    
    ТабличныйДокумент.Вывести(Область);
    
    
    ЗапросДанных.Текст    = "ВЫБРАТЬ
                            |    _Товары.НомерСтроки,
                            |    ПРЕДСТАВЛЕНИЕ(_Товары.Номенклатура) КАК Номенклатура,
                            |    _Товары.Количество,
                          | _Товары.Номенклатура.Артикул КАК Артикул,
                          | _Товары.ХарактеристикаНоменклатуры  КАК Характеристика
                          |ИЗ
                            |    Документ.ЗаказПокупателя.Товары КАК _Товары
                            |ГДЕ
                            |    _Товары.Ссылка = &Ссылка";
    Выборка    = ЗапросДанных.Выполнить().Выбрать();
    
    Область    = Макет.ПолучитьОбласть("Данные");
    
    
    
    Пока Выборка.Следующий() Цикл
        Область.Параметры.Заполнить(Выборка);
        ТабличныйДокумент.Вывести(Область);
    КонецЦикла;
    
    Область    = Макет.ПолучитьОбласть("Подвал");
    Область.Параметры.ДатаЗаявки = Формат(ТекущаяДатаСеанса(), "dd.MM.yyy");
    ТабличныйДокумент.Вывести(Область);
    
    ТабличныйДокумент.Записать("\\server\Сетевая\Склад\Заявка_на_сбор_"+строка(Формат(ТекущаяДата(), "ДЛФ=Д"))+".pdf",ТипФайлаТабличногоДокумента.PDF);
  
         
    Возврат    ТабличныйДокумент;        
КонецФункции
2 PuhUfa
 
19.10.18
13:59
И что тебя останавливает?
3 Случайный прохожий
 
19.10.18
14:00
ТабличныйДокумент.Записать("\\server\Сетевая\Склад\Заявка_на_сбор_ №"+строка(СсылкаНаОбъект.Номер)+строка(Формат(ТекущаяДата(), "ДЛФ=Д"))+".pdf",ТипФайлаТабличногоДокумента.PDF);
4 vooviik
 
19.10.18
14:03
Спасибо, вон оно как