Гость
Форумы / [игнор отключен] [закрыт для гостей] / Помогите с документов / 13 сообщений из 13, страница 1 из 1
19.12.2014, 13:57
    #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
19.12.2014, 15:13
    #38838204
Kecc
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с документов
Slash232,

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

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

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

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

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



Или результаты запроса выгрузить в ТЗ
...
Рейтинг: 0 / 0
19.12.2014, 17:22
    #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
19.12.2014, 17:23
    #38838379
Slash232
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с документов
Как дополнить чтобы заработало? Спасибо за помощь
...
Рейтинг: 0 / 0
19.12.2014, 17:40
    #38838394
XenoX
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с документов
Группировка(1) = 1
Или в запрос
Без итогов;
...
Рейтинг: 0 / 0
20.12.2014, 08:58
    #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
20.12.2014, 11:24
    #38838645
XenoX
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с документов
Ну будь внимательнее,
Не Группировка(1)
А группировка()
...
Рейтинг: 0 / 0
20.12.2014, 11:35
    #38838647
Slash232
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с документов
XenoX,
пишет что секция не найдена (Документ), чё не так?
...
Рейтинг: 0 / 0
20.12.2014, 12:11
    #38838653
XenoX
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с документов
Slash232,

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


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