7.7 Расширяем функционал работы с Таблицей Значений

10.06.09

Разработка - Инструментарий разработчика

Маленький "бантик" для конфигураций 7.7 Позволяет [b]легко и быстро[/b] добавить несколько полезных "фич" при работе с таблицей значений.

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование	Скачано	Купить файл	По подписке PRO
ext_tz.ert .1222694177 37,50Kb 821	821	2 500 руб. Купить	1 SM Скачать

Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».

0% комиссии — оплата напрямую исполнителю;
Исполнители любого масштаба — от отдельных специалистов до команд под проект;
Прямой обмен контактами между заказчиком и исполнителем;
Безопасная сделка — при необходимости;
Рейтинги, кейсы и прозрачная система откликов.

Это пример того, как можно быстро и легко расширить функционал ваших обработок, которые содержат таблицы значений.
Ничего "сверхестественного" в работе с ТЗ обработка не содержит (банальные "сортировка","удалитьстроку" и тд).

Для работы обработки необходима замечательная внешняя компонента formex. Скачать ее можно на страничке автора www.dorex.ru

Использовать обработку очень просто:
Открываем обработку через Файл-Открыть, галочками отмечаем нужный нам функционал и нажимаем кнопку включить.
После этого на любой Таблице значений нажимаем правую кнопку мыши и пользуемся.
При следующем запуске 1С функционал будет отлючен, для включения повторяем все вышеописанное.

Внимание! Обработка добавляет в глобальный модуль три процедуры, две из которых являются предопределенными (ПриОтжатииПравойКнопки() и ПриНажатииКнопкиКлавиатуры()). По-этому перед первым использованием проконсультируйтесь с Вашим программистом.
Весь добавляемый код можно предварительно просмотреть.

P.S. Если вы используете в своей конфигурации "дополнительные глобальные модули", создаваемые с помощью Formex, то обработка работать не будет.

Вступайте в нашу телеграмм-группу Инфостарт

+52 –

См. также

Консоль запросов

Инструментарий разработчика Системный администратор Разработчик 1С:Предприятие 7.7 1C77 Абонемент ($m)

Консоль запросов к базе SQL, не требующая внешних компонент

10 стартмани

29.04.2015 25472 60 Gvozdod 8

Openconf upd. 2014

Инструментарий разработчика Системный администратор Разработчик 1С:Предприятие 7.7 Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 1C77 Россия Бесплатно (free)

Обновленная сборка OpenConf Light Pack.

27.04.2014 63541 502 unichkin 51

StartManager 1.4 - Развитие альтернативного стартера

Инструментарий разработчика Системный администратор Разработчик 1С:Предприятие 7.7 1С:Предприятие 8 Абонемент ($m)

Очередная редакция альтернативного стартера, являющегося продолжением StartManager 1.3. Спасибо всем, кто присылал свои замечания и пожелания, и тем, кто перечислял финансы на поддержку проекта. С учетом накопленного опыта, стартер был достаточно сильно переработан в плане архитектуры. В основном сделан упор на масштабируемость, для способности программы быстро адаптироваться к расширению предъявляемых требований (т.к. довольно часто просят добавить ту или иную хотелку). Было пересмотрено внешнее оформление, переработан существующий и добавлен новый функционал. В общем можно сказать, что стартер эволюционировал, по сравнению с предыдущей редакцией. Однако пока не всё реализовано, что планировалось, поэтому еще есть куда развиваться в плане функциональности.

1 стартмани

23.04.2014 193780 1923 Alexoniq 1677

505

Tray Informer

Инструментарий разработчика Разработчик 1С:Предприятие 7.7 1С:Предприятие 8 Россия Абонемент ($m)

Согласитесь, что окно стандартное сообщений в 1С иногда приносит больше неудобств, чем пользы. И тем более разные "Предупредить"... Что с этим окном только не делают! Его отцепают от формы, делают маленьким, умудряются спрятать за границы экрана. А потом звонят программистам с претензией, что документ почему-то не проводится, отя ничего и не пишет. У вас такого не было? А вот у нас было и не раз )))

