powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / [игнор отключен] [закрыт для гостей] / Помогите с документов
13 сообщений из 13, страница 1 из 1
Помогите с документов
    #38838105
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Необходимо сделать внешний отчёт в котором будут номера всех заявок из 1С 7 версии.
Навоял пока следующее:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
Процедура Получить()
	Перем Запрос, ТекстЗапроса, Таб;
	//Создание объекта типа Запрос
	Запрос = СоздатьОбъект("Запрос");
	ТекстЗапроса = 
	"//{{ЗАПРОС(Получить)
	|Период с ВыбНачПериода по ВыбКонПериода;
	|НомерЗН = Документ.Операция.НомерДок;
	|Группировка НомерЗН;
	|"//}}ЗАПРОС
	;
	// Если ошибка в запросе, то выход из процедуры
	Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
		Возврат;
	КонецЕсли;

	// Подготовка к заполнению выходных форм данными запроса
	Таб = СоздатьОбъект("Таблица");
	Таб.ИсходнаяТаблица("Получить");
	// Заполнение полей "Заголовок"
	Таб.ВывестиСекцию("Заголовок");
	Состояние("Заполнение выходной таблицы...");
	Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
	Пока Запрос.Группировка(1) = 1 Цикл
		// Заполнение полей НомерЗН
		Таб.ВывестиСекцию("НомерЗН");
	КонецЦикла;   
	
	// Вывод заполненной формы
	Таб.ТолькоПросмотр(1);
	Таб.Показать("Получить", "");
КонецПроцедуры

Выводит только шапку но не одного номера. Что не так? Только начинаю разбиратся что и для чего
...
Рейтинг: 0 / 0
Помогите с документов
    #38838204
Kecc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Slash232,

если скорость работы не критична, можно пробовать через выбратьдокументы , он вроде медленный, но не глючить )

а так у себя пробуй еще Запрос.Группировка() - бывает иногда помогает.
кстати если не пользуешься датами, зачем они тебе в запросе ?

с уважением.
...
Рейтинг: 0 / 0
Помогите с документов
    #38838217
Kecc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Kecc,

забыл что на 7ке запрос так идет ) вопрос про период забудь )
...
Рейтинг: 0 / 0
Помогите с документов
    #38838264
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вопрос теперь другой, как написать запрос правильно если есть Документы называются ЗаказСТО и в них реквизиты Дата Номер и т.п. и мне их надо выгрузить в таблицу
...
Рейтинг: 0 / 0
Помогите с документов
    #38838283
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вопрос теперь другой, как написать запрос правильно если есть Документы называются ЗаказСТО и в них реквизиты Дата Номер и т.п. и мне их надо выгрузить в таблицу
...
Рейтинг: 0 / 0
Помогите с документов
    #38838362
Фотография XenoX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
ТекстЗапроса = "
|Период с НачДата по КонДата
|НомерДок = Документ.ХХ.НомерДок;
|ДатаДок = Документ.ХХ.НомерДок;
|Группировка Документ;
|Без итогов;
|";

Пока Запрос.Группировка() = 1 Цикл
КонецЦикла



Или результаты запроса выгрузить в ТЗ
...
Рейтинг: 0 / 0
Помогите с документов
    #38838377
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
Процедура Сформировать()
	Перем Запрос, ТекстЗапроса, Таб;
	//Создание объекта типа Запрос
	Запрос = СоздатьОбъект("Запрос");
	ТекстЗапроса = 
	"//{{ЗАПРОС(Сформировать)
	|Период с ВыбНачПериода по ВыбКонПериода;
	|Обрабатывать НеПомеченныеНаУдаление;
	|Дата = Документ.ЗаказСТО.ДатаФактИ;
	|НомерЗак = Документ.ЗаказСТО.НомерЗак;
	|Модель = Документ.ЗаказСТО.Модель;
	|Группировка Документ;
	|"//}}ЗАПРОС
	;
	// Если ошибка в запросе, то выход из процедуры
	Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
		Возврат;
	КонецЕсли;

	// Подготовка к заполнению выходных форм данными запроса
	Таб = СоздатьОбъект("Таблица");
	Таб.ИсходнаяТаблица("Сформировать");
	// Заполнение полей "Заголовок"
	Таб.ВывестиСекцию("Заголовок");
	Состояние("Заполнение выходной таблицы...");
	Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
	Пока Запрос.Группировка() = 1 Цикл
		// Заполнение полей Дата
	//	Таб.ВывестиСекцию("Дата");   
	//  Таб.ВывестиСекцию("НомерЗак");
	КонецЦикла;
	// Вывод заполненной формы
	Таб.ТолькоПросмотр(1);
	Таб.Показать("Сформировать", "");
КонецПроцедуры
...
Рейтинг: 0 / 0
Помогите с документов
    #38838379
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как дополнить чтобы заработало? Спасибо за помощь
...
Рейтинг: 0 / 0
Помогите с документов
    #38838394
Фотография XenoX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Группировка(1) = 1
Или в запрос
Без итогов;
...
Рейтинг: 0 / 0
Помогите с документов
    #38838620
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
Процедура Сформировать()
	Перем Запрос, ТекстЗапроса, Таб;
	//Создание объекта типа Запрос
	Запрос = СоздатьОбъект("Запрос");
	ТекстЗапроса = 
	"//{{ЗАПРОС(Сформировать)
	|Период с ВыбНачПериода по ВыбКонПериода;
	|Обрабатывать НеПомеченныеНаУдаление;
	|Дата = Документ.ЗаказСТО.ДатаФактИ;
	|НомерЗак = Документ.ЗаказСТО.НомерЗак;
	|Модель = Документ.ЗаказСТО.Модель;
	|Группировка Документ;
	|Без итогов;
	|"//}}ЗАПРОС
	;
	// Если ошибка в запросе, то выход из процедуры
	Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
		Возврат;
	КонецЕсли;

	// Подготовка к заполнению выходных форм данными запроса
	Таб = СоздатьОбъект("Таблица");
	Таб.ИсходнаяТаблица("Сформировать");
	// Заполнение полей "Заголовок"
	Таб.ВывестиСекцию("Заголовок");
	Состояние("Заполнение выходной таблицы...");
	Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
	Пока Запрос.Группировка(1) = 1 Цикл
		// Заполнение полей Дата
		Таб.ВывестиСекцию("Документ");   
    КонецЦикла;  
	// Вывод заполненной формы
	Таб.ТолькоПросмотр(1);
	Таб.Показать("Сформировать", "");
КонецПроцедуры

НЕ ВЫВОДИТ НИЧЕГО КРОМЕ ЗАГОЛОВКА ЧТО НЕ ТАК???? Спасибо
...
Рейтинг: 0 / 0
Помогите с документов
    #38838645
Фотография XenoX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну будь внимательнее,
Не Группировка(1)
А группировка()
...
Рейтинг: 0 / 0
Помогите с документов
    #38838647
Slash232
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
XenoX,
пишет что секция не найдена (Документ), чё не так?
...
Рейтинг: 0 / 0
Помогите с документов
    #38838653
Фотография XenoX
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Slash232,

У тебя в таблично документе нет такой секции, проверь названия
...
Рейтинг: 0 / 0
13 сообщений из 13, страница 1 из 1
Форумы / [игнор отключен] [закрыт для гостей] / Помогите с документов
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]