Расшифровка по щелчку в ПолеТабличногоДокумента

@SonicQ · Регистрация: 20.02.2012

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

Добрый вечер всем! Помогите плиз, ни как не могу разобраться.

Есть некий запрос по счетам, который содержит цифры и субконто

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

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
61
62
63
64
65
66
67
68
69
70
71
Функция СформироватьЗапрос(МассивСчетов, МассивАналитик, ПериодДат)
    
    ДатаНач = ПолучитьДатуНач(ПериодДат);
    ДатаКон = ПолучитьДатуКон(ПериодДат);
    
    Если Не Организация.Пустая() Тогда
        ИсключитьОрганизацию = "Организация = &Организация";
    Иначе
        ИсключитьОрганизацию = "";
    КонецЕсли;
    
    If Not МассивСчетов.Find(ПланыСчетов.Хозрасчетный.НайтиПоКоду("57.01")) = Undefined Then
        УбратьУсловие = "";    
    else
        Если Не Организация.Пустая() Тогда УбратьУсловие = "Субконто2 В (&Аналитики) И "; else УбратьУсловие = "Субконто2 В (&Аналитики)"; endif;    
    endif;
    
    
    Запрос = Новый запрос;
    Запрос.УстановитьПараметр("НачалоПериода", ДатаНач);
    Запрос.УстановитьПараметр("КонецПериода", ДатаКон);
    Запрос.УстановитьПараметр("Счет", МассивСчетов);
    Запрос.УстановитьПараметр("Аналитики", МассивАналитик);
    Запрос.УстановитьПараметр("Организация", Организация);
    
    
    Запрос.Текст = "ВЫБРАТЬ
                   |    ХозрасчетныйОстаткиИОбороты.Субконто1 КАК Субконто1,
                   |    ХозрасчетныйОстаткиИОбороты.Субконто2 КАК Субконто2,
                   |    ХозрасчетныйОстаткиИОбороты.СуммаНачальныйРазвернутыйОстатокДт КАК СНДР,
                   |    ХозрасчетныйОстаткиИОбороты.СуммаНачальныйРазвернутыйОстатокКт КАК СНКР,
                   |    ХозрасчетныйОстаткиИОбороты.СуммаОборотДт КАК ОБД,
                   |    ХозрасчетныйОстаткиИОбороты.СуммаОборотКт КАК ОБК,
                   |    ХозрасчетныйОстаткиИОбороты.СуммаКонечныйРазвернутыйОстатокДт КАК СКДР,
                   |    ХозрасчетныйОстаткиИОбороты.СуммаКонечныйРазвернутыйОстатокКт КАК СККР,
                   |    ХозрасчетныйОстаткиИОбороты.Счет
                   |ИЗ
                   |    РегистрБухгалтерии.Хозрасчетный.ОстаткиИОбороты(
                   |            &НачалоПериода,
                   |            &КонецПериода,
                   |            ,
                   |            ,
                   |            Счет В (&Счет),
                   |            ,
                   |            "+УбратьУсловие+" 
                   |                "+ИсключитьОрганизацию+"
                   |                    ) КАК ХозрасчетныйОстаткиИОбороты
                   |ИТОГИ
                   |    СУММА(СНДР),
                   |    СУММА(СНКР),
                   |    СУММА(ОБД),
                   |    СУММА(ОБК),
                   |    СУММА(СКДР),
                   |    СУММА(СККР)
                   |ПО
                   |    ОБЩИЕ,
                   |    Субконто1,
                   |    Субконто2";
                   
    Выборка = Запрос.Выполнить().Выбрать();
    Выборка.Следующий();    
    МассивРезультата = новый массив;
    МассивРезультата.Добавить(Выборка.СНДР);
    МассивРезультата.Добавить(Выборка.СНКР);
    МассивРезультата.Добавить(Выборка.ОБД);
    МассивРезультата.Добавить(Выборка.ОБК);
    МассивРезультата.Добавить(Выборка.СКДР);
    МассивРезультата.Добавить(Выборка.СККР);
    
    Возврат МассивРезультата;
