Форум программистов, компьютерный форум, киберфорум
1С: Собственные программы
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.88/25: Рейтинг темы: голосов - 25, средняя оценка - 4.88
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
1
1C 8.x

Как в ТЗ вывести группы и подгруппы в отдельные столбцы или строку?

20.05.2014, 12:21. Показов 5012. Ответов 22
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Вот пример:
1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 Запрос = Новый Запрос;
       Запрос.Текст =
        "ВЫБРАТЬ
        |   Номенклатура.Родитель.Родитель КАК ГруппаНоменклатуры,
        |   Номенклатура.Родитель КАК ПодгруппаНоменклатуры,
        |   Номенклатура.Ссылка КАК Номенклатура,
        |   Номенклатура.ЭтоГруппа,
        |   Номенклатура.Наименование
        |ИЗ
        |   Справочник.Номенклатура КАК Номенклатура
        |ГДЕ
        |   Номенклатура.ЭтоГруппа = ЛОЖЬ";
        
    Выборка = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
        
        Пока Выборка.Следующий() Цикл
            Если Выборка.ЭтоГруппа = Истина Тогда   
        Иначе
            Стр=ТЗ.Добавить();
            Стр.Наименование = Выборка.Наименование;
            КонецЕсли
        КонецЦикла;
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.05.2014, 12:21
Ответы с готовыми решениями:

Найти порядок группы, таблицу (Кэли) умножений элементов, все нормальные подгруппы группы
Задача по алгебре.Теория групп.Найти порядок группы, таблицу (Кэли) умножений элементов, все...

Доказать, что порядок и индекс подгруппы конечной группы являются делителями порядка самой группы
Здравствуйте! Помогите, пожалуйста, решить данную задачу: "Доказать, что порядок и индекс...

Вывести русские символы в отдельные столбцы
Есть 2 столбца с данными, нужно создать для каждого из них по столбцу в который будут считываться...

Как разбить строку на отдельные слова и вывести их в столбец А активного рабочего листа в порядке возрастания их длины
Дана строка символов,разделенных пробелами.Разбить строку на отдельные слова и вывести их в столбец...

22
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
20.05.2014, 12:34  [ТС] 2
Пример такой же:
Изображения
 
0
2955 / 1767 / 82
Регистрация: 03.11.2011
Сообщений: 8,280
20.05.2014, 22:30 3
ИТОГИ, ИЕРАРХИЯ... Хотя я вопроса не увидел
Постройте отчет конструктором обычной формы и посмотрите текст.
0
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
21.05.2014, 11:00  [ТС] 4
duk337, не видит подгруппы
Кликните здесь для просмотра всего текста
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
    Тз = Новый ТаблицаЗначений;
    Тз.Колонки.Добавить("Менеджер");
    Тз.Колонки.Добавить("Количество");
    Тз.Колонки.Добавить("Сумма")
 
           Запрос = Новый Запрос;
       Запрос.Текст =
        "ВЫБРАТЬ
        |   КлассификаторТМЦ.Родитель,
        |   КлассификаторТМЦ.ЭтоГруппа,
        |   КлассификаторТМЦ.Наименование КАК Наименование,
        |   КлассификаторТМЦ.Код,
        |   КлассификаторТМЦ.Ссылка,
        |   КлассификаторТМЦ.ЕдиницаИзмерения
        |ИЗ
        |   Справочник.КлассификаторТМЦ КАК КлассификаторТМЦ
        |
        |УПОРЯДОЧИТЬ ПО
        |   КлассификаторТМЦ.Наименование
        |ИТОГИ ПО
        |   Наименование";
        
                
        Результат = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией);
        //Тз = Результат.Выгрузить();
 
        Пока Результат.Следующий() Цикл
            Если Результат.ЭтоГруппа = Истина Тогда   
        Иначе
            Стр=ТЗ.Добавить();
            Стр.Менеджер = Результат.Наименование;
            Стр.Количество =  Результат.ЕдиницаИзмерения;
            Стр.Сумма = Результат.Код;
            КонецЕсли
        КонецЦикла;
        
        
    ЭлементыФормы.ТабМен.Значение = Тз;
    ЭлементыФормы.ТабМен.СоздатьКолонки();
    ЭлементыФормы.ТабМен.ОбновитьСтроки();