1 стартмани

04.09.2013 36748 61 O-Planet 78

Изменение структуры баз 1С 7.7 без долгой реструктуризации. Часть 1. Справочники

Инструментарий разработчика Разработчик 1С:Предприятие 7.7 1C77 Абонемент ($m)

На днях встретил вопрос на форуме про возможность внесения изменений в конфигурацию без долгого сохранения в рабочей базе большого объема. Вот решил поделиться опытом, как это делал я. База у нас была объемом порядка 120 Гб. К базе обращался сайт в режиме 24/7, поэтому важно было быстро сохранять изменения и желательно без последующего монопольного запуска для восстановления индексов и процедур и без отключения пользователей от базы. Это первая часть статьи и посвящена она справочникам. С одной стороны - это самый простой объект, с другой стороны, именно про справочник спрашивалось на форуме. Если статья будет востребована, то я напишу аналогичные про документы, регистры и может еще что.

1 стартмани

13.08.2013 25159 Reptile 5

Работа с файлами MS WORD из 1C

Инструментарий разработчика Разработчик 1С:Предприятие 7.7 1C77 Абонемент ($m)

Встала недавно задача для одной организации, которая все еще на 1С 7.7 немного автоматизировать работу отдела продаж. А именно уйти от ручного заполнения договоров, сделанных юристами в MS Word. Договора от разных фирм и разного назначения отличались. Переводить их в таблицы 1С очень не хотелось и нашел способ прямо в файлах Word сделать небольшие дополнения, чтобы можно было печатать, используя именно эти заготовки юристов.

1 стартмани

14.07.2013 30224 57 adamx 11

v7.7 1CDialogControls: Инструмент в помощь разработчику на 7.7.

Инструментарий разработчика Разработчик 1С:Предприятие 7.7 1C77 Абонемент ($m)

Давным давно, когда я еще плотно писал на 7.7 работа с формами была мучительной и неудобной. Приходилось каждый элемент выкладывать, выравнивать на форме ручками, прописывать код в модуле. Иногда при разработке очередной формы приходила в голову мысль: "а где-то я уже похожее делал..." и начинался мучительный поиск подходящего кода в своих запасах........

1 стартмани

21.02.2013 21140 36 MarSeN 14

[Разработчику] Любая таблица значений в OLAP

Инструментарий разработчика Разработчик 1С:Предприятие 7.7 1C77 Абонемент ($m)

Анализируем различные данные в 1С, используя OLAP-технологии со всеми прелестями. Т.е. наглядное отображение данных, быстрые расчеты, горизонтальные и вертикальные группировки любой вложенности, удобная фильтрация, Drag'n'Drop и ещё много приятных вещей от MS. Обработка на входе принимает практически любую таблицу значений (ТЗ в которой колонкам указаны типы значений, строка, число и т.п.), на выходе имеем на форме 1С сводную таблицу и график по этой ТЗ, с которой работаем, как и в Excel со сводной таблицей и диаграммой. Взял за основу разработку «OLAP Анализ счёта» ( http://infostart.ru/public/14964/ ) от JohnyDeath и переделал под любую ТЗ. Опционально используется «Прогресс бар для 1С 77» (http://infostart.ru/public/14061/ ) от Gmix.

1 стартмани

21.12.2012 38951 51 venger 7

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. CheBurator 3235 29.09.08 19:30 Сейчас в теме

порадовал флажок "эрегировать" и менюшка "по возврастанию"..
кто на кого эрегирует и куда врастает?
;-)

2. Noy 1079 29.09.08 22:16 Сейчас в теме

(1) а, пусть так и будет :)
спасибо за оценку.

3. sergeevn1 30.09.08 06:11 Сейчас в теме

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

4. Noy 1079 30.09.08 09:06 Сейчас в теме

(3) Да, специально так сделал. ТЗ должна быть активна.

5. andrewalexk 30.09.08 11:18 Сейчас в теме

:)
Кулибин..
РедакторТЗ.ert видел хоть?

6. Noy 1079 30.09.08 11:44 Сейчас в теме