КонецФункции

Далее делаю это

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

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
    // Строка 1110
    // Формируем массив счетов для дальнейшего передачи его в запрос
    МассивСчетов1110 = New Array;
    МассивСчетов1110.Добавить(Счет50_01);
    МассивСчетов1110.Добавить(Счет50_02);
    МассивСчетов1110.Добавить(Счет50_21);
    МассивСчетов1110.Добавить(Счет51);
    МассивСчетов1110.Добавить(Счет52);
    МассивСчетов1110.Добавить(Счет55_03_2);
    МассивСчетов1110.Добавить(Счет55_23_2);
    
    // Формируем массив аналитик
    МассивАналитик1110 = New Array;
    МассивАналитик1110.Добавить(Acf.FindByCode("000000030"));
    МассивАналитик1110.Добавить(Acf.FindByCode("000000033"));
    МассивАналитик1110.Добавить(Acf.FindByCode("000000065"));
    
    // Отправим данные в запрос
    ПолученныеДанные = СформироватьЗапрос(МассивСчетов1110,МассивАналитик1110,);
 
    мТаблица.Области.С111003.Значение = ?(ПолученныеДанные[2] = Undefined or ПолученныеДанные[2] = Null,0,ПолученныеДанные[2]);

Как мне к ячейке С111003 прикрутить расшифровку, а точнее тот массив (или ТЗ, как лучше сделать?) который получаю из функции, два раза щелкнул и бам перед тобой заполненный табличный документ (открывается вне формы). Как? Есть примеры?

PS: пробовал по многим примерам, где надо установить "Параметр расшифровки", получать область, и к этому параметру присваивать массив... но ничего не вышло.

Добавлено через 22 минуты
А лучше запускать процедуру по двойному щелчку в ПолеТабличногоДокумента , это реально?

@te_morituri · 21.08.2013, 19:00

Подход для щелчка по ячейке: берете событие при АктивацииСтроки (АктивацииКолонки) и проверяете ваша ли колонка активирована.Если да то запускаете свой программ код и делаете что нужно.
можно и даблКлик- но тогда добавить строку

1C
1
СтандартнаяОбработка=ЛОжь;

- и событие выбор строки

@SonicQ · 21.08.2013, 23:39 **[ТС]**

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

Подход для щелчка по ячейке: берете событие при АктивацииСтроки (АктивацииКолонки) и проверяете ваша ли колонка активирована.Если да то запускаете свой программ код и делаете что нужно.
можно и даблКлик- но тогда добавить строку

1C
1
СтандартнаяОбработка=ЛОжь;

- и событие выбор строки

нужно ли при этом использовать параметры в ячейке?
АктивацияСтроки определять строку по названию ее области? то есть нужно к каждой строке присвоить область?

@duk337 · 22.08.2013, 08:34

te_morituri поделился знаниями о табличном поле. А у Вас, судя по всему, табличный докуент. Там понятие "строка" отсутствует, т.к. всё, что ни возьми - это "область", а каждая область - табличный документ. Вплоть до ячейки. Область может иметь контейнер параметров - не более удвоенного количества ячеек в области, поскольку ячейка может иметь и параметр расшифровки, имя которого в поле имён контейнера Параметры. Заполняется точно так же. Устанавливается в макете

@SonicQ · 22.08.2013, 10:51 **[ТС]**

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

te_morituri поделился знаниями о табличном поле. А у Вас, судя по всему, табличный докуент. Там понятие "строка" отсутствует, т.к. всё, что ни возьми - это "область", а каждая область - табличный документ. Вплоть до ячейки. Область может иметь контейнер параметров - не более удвоенного количества ячеек в области, поскольку ячейка может иметь и параметр расшифровки, имя которого в поле имён контейнера Параметры. Заполняется точно так же. Устанавливается в макете

нифига не пойму как прописать что была нажата определенная ячейка и выполнить процедуру

пробую так

