1с77 Создание отчёта. Работа с табличной частью документа

@mr.Nobody · Регистрация: 20.03.2012

Студворк — интернет-сервис помощи студентам

Доброго дня всем! Помогите новичку, хочу написать отчёт. Допустим, у меня есть журнал "завоз_в_магазин". В нём отображаются документы "завоз№-n", в табличной части которых записываются все продукты, которые завезли. Суть отчёта такова - есть выпадающее меню, в котором можно выбрать номер завоза и при нажатии кнопки сформировать выводится отчёт в котором содержатся все продукты, которые были завезены в выбранном номере завоза. За ранее спасибо!

@mikenlu · 16.11.2012, 20:08

Сообщение от mr.Nobody

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

Зачем тут период, если нужна лишь ТЧ конкретного документа

@sonatto · 16.11.2012, 20:16

Сообщение от mikenlu

получить на выходе и что у него есть для этого на входе

))

"ищу я выход из ворот,
но нет его есть только вход, и то не тот" В.Высоцкий

Добавлено через 4 минуты

Сообщение от mikenlu

ачем тут период

такой он изверг, в выбранном варианте поиска документа подай ему период и баста
Док.ВыбратьДокументы(ДатаН, ДатаН);//ДатаК уменьшит период до 1 дня

Добавлено через 3 минуты

Не по теме:

Сообщение от mikenlu

какого ера тут делает журнал с документами?

отягощенная наследственность

@mr.Nobody · 16.11.2012, 20:19 **[ТС]**

Сообщение от mikenlu

Я конечна, как генерал тостов говорить не умею: За разум!
Судя по всему, это та же история с журналами, имеет продолжение.

-нет это другое

Если автор поста, подробнее скажет что такое "есть выпадающее меню" - именно в том контексте как написано у него. и Самое главное скажет что он хочет получить на выходе и что у него есть для этого на входе, тогда будет еще быстрее и проще.

-уже говорил

@mikenlu · 16.11.2012, 20:20

Сообщение от sonatto

такой он изверг, в выбранном варианте

Ну если такой изверг, тогда вообще можно предложить таблицу значений, с колонкой где по двойному щелчку проставляется галочка напротив выбранного документа, и все выбранные печатать. Ну а что?!)) Извращаться так вообще до конца.....
На самом деле, мне кажется все намного проще - все человек знает и все может, так сказать тестирует

НУ а на счет

как скопировать модуль