(5) Это разные вещи. Все равно что я выложу маленькую конфу для учета семейного бюджета, а ты мне про УПП начнешь рассказывать.
К тому же в описании четко написано "Это пример того..."

З.Ы. не все умею классы добавлять - а это работает без внедрения вообще.

7. vasilykushnir 63 30.09.08 12:02 Сейчас в теме

> P.S. Если вы используете в своей конфигурации "дополнительные глобальные модули", создаваемые с помощью Formex, то обработка работать не будет.

А че ж так?... Уже хотел опробовать.... А доп модулей у меня немеряно...

8. Noy 1079 30.09.08 12:07 Сейчас в теме

(7) Или я не до конца разобрался с методами Формекса по работе с глобальным модулем, или там всего-то пара методов - но определить загружен ли "мой" глобальный модуль или нет я не смог. Прикручивать сюда еще одну ВК показалось лишним.

В принципе можешь закоментировать в ПриОткрытии строку с доступностью и все заработает, только посмотри предопределенные процедуры...

9. Abadonna 3979 30.09.08 12:23 Сейчас в теме

(8) ПриОтжатииПравойКнопки() и ПриНажатииКнопкиКлавиатуры() работают и в локальном контексте, т.е. необязательно их в ГМ помещать, можно прямо в модуль обработки

10. Noy 1079 30.09.08 12:32 Сейчас в теме

(9) Так и планировал сразу - добавлять в модуль формы тех обработок/документов где это надо, а не в ГМ. Но для этого надо TurboMD, а Formex не дополняет локальные модули (или я плохо смотрел).

Повторюсь - это пример реализации. Взять код из этой обработки, чуть-чуть подправить (убрать "ТекущийКонтекст") и добавить в нужные формы сможет любой, даже самый начинающий программист.
Чего и хотелось достичь.

11. Abadonna 3979 30.09.08 14:36 Сейчас в теме

Не поленился проверить что будет, если одна и та же процедура прописана в основном и дополнительном ГМ. Например,
Процедура ПриНажатииЛевойКнопки(Конт,Состоян,КоординатаПоГоризонтали,КоординатаПоВертикали,ФСО);
Получается так: сначала выполняется в основном глобальном модуле и тут же следом в ДопГМ.

12. Noy 1079 30.09.08 14:58 Сейчас в теме

(11) хм... я чего-то решил, что будет ошибка при компиляции и даже не проверил. ну так даже лучше!

13. АЛьФ 30.09.08 15:35 Сейчас в теме

Вот проверять им не лень, а документацию по компоненте прочитать лень:

Порядок поиска процедуры по имени:
Процедура <РусскоеИмяПроцедуры>
Процедура <АнглийскоеИмяПроцедуры>
Функция <РусскоеИмяПроцедуры>
Функция <АнглийскоеИмяПроцедуры>

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

14. Abadonna 3979 30.09.08 15:39 Сейчас в теме

(13) АЛьФ, конечно же лень почитать ;))))))))))

15. Abadonna 3979 30.09.08 15:42 Сейчас в теме

+(14) Проверял-то я ровно минуту, а прочитать и вникнуть - минуты 3 надо :))))

16. Noy 1079 30.09.08 17:57 Сейчас в теме

(13) даа... а я и не прочитал и не проверил. Точнее читал, но запамятовал. Буду исправляться.

P.S. Интересно - почему так происходит: чем больше "монстров-профессионалов" (в хорошем смысле этого слова и с глубоким уважением к выше высказавшимся) прокоментируют обработку, тем медленнее растет рейтинг???

17. Abadonna 3979 30.09.08 18:03 Сейчас в теме

(16) Ну Альфовский можешь в уме на 10 как минимум помножить ;)

18. Noy 1079 30.09.08 18:06 Сейчас в теме

(17) Уже заметил!
(13) Спасибо!!! Действительно приятно.

19. vasilykushnir 63 01.10.08 09:04 Сейчас в теме

