Обработка для Фронтол - выгрузка дисконтных карт
По теме из базы знаний
Найденные решения
(3) Пример получения имени файла отчета, имя файла выгрузки можно получить из СтруктураДанных
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ТипОборудования",Перечисления.ТипыПодключаемогоОборудования.ККМOffline);
Запрос.Текст="ВЫБРАТЬ
| ПодключаемоеОборудование.Ссылка КАК ККМ,
| ПодключаемоеОборудование.Параметры
|ИЗ
| Справочник.ПодключаемоеОборудование КАК ПодключаемоеОборудование
|ГДЕ
| ПодключаемоеОборудование.ТипОборудования = &ТипОборудования";
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
НовСтр=Объект.ТЧККМ.Добавить();
НовСтр.ККМ = Выборка.ККМ;
СтруктураДанных=Выборка.Параметры.Получить();
НовСтр.ФайлОтчета=СтруктураДанных.ФайлОтчета;
КонецЦикла;
ПоказатьОстальные ответы
В избранное
Подписаться на ответы
Сортировка:
Древо развёрнутое
Свернуть все
(3) Пример получения имени файла отчета, имя файла выгрузки можно получить из СтруктураДанных
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ТипОборудования",Перечисления.ТипыПодключаемогоОборудования.ККМOffline);
Запрос.Текст="ВЫБРАТЬ
| ПодключаемоеОборудование.Ссылка КАК ККМ,
| ПодключаемоеОборудование.Параметры
|ИЗ
| Справочник.ПодключаемоеОборудование КАК ПодключаемоеОборудование
|ГДЕ
| ПодключаемоеОборудование.ТипОборудования = &ТипОборудования";
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
НовСтр=Объект.ТЧККМ.Добавить();
НовСтр.ККМ = Выборка.ККМ;
СтруктураДанных=Выборка.Параметры.Получить();
НовСтр.ФайлОтчета=СтруктураДанных.ФайлОтчета;
КонецЦикла;
Показать
(4)Огромное спасибо, хоть сдвинулся с мертвой точки.
У меня запрос выглядит следующим образом.
Результат: D:\1СDATABASE\FRONTOL\tovar.txt
Осталось самая малость выделит имя файла.
У меня запрос выглядит следующим образом.
&НаСервере
Функция ПолучитьИмяФайла(Файл)
Идентификатор = Элементы.КассыККМ.ТекущаяСтрока;
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("Ссылка",Идентификатор);
Запрос.Текст="ВЫБРАТЬ
| ПодключаемоеОборудование.Ссылка КАК Ссылка,
| ПодключаемоеОборудование.Параметры
|ИЗ
| Справочник.ПодключаемоеОборудование КАК ПодключаемоеОборудование
|ГДЕ
| ПодключаемоеОборудование.Ссылка = &Ссылка";
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
СтруктураДанных = Выборка.Параметры.Получить();
БазаТоваров = СтруктураДанных.БазаТоваров;
КонецЦикла;
Файл = БазаТоваров;
Возврат Файл;
КонецФункции
ПоказатьРезультат: D:\1СDATABASE\FRONTOL\tovar.txt
Осталось самая малость выделит имя файла.
Вакансии
Аналитик 1С / Бизнес-аналитик
Нижний Новгород
зарплата от 100 000 руб. до 250 000 руб.
Временный (на проект)
Нижний Новгород
зарплата от 100 000 руб. до 250 000 руб.
Временный (на проект)