- тут вообще я выпал в осадок, уже в ларь хотел идти) и первый вопрос который в голове возник Граждане! Вы там в DOS`e до сих пор работаете или копируете посты с других сайтов в другой кодировке? (хотя маловероятно).....

Просто зачем изобретать велосипед?

Другое дело, если его кто-то спрашивает? и он ответы ищет. тогда "Заказчика" в студию - может там вообще другое нужно в результате.

ПРОШУ МЕНЯ извинить, если кому-то мои слова показались бредом, но они не лишены логики

@mr.Nobody · 16.11.2012, 20:21 **[ТС]**

Сообщение от sonatto

Кликните здесь для просмотра всего текста

C
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
35
36
37
38
39
40
41
42
43
44
45
46
Процедура Сформировать()
    Таб=СоздатьОбъект("Таблица");
    Таб.ВывестиСекцию("шапка");
    Док = СоздатьОбъект("Документ.Завоз");
    Док.ВыбратьДокументы(ДатаН, ДатаК);
    СписокДокументов =  СоздатьОбъект("СписокЗначений");
* * Пока Док.ПолучитьДокумент() = 1 Цикл
               //заполняешь вожделенное поле со списком
        СписокДокументов.ДобавитьЗначение(Док);
//* * * * *ТабличнаяЧасть=СоздатьОбъект("ТаблицаЗначений");
//* * * * *Док.ВыгрузитьТабличнуюЧасть(ТабличнаяЧасть);
//* * * * *Номер=Док.НомерДок;
//* * * * *ТабличнаяЧасть.ВыбратьСтроки();
//* * * * * * Пока ТабличнаяЧасть.ПолучитьСтроку() = 1 Цикл
//* * * * * * * * УчПр= ТабличнаяЧасть.Товары;
//* * * * * * * * Таб.ВывестиСекцию("Уч");
//* * * * * * КонецЦикла;
* * КонецЦикла;
    ВыбЗнач = "";
    Если СписокДокументов.ВыбратьЗначение(ВыбЗнач)=1 тогда
        Док = ВыбЗнач;
* * * * *ТабличнаяЧасть=СоздатьОбъект("ТаблицаЗначений");
* * * * *Док.ВыгрузитьТабличнуюЧасть(ТабличнаяЧасть);
* * * * *Номер=Док.НомерДок;
* * * * *ТабличнаяЧасть.ВыбратьСтроки();
* * * * * * Пока ТабличнаяЧасть.ПолучитьСтроку() = 1 Цикл
* * * * * * * * УчПр= ТабличнаяЧасть.Товары;
* * * * * * * * Таб.ВывестиСекцию("Уч");
* * * * * * КонецЦикла;
 
    ////ВыбратьЗначение(<Значение>,<Заголовок>>,<Позиция>,<Таймаут>,<СпособВыбора>)
    ////Назначение:
    ////Открыть окно для интерактивного выбора значения из списка.
    ////Возвращает:  -1 (минус единица) - закончилось время <Таймаут> ожидания отклика пользователя, 1 - если выбор произведен, 0 - иначе.
    ////Параметры:
    ////<Значение> - идентификатор переменной, куда помещается результат выбора;
    ////<Заголовок> - строка заголовка диалогового окна.
    ////<Позиция> - идентификатор переменной, куда помещается номер позиции выбранного значения в списке.
    ////<Таймаут> - необязательный параметр. Числовое выражение, значение которого задает время ожидания системы (в секундах) на отклик пользователя.
    ////<СпособВыбора> - необязательный параметр. Число, значение которого задает способ выбора значения. 0 - в виде диалога; 1 - выбор производится в виде меню, которое подстраивается по месту текущего элемента диалога или ячейки таблицы; 2 - выбор маленьким списком (список похож на выбор значения перечисления), также привязанным к позиции элемента диалога
    ////Значение по умолчанию - 0.
    ////Замечание:
    ////Метод может использоваться только для переменных, созданных функцией СоздатьОбъект.
* * Таб.ВывестиСекцию("шапка");
* * Таб.Показать();
КонецПроцедуры

как видишь, без периода никак

КРУТОТА!

Сейчас поэкспериментирую! Спасибо большое!

@sonatto · 16.11.2012, 20:23

Сообщение от mr.Nobody

Сейчас поэкспериментирую

Большое пожалуйста особливо не забудь про конец

@mr.Nobody · 16.11.2012, 20:25 **[ТС]**

Сообщение от mikenlu

НУ а на счет - тут вообще я выпал в осадок, уже в ларь хотел идти) и первый вопрос который в голове возник Граждане! Вы там в DOS`e до сих пор работаете или копируете посты с других сайтов в другой кодировке? (хотя маловероятно).....

Эммм....а ты в 7.7 работал? Видно очень давно... Попробуй из него текст в любой текстовый редактор вставь! И будит ОБОЖЕТЕКСВДРУГОЙКОДИРОВКЕ==

@mikenlu · 16.11.2012, 20:32

Сообщение от mr.Nobody

Эммм....а ты в 7.7 работал? Видно очень давно... Попробуй из него текст в любой текстовый редактор вставь! И будит ОБОЖЕТЕКСВДРУГОЙКОДИРОВКЕ==

//**************************************** ***
// СПЕЦИАЛЬНО ДЛЯ - ЗАПУСТИЛ 7 и НАПИСАЛ ЭТУ ЧУШЬ
// ПРЯМЫМ КОПИПАСТОМ ВСТАВИЛ В ФОРУМ
Процедура Сформировать()

КонецПроцедуры

В чем проблема-то была?

@mr.Nobody · 16.11.2012, 20:39 **[ТС]**

Сообщение от mikenlu

//**************************************** ***
// СПЕЦИАЛЬНО ДЛЯ - ЗАПУСТИЛ 7 и НАПИСАЛ ЭТУ ЧУШЬ
// ПРЯМЫМ КОПИПАСТОМ ВСТАВИЛ В ФОРУМ
Процедура Сформировать()

КонецПроцедуры

В чем проблема-то была?

Вам скрин сделать?