(13) Альф, ну же знаешь, что русский читает инструкцию только тогда, когда точно уверен, что сломал все, что можно было сломать. (:-).
(16) Абадонна прав - Плюсики Альфа и ЧеБурашки дорогого стоят. Их отметки означают, что приблуда стОящая и можно качать спокойно.

20. Noy 1079 01.10.08 10:19 Сейчас в теме

(19)+ ЧеБурашке вообще отдельное спасибо - всегда один из первых просмотрит, и почти всегда оставит комментарий.

21. Abadonna 3979 02.10.08 07:27 Сейчас в теме

А локальном контексте (модуле обработки) можно сделать так

Код

Процедура ПриНажатииКнопкиКлавиатуры(код, альт, шифт, ФСО)
   ФормаРасш = СоздатьОбъект("РасширениеФормы"); 
   Атр=ФормаРасш.ПолучитьАтрибут(Форма.АктивныйЭлемент());
   Если ПустоеЗначение(Атр)=1 Тогда Возврат; КонецЕсли;     
   Если  ТипЗначенияСтр(Атр.Значение)="ТаблицаЗначений" Тогда
      Если Код=46 Тогда  // клавиша DEL  
         Атр.Значение.УдалитьСтроку();
      КонецЕсли; // и т.д. и т.п.      
   КонецЕсли;   
   ФормаРасш="";
КонецПроцедуры

Процедура ПриОтжатииЛевойКнопки(сост, х, у,ФСО)  
   ФормаРасш = СоздатьОбъект("РасширениеФормы");
   Атр=ФормаРасш.ПолучитьАтрибутПоКоординатам( х, у); 
   Если ПустоеЗначение(Атр)=1 Тогда Возврат; КонецЕсли;
   Если  ТипЗначенияСтр(Атр.Значение)="ТаблицаЗначений" Тогда
      // чего-нибудь делаем с ТЗ
      ОбработкаСтроки();
      Инверсия();    
   КонецЕсли;   
   ФормаРасш="";
КонецПроцедуры

Показать полностью

22. strah4 02.10.08 11:37 Сейчас в теме

Удобно. Единственное что, куда более насущна возможность включать-выключать расширение из своего модуля обращением к процедуре глобального. Будет время прикручу обязательно. Спасибо большое!!! Тема очень мне нужная:)

23. Noy 1079 03.10.08 09:16 Сейчас в теме

(22) Если будешь прикручивать - то делай не на всю конфигурацию, как у меня в примере, а на отдельные объекты и для каждого пользователя. Проверку сделай например через ПолныйТипОбъекта(). Ну и справочник с полями Пользователь, Форма, Сортировка (да/Нет), Удаление, Изменение и тд
Имхо, так будет гораздо удобнее.

24. ge_ni 307 03.10.08 18:37 Сейчас в теме

Помогите!!! Не работает и не ругается! Растраска строк задействована! ПриОткрытии работает! Библиотеки зарегистрированы правильно и

26. Noy 1079 05.10.08 13:42 Сейчас в теме

(24) Напиши подробнее - что значит "не работает" и какая версия Formex?
(25) 1. Ну это в принципе только пример, действий с ТЗ еще можно вагон прикрутить: добавление и сдвиг колонок и строк, отбор по значению, "свернуть", редактирование параметров колонок, использвание del (смотри комменнтарий 21), печать, сохранение настроек ширины и положения колонок в профиль и тд.
2. Не предусмотрел :) - надо было проверку поставить на ТипЗначенияСтр(ТекущийКонтекст).
Спасибо за комментарий.

29. ge_ni 307 08.10.08 00:25 Сейчас в теме

(24) FormEx 2.0.5.83 beta. Учитывая прикрученное к библиотеке описание все режимы должны поддерживаться. Регистрирую по 33labовски.

Функция ЗагрузитьВК(стрИмяФайлаВК)
Если ЗагрузитьВнешнююКомпоненту(_КаталогВнешнихКомпонент+стрИмяФайлаВК)=1 Тогда Возврат 1; КонецЕсли;
СообщитьОбОшибкеЗагрузкиВК(стрИмяФайлаВК);
Возврат 0;
КонецФункции

