Версия для печати темы (https://pro1c.org.ua/index.php?s=16c3d36d23aab4d55dfd4649000371ca&showtopic=66750)

Нажмите сюда для просмотра этой темы в обычном формате

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 _ Программирование в 1С Предприятие 8.3 _ Не попадают данные с запроса в текстовые документ

Автор: lina1982 03.10.21, 5:36

Здравствуйте, Кнфигурация:
1С:Предприятие 8.3 (8.3.16.1063)
Бухгалтерия предприятия, редакция 3.0 - (1.3.10.150)

&НаСервере
Процедура ВыгрузитьНаСервере()
    
    
    Текст = Новый ТекстовыйДокумент;
    
    СтрокаТекст = "1CClientBankExchange";
    Текст.ДобавитьСтроку(СтрокаТекст);
    СтрокаТекст = "ВерсияФормата = 1.01";
    Текст.ДобавитьСтроку(СтрокаТекст);
    СтрокаТекст = "Кодировка = Windows";
    Текст.ДобавитьСтроку(СтрокаТекст);

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


        РезультатЗапроса = Запрос.Выполнить();
    
    ТЗ = РезультатЗапроса.Выбрать();
    Стр = ТЗ.БанковскийСчет;
    Текст.ДобавитьСтроку(Стр);
    Стр = ТЗ.Контрагент;
    Текст.ДобавитьСтроку(Стр);
    Стр =  ТЗ.БанковскийСчетПолучателя;
   Текст.ДобавитьСтроку(Стр);
 
    
        
        
    //КонецЦикла;
    АдресФайла = Объект.Файл;
    // Текст.Записать("D:\30_03_2021\гог.txt");
    Текст.Записать(АдресФайла);
    
    
    
    
    
КонецПроцедуры



&НаКлиенте
Процедура Выгрузить(Команда)
    ВыгрузитьНаСервере();
КонецПроцедуры

До запроса информацию выгружает, а сам запрос не видит... и ругается на:

Запрос.УстановитьПараметр("Ссылка",  Ссылка);

Не могу понять как из запроса записать данные в текстовый документ.
Помогите, пожалуйтста!

Автор: denis84 04.10.21, 7:20

lina1982 @ Вчера, 6:36 ,

Ссылку выбераете на форме?

Напишите так:

ЭтотОбъект.Ссылка

Автор: Vofka 04.10.21, 8:30

Цитата

ТЗ = РезультатЗапроса.Выбрать();

Это не ТЗ, а выборка из результата запроса. Что бы по ней двигаться, надо вызывать метод Следующий() на ней.

Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
   Стр = Выборка.БанковскийСчет;
КонецЦикла;

Автор: lina1982 06.10.21, 11:03

Vofka @ 04.10.21, 8:30 ,
Благодарю! У меня все получилось!

Автор: lina1982 06.10.21, 16:02

denis84 @ 04.10.21, 8:20 ,
Спасибо большое за помощь!

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7
https://pro1c.org.ua