У нас была такая же проблема и в колледже, когда мы копипастили у друг друга кода)
А вообще не в этом же суть! Вы просто отвлекаете от работы, ну правда )

@sonatto · 16.11.2012, 20:39

Не по теме:

Сообщение от mikenlu

ПРЯМЫМ КОПИПАСТОМ ВСТАВИЛ В ФОРУМ

клавишами с клавиатуры или мышью(проводной\беспроводной)?

@mr.Nobody · 16.11.2012, 20:48 **[ТС]**

Сообщение от sonatto

Большое пожалуйста особливо не забудь про конец

А нельзя было сделать с этим===> http://foto.hz.by/show-image.p... 6027893bcc

@sonatto · 16.11.2012, 20:52

Сообщение от mr.Nobody

А нельзя было сделать с этим===> http://foto.hz.by/show-image.p... 6027893bcc

не вкурился, о чем это. Здеся растолкуй(я п сомнительным ситам не хожу(( )

@mikenlu · 16.11.2012, 20:56

Сообщение от sonatto

не вкурился, о чем это. Здеся растолкуй(я п сомнительным ситам не хожу(( )

Ща увидишь - только не падай

@mr.Nobody · 16.11.2012, 20:57 **[ТС]**

Сообщение от sonatto

не вкурился, о чем это. Здеся растолкуй(я п сомнительным ситам не хожу(( )

Ладно не важно...

@sonatto · 16.11.2012, 21:03

Не по теме:

Сообщение от mr.Nobody

Ладно не важно...

не отвлекайся от эксперимента. перед тем как кнопку ОК жать, чирикни. Я в окоп спрячусь(шоб случайно осколком не задело)((:tomatos:

@mr.Nobody · 16.11.2012, 21:06 **[ТС]**

"Поле со списком"==

@sonatto · 16.11.2012, 21:27

Сообщение от mr.Nobody

Поле со списком

1C
1
2
3
4
5
6
СписокДокументов =  СоздатьОбъект("СписокЗначений");
Пока Док.ПолучитьДокумент() = 1 Цикл
//Заполняеш список
//у твоего поле со списком есть имя (идентификатор ПолеСоСписком )
//и 
СписокДокументов.Выгрузить(Форма.ПолеСоСписком )//кажется так

Добавлено через 9 минут

Не по теме:

Сообщение от mikenlu

Ща увидишь - только не падай

Армянская Красная шапочка приходит к армянской бабушке// далее текст оригинала//
....
вн: "бабушка, а почему у тебя такой большой НОС?)))
б: "Ара, ты на себя посмотри!" :rtfm:

@mr.Nobody · 16.11.2012, 21:56 **[ТС]**

Сообщение от sonatto

1C
1
2
3
4
5
6
СписокДокументов =  СоздатьОбъект("СписокЗначений");
Пока Док.ПолучитьДокумент() = 1 Цикл
//Заполняеш список
//у твоего поле со списком есть имя (идентификатор ПолеСоСписком )
//и 
СписокДокументов.Выгрузить(Форма.ПолеСоСписком )//кажется так

Добавлено через 9 минут

Не по теме:

Армянская Красная шапочка приходит к армянской бабушке// далее текст оригинала//
....
вн: "бабушка, а почему у тебя такой большой НОС?)))
б: "Ара, ты на себя посмотри!" :rtfm:

Получается тот большой код не нужен? ПРосто мой модифицировать?

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@mr.Nobody 1 / 1 / 1 Регистрация: 20.03.2012 Сообщений: 99

	1с77 Создание отчёта. Работа с табличной частью документа 16.11.2012, 16:06. Показов 10776. Ответов 37 Метки нет (Все метки) Доброго дня всем! Помогите новичку, хочу написать отчёт. Допустим, у меня есть журнал "завоз_в_магазин". В нём отображаются документы "завоз№-n", в табличной части которых записываются все продукты, которые завезли. Суть отчёта такова - есть выпадающее меню, в котором можно выбрать номер завоза и при нажатии кнопки сформировать выводится отчёт в котором содержатся все продукты, которые были завезены в выбранном номере завоза. За ранее спасибо! 0

@mr.Nobody 1 / 1 / 1 Регистрация: 20.03.2012 Сообщений: 99
	16.11.2012, 21:06 [ТС]
	"Поле со списком"== Изображения 0