Функция ИнициализацияВнешнихКомпонент()
Состояние("Загрузка внешних компонент...");

Если ЗагрузитьВК("1cpp.dll" )=0 Тогда Возврат 0; КонецЕсли;
Если ЗагрузитьВК("FormEx.dll" )=0 Тогда Возврат 0; КонецЕсли;
Если ЗагрузитьВК("DialMail.dll")=0 Тогда Возврат 0; КонецЕсли;
Если ЗагрузитьВК("V7Plus.dll" )=0 Тогда Возврат 0; КонецЕсли;
Если ЗагрузитьВК("RWidjets.dll")=0 Тогда Возврат 0; КонецЕсли;
Если ЗагрузитьВК("UsersDef.dll")=0 Тогда Возврат 0; КонецЕсли;
Если ЗагрузитьВК("VTools.dll" )=0 Тогда Возврат 0; КонецЕсли;

Чего ей не хватает?!
Использую ряд классов
и от 33lab и самописных. То что мне нужно, работает! А тут засада!

Процедура ПриДвиженииМыши(конт, сост, х, у)
Состояние(" х = " + х + " у = " + у + " сост = " + сост); //Не работает, даже не перехватывает
КонецПроцедуры

Процедура ПриНажатииПравойКнопки(конт, сост, х, у)
Сообщить("Нажата правая кнопка мыши."); //Не работает
КонецПроцедуры

Может флаг какой выставил?! ... или библиотеки мешают друг другу

30. Noy 1079 08.10.08 09:35 Сейчас в теме

(29) Судя по всему с компонентой все ОК.
В первую очередь проверь состояние Сервис.ПерехватКлавиатуры()=? и Сервис.ПерехватМыши()=? - оба значения должны быть равны 1.

По поводу "мешают друг другу" - врядли, вот только я не работал с RWidjets и очень давно смотрел VTools. Можешь попробовать их отключить.

33. ge_ni 307 16.10.08 19:41 Сейчас в теме

(30) Спасибо!!! Действительно Перехват мыши в 0!!! был Не доглядел. Еще раз спасибо

31. Abadonna 3979 08.10.08 09:47 Сейчас в теме

(29)
Функция ЗагрузитьВК(стрИмяФайлаВК)
Если ЗагрузитьВнешнююКомпоненту(_КаталогВнешнихКомпонент+стрИмяФайлаВК)=1 Тогда Возврат 1; КонецЕсли;
________________________________________________________________
Да уж!..; А написать просто:
Возврат ЗагрузитьВнешнююКомпоненту(_КаталогВнешнихКомпонент+стрИмяФайлаВК);
??????? :))))))

32. ge_ni 307 16.10.08 19:39 Сейчас в теме

(31)Ну ладно уж!)) Текст-то не мой..., а исправлять вломы

25. maloi_a 04.10.08 08:49 Сейчас в теме

Замечания:
1. Основные действия с ТЗ есть, а вставки строки нет, кроме того не работает с пустой таблицей.
У меня надо было добавлять строку, я исправил - работает.
2. Выходит ошибка, если кликнуть мышкой вне открытого окна или в окне сообщений:
{Глобальный модуль(92)}: Значение не представляет агрегатный объект (Форма)
ФормаРасш.УстановитьФорму(ТекущийКонтекст.Форма);

27. maloi_a 06.10.08 15:24 Сейчас в теме

Исправил ошибку (25) п. 2 следующим образом:
...
|Процедура ПриОтжатииПравойКнопки(ТекущийКонтекст,Сост,х,у,ФСО)
| ФормаРасш=СоздатьОбъект(""РасширениеФормы"");
| Сообщить(ТекущийКонтекст);
| Если ТекущийКонтекст<>""ГрупповойКонтекст"" Тогда Возврат; КонецЕсли;
| ФормаРасш.УстановитьФорму(ТекущийКонтекст.Форма);
| Атр=ФормаРасш.ПолучитьАтрибутПоКоординатам(х,у);
| Если ТипЗначенияСтр(атр)=""АтрибутФормы"" Тогда
| Если ТипЗначенияСтр(Атр.Значение)=""ТаблицаЗначений"" Тогда
| Если Атр.Идентификатор=ТекущийКонтекст.Форма.АктивныйЭлемент() тогда
| ПравыйКликНаТЗ(ТекущийКонтекст,Атр.Значение);
| КонецЕсли;
| КонецЕсли;
| КонецЕсли;
|КонецПроцедуры
|
|";