Миниатюры
Как в ТЗ вывести группы и подгруппы в отдельные столбцы или строку?   Как в ТЗ вывести группы и подгруппы в отдельные столбцы или строку?  
0
2955 / 1767 / 82
Регистрация: 03.11.2011
Сообщений: 8,280
21.05.2014, 11:24 5
Очень затруднительно ответить что-либо. Одни траблы и косяки, а структура неизвестна.
Давайте забудем пока о ТЗ и начнём с запроса. Для этого попробуйте описать, что Вам хочется получить на выходе, опираясь на структуру базы: типы реквов, подчинённость справочников.

Добавлено через 2 минуты
На вопрос-то можно ответить просто
Цитата Сообщение от felicita_091 Посмотреть сообщение
Пока Результат.Следующий() Цикл Если Результат.ЭтоГруппа = Истина Тогда Иначе
Вы сами убиваете группы. Но дело даже и не в этом...

Не по теме:

Просьба: не спрашивайте "А в чём?!"

0
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
21.05.2014, 11:33  [ТС] 6
duk337, может есть у вас простой пример чтоб информацию вытянуть из справочника группу и подгруппу, и вывести в отчет с помощью запроса..я вчера целый день накосячила всякого ни одно не получается(
0
2955 / 1767 / 82
Регистрация: 03.11.2011
Сообщений: 8,280
21.05.2014, 11:46 7
1C
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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
Процедура Отчет(ТабДок) Экспорт
    //{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(Отчет)
    // Данный фрагмент построен конструктором.
    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
 
    Макет = ВнешнийОтчетОбъект.ПолучитьМакет("Отчет");
    Запрос = Новый Запрос;
    Запрос.Текст = 
    "ВЫБРАТЬ
    |   ДоговорыКонтрагентов.Владелец КАК Владелец,
    |   ПРЕДСТАВЛЕНИЕ(ДоговорыКонтрагентов.Владелец),
    |   ДоговорыКонтрагентов.Ссылка КАК Ссылка,
    |   ДоговорыКонтрагентов.Представление
    |ИЗ
    |   Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов
    |ИТОГИ ПО
    |   Владелец,
    |   Ссылка ИЕРАРХИЯ";
 
    Результат = Запрос.Выполнить();
 
    ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
    ОбластьПодвал = Макет.ПолучитьОбласть("Подвал");
    ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
    ОбластьПодвалТаблицы = Макет.ПолучитьОбласть("ПодвалТаблицы");
    ОбластьВладелец = Макет.ПолучитьОбласть("Владелец");
    ОбластьСсылкаИерархия = Макет.ПолучитьОбласть("СсылкаИерархия");
    ОбластьСсылка = Макет.ПолучитьОбласть("Ссылка");
 
    ТабДок.Очистить();
    ТабДок.Вывести(ОбластьЗаголовок);
    ТабДок.Вывести(ОбластьШапкаТаблицы);
    ТабДок.НачатьАвтогруппировкуСтрок();
 
    ВыборкаВладелец = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
 
    Пока ВыборкаВладелец.Следующий() Цикл
        ОбластьВладелец.Параметры.Заполнить(ВыборкаВладелец);
        ТабДок.Вывести(ОбластьВладелец, ВыборкаВладелец.Уровень());
 
        ВыборкаСсылка = ВыборкаВладелец.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
 
        Пока ВыборкаСсылка.Следующий() Цикл
            Если ВыборкаСсылка.ТипЗаписи() = ТипЗаписиЗапроса.ИтогПоИерархии Тогда
                Область = ОбластьСсылкаИерархия;
            Иначе
                Область = ОбластьСсылка;
            КонецЕсли;
 
            Область.Параметры.Заполнить(ВыборкаСсылка);
            ТабДок.Вывести(Область, ВыборкаСсылка.Уровень());
        КонецЦикла;
    КонецЦикла;
 
    ТабДок.ЗакончитьАвтогруппировкуСтрок();
    ТабДок.Вывести(ОбластьПодвалТаблицы);
    ТабДок.Вывести(ОбластьПодвал);
 
    //}}КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ
КонецПроцедуры

Не по теме:

я вот не пойму: для кого отладчик и конструкторы? Только для экспертов?

0
Эксперт 1С
3057 / 2004 / 524
Регистрация: 25.06.2009
Сообщений: 6,964
21.05.2014, 11:53 8
felicita_091, раз это отчет, то может его полностью выложить? или конфу...*.dt, я так понимаю, это опять же учебная конфигурация?
0
286 / 186 / 18
Регистрация: 20.02.2012
Сообщений: 925
21.05.2014, 11:57 9
давайте по-другому, какие отличительные черты "планшета" и "детской игрушки" в справочнике?
Предположу что лежат в разных папках (группах), возможно есть реквизит в номенклатуре который отделяет одно от другого.

Что у вас?
0
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
21.05.2014, 12:07  [ТС] 10
SonicQ, у меня в справочнике Классификатор ТМЦ, посмотрите картинку выше!)
0
Эксперт 1С
3057 / 2004 / 524
Регистрация: 25.06.2009
Сообщений: 6,964
21.05.2014, 12:11 11
felicita_091, по тем скринам тем более непонятно, в чем дело и о каких подгруппах речь. Например, "Азовские сладости", "Др.бренды" - группы, и они попали в заполненную выборкой запроса ТЗ.
0
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
21.05.2014, 12:21  [ТС] 12
GreenkO, я не могу выложить отчет, это рабочая..и он из сервера
0
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
21.05.2014, 12:29  [ТС] 13
GreenkO, у каждого группы есть свои подгруппы
Миниатюры
Как в ТЗ вывести группы и подгруппы в отдельные столбцы или строку?  
0
Эксперт 1С
3057 / 2004 / 524
Регистрация: 25.06.2009
Сообщений: 6,964
21.05.2014, 12:34 14
felicita_091, у тебя выборка упорядочена по наименованию, а ТЗ в скрине обрезана, ты уверена, что твои "подгруппы"(я так понимаю, ты про элементы типа "Козинаки весовые") не попали в ТЗ?