1C
1
2
3
4
5
6
7
8
9
10
11
12
Процедура ПолеТабличногоДокумента1ПриАктивизацииОбласти(Элемент)
    // пробуем
    ЭлементыФормы.ПолеТабличногоДокумента1.ТолькоПросмотр =   Истина;   
    ОбрабатываемаяОбласть = ЭлементыФормы.ПолеТабличногоДокумента1.Область("С111003");
    Если ЭлементыФормы.ПолеТабличногоДокумента1.ВыделенныеОбласти = ОбрабатываемаяОбласть.Имя ТОгда
        Сообщить("Попал");
    Иначе
        Сообщить("Ахах, не попал");
    КонецЕсли;
    
    
КонецПроцедуры

Добавлено через 22 минуты
Итак вот решение:

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

1C
1
2
3
4
5
Процедура ПолеТабличногоДокумента1ОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка)
    
    СтандартнаяОбработка = Ложь;
    
КонецПроцедуры

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

1C
1
2
3
4
5
6
7
Процедура ПолеТабличногоДокумента1Выбор(Элемент, Область, СтандартнаяОбработка)
    ................................................
    ................................................
    // Отправим данные в запрос
    ПолученныеДанные = СформироватьЗапросТЗ(МассивСчетов1110,МассивАналитик1110,);
 
    РасшифровкаНажатие(ПолученныеДанные);

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

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
Функция РасшифровкаНажатие(МассивВыгрузки)
    
    Табл=Новый ТабличныйДокумент;
    Макет = ЭтотОбъект.ПолучитьМакет("Расшифровка");
    ОбластьШапкаДОП=Макет.ПолучитьОбласть("Шапка|Область1");
    ОбластьСтрокаДОП=Макет.ПолучитьОбласть("Строка|Область1");
    ОбластьСтрока1  =Макет.ПолучитьОбласть("Строка1|Область1");
    табл.Вывести(ОбластьСтрока1);
    Для Каждого Колонка из МассивВыгрузки.Колонки ЦИКЛ
        ОбластьШапкаДОП.Параметры.ИмяПоказателя=Колонка.Имя;
        Табл.Присоединить(ОбластьШапкаДОП);
    КонецЦикла;
    
    счетчик=0;
    Для каждого стр из МассивВыгрузки Цикл
        счетчик=счетчик+1;
        Состояние("Вывод строки: "+Строка(счетчик));
        табл.Вывести(ОбластьСтрока1);
        //ОбластьСтрокаДОП.Параметры.ЗначениеКолонки=Счетчик;
        Для Каждого Колонка из МассивВыгрузки.Колонки ЦИКЛ
            ОбластьСтрокаДОП.Параметры.ЗначениеКолонки=стр[Колонка.Имя];
            Табл.Присоединить(ОбластьСтрокаДОП);
        КонецЦикла;
    КонецЦикла;
    Табл.Показать();
    
КонецФункции

Работает по двойному щелчку, и еще надо в ПолеТаблиныйДокумент установить ТолькоПросмотр = истина

Всем спасибо!

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

Как я определяю что попал в свою ячейку

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

1C
1
2
3
4
5
6
    Упс = ЭлементыФормы.ПолеТабличногоДокумента1.ТекущаяОбласть.Имя;
    Если Упс = "С111003" Тогда
...............
Иначе
Сообщить("Низя");
КонецЕсли;

Новые блоги и статьи Все статьи Все блоги /
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .

@duk337 2956 / 1768 / 84 Регистрация: 03.11.2011 Сообщений: 8,280
	22.08.2013, 08:34
	te_morituri поделился знаниями о табличном поле. А у Вас, судя по всему, табличный докуент. Там понятие "строка" отсутствует, т.к. всё, что ни возьми - это "область", а каждая область - табличный документ. Вплоть до ячейки. Область может иметь контейнер параметров - не более удвоенного количества ячеек в области, поскольку ячейка может иметь и параметр расшифровки, имя которого в поле имён контейнера Параметры. Заполняется точно так же. Устанавливается в макете 1