ТекстГМОбработкаКлавы="
|
|Процедура ПриНажатииКнопкиКлавиатуры(ТекущийКонтекст,Код,Алт,Шифт,Контрол,Символ,ФСО)
| Сообщить(Код);
| Если Код=93 Тогда
| ФСО=0;
| ФормаРасш=СоздатьОбъект(""РасширениеФормы"");
| Сообщить(ТекущийКонтекст);
| Если ТекущийКонтекст<>""ГрупповойКонтекст"" Тогда Возврат; КонецЕсли;
| ФормаРасш.УстановитьФорму(ТекущийКонтекст.Форма);
| Атр=ФормаРасш.ПолучитьАтрибут(ТекущийКонтекст.Форма.АктивныйЭлемент());
| Если ТипЗначенияСтр(атр)=""АтрибутФормы"" Тогда
| Если ТипЗначенияСтр(Атр.Значение)=""ТаблицаЗначений"" Тогда
| ПравыйКликНаТЗ(ТекущийКонтекст,Атр.Значение);
| КонецЕсли;
| КонецЕсли;
| КонецЕсли;
|КонецПроцедуры
|";

После этого выявил следующую закономерность - мышиная и клавиатурная процедуры работают не всегда
синхронно, а именно:
1. Фокус на окне обработки - обе говорят "Групповой контекст".
2. Если Фокус перенести с активного окна обработки хоть мышью, хоть клавиатурой,
процедуры работают по-разному: клавиатурная - групповой контекст, мышиная - пусто.
3. Фокус на окне сообщений - обе говорят пусто.
4. Если Фокус перенести с окна сообщений, процедуры работают одинаково
хоть в окне обработки, хоть вне окна.
Вопрос к разработчикам?

28. Noy 1079 06.10.08 15:59 Сейчас в теме

(27) Клава и мышь и не должны синхронно работать - как пример: выдели мышкой файл на рабочем столе, потом убери мышь например на кнопку пуск и нажми на клаве кнопку "контекстное меню". Тоесть клава "подвязывается" к активному элементу, а мышь к координатам, где произошло событие.

В принципе можно добавить проверок и немного "выровнять" работу обработки.

34. junglistizzy 23.11.11 08:43 Сейчас в теме

Интересное решение. Попробуем.
спасибо!

35. dobraleks 136 16.06.12 17:15 Сейчас в теме

сенкс, поковыряю

Для отправки сообщения требуется регистрация/авторизация

Автор:

Алексей Плутенко (Noy)

Рейтинг: 1079

Вы можете заказать платную консультацию или разработку у автора. Будет создан приватный заказ на «Бирже заказов» для автора.

Публикация:

№ 16457

Создание 29.09.08 17:16

Обновление 10.06.09 00:00

Статистика:

Просмотры 25547

Загрузки 821

Рейтинг 52

Комментарии 36

Характеристики:

Код открыт Не указано

Рубрики Инструментарий разработчика

Кому Разработчик

Тип файла Внешняя обработка (ert,epf)

Платформа Оперативный учет 7.7 ,
Бухгалтерский учет 7.7 ,
Расчет 7.7

Конфигурация 1C77

Операционная система Не имеет значения

Страна Россия

Отрасль Не имеет значения

Налоги Не имеет значения

Вид учета Не имеет значения

Доступ к файлу Абонемент ($m)

7.7 Расширяем функционал работы с Таблицей Значений

Файлы

См. также

Журнал

База знаний

Лаборатория

Анализ & Управление

Сопровождение 1С

Корпоративные решения

Обучение

Маркетплейс

Проектный офис

Мероприятия

Видеозаписи

Биржа заказов

Форум

Мерч

О компании