Добавлено через 1 минуту
felicita_091, в чем суть отчета можешь объяснить? вывести информацию из справочника с учетом его иерархии? Покажи код вывода отчета.
0
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
21.05.2014, 12:51  [ТС] 15
GreenkO, в отчете должно быть так:
Др.Бренды ((Азовские сладости, Смеси, Фруктоза) <- Папки)
-Виталад,
-Масло,
-Мед
-....
Азовские сладости
- Щербет,
- Мармелад,
- Халва фасованная
0
Эксперт 1С
3057 / 2004 / 524
Регистрация: 25.06.2009
Сообщений: 6,964
21.05.2014, 13:29 16
felicita_091, сколько уровней в справочнике? максимум 2?
0
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
21.05.2014, 13:33  [ТС] 17
GreenkO, 5 уровней, и внутри нее есть подкаталог и данные
0
Эксперт 1С
3057 / 2004 / 524
Регистрация: 25.06.2009
Сообщений: 6,964
21.05.2014, 13:41 18
felicita_091, ок, вид макета(скрин)? Я так понимаю, что ТЗ заполняется для заполнения в последующем макета?

Не по теме:

Это я к тому, что ТЗ для отчета по сути и не нужна...

0
8 / 8 / 2
Регистрация: 24.10.2012
Сообщений: 430
21.05.2014, 13:47  [ТС] 19
GreenkO, да, просто я пример для себя делала... можно без ТЗ, сразу в макет
0
Эксперт 1С
3057 / 2004 / 524
Регистрация: 25.06.2009
Сообщений: 6,964
21.05.2014, 13:48 20
felicita_091, макет-то покажешь?

Добавлено через 31 секунду
и наработки кода по его заполнению
0
21.05.2014, 13:48
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.05.2014, 13:48
Помогаю со студенческими работами здесь

Группы и подгруппы
Образует ли группу множество квадратов с операцией поворота относительно центра с углом поворота...

Выбор подгруппы студентов из группы
Группа студентов состоит с 20 мальчиков и 10 девочек. На соревнование отобрали группу с 5...

Найти все подгруппы циклической группы
найти все подгруппы циклической группы порядка 24 помогите напишите решение

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

Добавление Группы и подгруппы при добавлении материала Друпал 6
Здравствуйте у меня возникла такая ситуация заказчик хочет при добавлении новости Создавать группы...

Показать, что все подгруппы группы преобразований Sn изоморфны группе SO(2)
Всех приветствую. Помогите пожалуйста решить такую задачу: Показать, что все подгруппы группы...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru