Говорящий кот

04.12.22

Расширение заменяет стандартную анимацию при построении отчета на анимированного кота, который "говорит" рандомные фразы.

Файлы

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

Наименование	Скачано	Купить файл	По подписке PRO
Расширение "Говорящий кот": .cfe 49,20Kb 58	58	1 850 руб. Купить	1 SM Скачать
Говорящий кот: Анекдоты .cfe 49,55Kb 14	14	1 850 руб. Купить	1 SM Скачать

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

Список фраз (можно расширять):

"Чтобы помыть кота, нужно: вода, кот и йод с бинтами!"
"Интересно, когда мир завоюют киборги, роботы и андроиды, они тоже будут восхищаться котами?!"
"Коты – это ценнейший ресурс!"
"Коты могут запоминать до 120 команд. Но они не хотят!"
"Кот — шерстяное изделие развлекательного назначения!"
"Люди были созданы для того, чтобы котам было с кем жить!"

Работоспособность проверена на:

1С:Предприятие 8.3 (8.3.18.1289)
Управление торговлей, редакция 11 (11.5.9.131)

UPD:

Добавил вариант расширения с анекдотами с сайта: "rzhunemogu.ru". Получение данных по API сайта.
Учтите, что анекдоты выводятся рандомно. За содержание автор ответственности не несет =)

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

расширение отчеты анимация коты

+73 –1

См. также

Infostart Dashboard: Монитор показателей, виджеты и дашборды в 1С 8.3

Работа с интерфейсом Анализ учета Мониторинг 1С:Предприятие 8 1С 8.3 1C:Бухгалтерия 1С:Бухгалтерия 3.0 1С:Библиотека стандартных подсистем 1С:ERP Управление предприятием 2 1С:Управление холдингом 1С:Зарплата и Управление Персоналом 3.x 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Управление торговлей 11 Платные (руб)

Создайте свой функциональный интерфейс в любой конфигурации 1С с помощью расширения Infostart Dashboard. Настраивайте панели виджетов с метриками, индикаторами и показателями на начальном экране. Узнайте возможность внедрения подсистемы у себя в конфигурации с помощью бесплатной обработки "Анализ внедрения подсистемы 1С Infostart Dashboard"!

28800 руб.

27.03.2025 56399 31 25

Дизайнер форм 1С

Разработка Инструментарий разработчика Работа с интерфейсом Адаптация типовых решений Нейросети 1C:Бухгалтерия 1C:ERP 1С:ЗУП 1С:КА 1С:УНФ 1С:УТ 1С:Розница 1С:ДО 1С:ERP Управление предприятием 2 Платные (руб)

Разработка "Дизайнер форм 1С" реализована в виде расширения 1С и является универсальным инструментом для разработки прототипа форм с целью демонстраций, технических заданий и т.д. Без участия разработчика с возможностью экспорта в файл внешней обработки и генерации формы используя искусственный интеллект.

36000 руб.

28.08.2025 2701 1 2

Динамическое управление видимостью и доступностью элементов форм (УФ) (8.3.6+)

Работа с интерфейсом Системный администратор Программист 1С:Предприятие 8 1C:Бухгалтерия Платные (руб)

Расширение «Динамическое управление доступом к элементам форм объектов 1С8» предназначен для обеспечения возможности оперативного управления видимостью и доступностью элементов форм документов и справочников продуктов фирмы «1С» «1С:Предприятие 8». Решение универсальное, встраивается в любую конфигурацию с минимальными доработками, что позволяет без проблем обновлять типовые решения.

6000 руб.

14.01.2016 58239 20 25

Управление дашбордами в 1С

Работа с интерфейсом Программист 1С:Предприятие 8 1C:Бухгалтерия 1С:ERP Управление предприятием 2 Платные (руб)

Обработка предназначена для создания и управления дашбордами (виджетами) в 1С.

5160 руб.

29.06.2020 22865 32 6

Настройки управляемых форм (списков, объектов), заполнение реквизитов по условиям, контроль заполнения, доступ [Расширение]

Работа с интерфейсом 1С:Предприятие 8 1С:Управление торговлей 11 Россия Платные (руб)

Настройки упр.форм (списков, объектов), заполнение реквизитов по условиям, контроль заполнения, условное оформление, доступ.

2000 руб.

20.02.2018 22355 24 21

Редактор графов в 1С

Работа с интерфейсом Программист 1С:Предприятие 8 1C:Бухгалтерия Россия Платные (руб)

Редактор графов в 1С - внешний отчет, который формирует графы на основе таблицы значений, используя рисунки табличного документа. Есть возможность добавления, редактирования объектов графа и выгрузки результата в таблицу значений.

5040 руб.

06.10.2020 12852 8 8

Дизайн Гайд для создания форм на 1С. Когда и как использовать различные элементы, примеры и антипримеры по использованию

Работа с интерфейсом Программист Стажер 1С:Предприятие 8 Бесплатно (free)

Это инструкция по дизайну форм в среде 1С. Гайд охватывает рекомендации и стандарты для оптимизации пользовательского интерфейса. В гайде содержатся указания по использованию элементов интерфейса, включая как основные, так и продвинутые аспекты. Предоставляются также примеры и антипримеры для наглядного понимания принципов дизайна

20.08.2024 43395 mrXoxot 44

138

Прогресс-бар в поле динамического списка

Работа с интерфейсом Программист 1С:Предприятие 8 Бесплатно (free)

Пример простого и симпатичного прогресс-бара в динамическом списке, без картинок, используя редактирование запроса.

27.05.2024 24834 smielka 38

111

Комментарии

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

Свернуть все

1. v8_088 22.11.22 12:34 Сейчас в теме

Дальнейшее сопровождение решения в виде апдейтов фраз предполагается ?

2. mrSallivan 80 22.11.22 12:43 Сейчас в теме

(1) Если будет острый интерес - можно сделать.
Код открыт, можно самостоятельно заменять фразы или добавлять их количество...

3. svezr 5 23.11.22 23:06 Сейчас в теме

Можно добавить справочник фраз создать)

4. PrinzOfMunchen 84 24.11.22 05:54 Сейчас в теме

(3) Нужно прикрутить апи с сайта "fucking-great-advice.ru/". А если нет - сделать его)

6. mrSallivan 80 24.11.22 13:46 Сейчас в теме

(4) с пометкой 18+ )))

7. mrSallivan 80 25.11.22 14:40 Сейчас в теме

(4) c API сайта разобрался, там все просто. Но что-то не уверен, что такой кот понравится обширной аудитории. Уж слишком там агрессивная подача советов.

8. ixijixi 2070 25.11.22 15:34 Сейчас в теме

(4)

fucking-great-advice.ru

Черт, теперь я хочу такого советчика в 1С)) Придётся сделать)

9. mrSallivan 80 25.11.22 16:09 Сейчас в теме

(8) я сделал, но сюда выкладывать такое опасно =) Кот стал очень говорливым

10. ixijixi 2070 25.11.22 16:13 Сейчас в теме

(9) Можете в личку прислать?

5. tsatsur 47 24.11.22 07:58 Сейчас в теме

Делал как-то первоапрельскую шутку (регистр сведений с шутками откуда рандомно выводятся предупреждения пользователям с шутками).
Склеил их вместе:) Спасибо за идею.

11. Brawler 464 27.11.22 23:06 Сейчас в теме

еще бы анимация рандомно менялась было бы тоже интересно

12. ovasiliev 7 28.11.22 00:17 Сейчас в теме

Шарман! Бухи будут пищать!

13. PrinzOfMunchen 84 28.11.22 05:32 Сейчас в теме

(8) Для внутренней базы сделал) Только апи по категориям и с цензурой не работают.

14. ixijixi 2070 28.11.22 08:42 Сейчас в теме

(13) Эти API и на самом сайте не работают

15. PrinzOfMunchen 84 28.11.22 10:22 Сейчас в теме

(14) о том и речь)

16. RocKeR_13 1460 30.11.22 14:10 Сейчас в теме

Немного занудства: Нехорошо использовать директиву &Вместо)) Можно заимствовать только процедуру ОтчетыКлиентСервер.ОтобразитьСостояниеОтчета с директивой &После и туда перенести часть кода из основной процедуры, модифицировав ее нужным образом. Ну или с директивой &ИзменениеИКонтроль. А еще можно заимствовать общую форму ДлительнаяОперация и туда тоже кота вставить)))

30. alexey_kurdyukov 186 15.12.22 13:57 Сейчас в теме

(16) Должно произойти что-то очень серьёзно, чтобы нужно было использовать ИзменениеИКонтроль. Видимо, там меняется пара строчек в коде?

31. RocKeR_13 1460 15.12.22 14:19 Сейчас в теме

(30) Почему вы считаете, что должно было произойти что-то серьёзное?) Здесь в принципе меняется стандартное поведение и есть необходимость переопределить типовые строки. В этом случае лучше использовать ИзменениеИКонтроль. На крайний случай Вместо в паре с ПродолжитьВызов для функций.

32. alexey_kurdyukov 186 15.12.22 14:30 Сейчас в теме

(31) Вместо с ПродолжитьВызов() - это как раз простое и понятное поведение, а изменение и контроль - заплатка до первого обновления

33. RocKeR_13 1460 15.12.22 14:52 Сейчас в теме

(32) И снова не соглашусь. Директиву &Вместо вам нужно при каждом обновлении отслеживать вручную, а на &ИзменениеИКонтроль платформа сама обратит внимание при проверке возможности применения. Чем это грозит - тоже понятно. Самый примитивный пример: есть функция, которая формирует некоторую табличную часть; в расширении функцию переопределили с использованием ПродолжитьВызов и перезаполнили некоторую колонку. При обновлении колонку табличной части переименовали и расширение уже генерит ошибку. Второй и тоже довольно существенный недостаток: в функции есть некоторые промежуточные параметры, которые нельзя получить в возвращаемом значении, но они нужны для модификации этого возвращаемого значения; если использовать ПродолжитьВызов, то придется промежуточные данные повторно получать; а если возвращаемое значение - это некоторая коллекция, то ее потребуется повторно обходить. Ну а про процедуры и речи нет - там ПродолжитьВызов вообще может изменить весь контекст в совсем ненужное состояние.

Ну и непонятно, что сложного и непонятного в &ИзменениеИКонтроль? Там как раз видно целиком всю процедуру/функцию, что в значительно степени упрощает процесс изменения, так как не нужно сверяться, что там было изначально. А вот &Вместо - это и есть как раз заплатка, которую и использует 1С в своих патчах.

17. mrSallivan 80 30.11.22 15:18 Сейчас в теме

(16) Можно =) На самом деле способов решения - много. Это просто расширение для поднятия настроение и там есть много вещей, которые можно было бы сделать..
По поводу ОтчетыКлиентСервер.ОтобразитьСостояниеОтчета - согласен, так как если отчет будет со своей формой - кота в моем решении не будет. А &Вместо - не думаю, что общая форма отчетов в ближайшее время сильно изменится.

18. Mallok 87 01.12.22 21:50 Сейчас в теме

Что такое, не могу скачать, пишет, что отправлено на почту, но sm не снимаются и не приходит ссылка.

19. RomanVG7 02.12.22 09:55 Сейчас в теме

Прикрутите анекдоты по API с сайта http://rzhunemogu.ru/RandJSON.aspx

20. mrSallivan 80 03.12.22 15:58 Сейчас в теме

(19) интересная идея, можно подумать =)

22. mrSallivan 80 04.12.22 10:51 Сейчас в теме

(19) сделал

21. mrSallivan 80 04.12.22 10:50 Сейчас в теме

Добавил вариант с анекдотами

23. krikmarin 3 06.12.22 04:02 Сейчас в теме

П.с.: "Прикрутил "Кота" к своей 1С БП 3. Его просто не видно ввиду того что любые отчеты делаются меньше секунды".

24. mrSallivan 80 06.12.22 10:31 Сейчас в теме

(23) закрутите ОСВ за год =)

25. krikmarin 3 07.12.22 07:08 Сейчас в теме

(24) ОСВ тоже формируется довольно быстро не зависимо от выбранного периода (кот не успевает появиться).

26. mrSallivan 80 08.12.22 19:17 Сейчас в теме

(25) если база небольшая - возможно.. ну в таком случае и стандартная анимация не покажется =)

27. brunet 40 10.12.22 21:26 Сейчас в теме

Тогда анекдоты от работы бухгалтера будут отвлекать

28. Andrew_flyer 85 14.12.22 02:27 Сейчас в теме

Добавил расширение, чёт не взлетело. В чём может быть дело?

Прикрепленные файлы:

29. mrSallivan 80 14.12.22 05:11 Сейчас в теме

(28) изначально расширение сделано под УТ11.5
В бухгалтерии возможны нюансы, так как в ней модули отличаются.

34. Kontakt 109 20.12.22 14:25 Сейчас в теме

Пришлите код обращение к api. Добавлю себе.

35. mrSallivan 80 21.12.22 12:18 Сейчас в теме

(34)

Функция СуперСовет() Экспорт
СерверДляЗапроса = "rzhunemogu.ru";
	ТекстДляЗапроса = "RandJSON.aspx";	
	
	HTTPСоединение = Новый HTTPСоединение(СерверДляЗапроса, 80);     
	HTTPЗапрос = Новый HTTPЗапрос(ТекстДляЗапроса); 
	Попытка
		Результат =  HTTPСоединение.Получить(HTTPЗапрос); 
		Тело = Результат.ПолучитьТелоКакСтроку();
	Исключение
		Сообщить("Произошла сетевая ошибка!");
		ВызватьИсключение;
	КонецПопытки;
	
	ЧтениеJSON = Новый ЧтениеJSON;
	ЧтениеJSON.УстановитьСтроку(Тело);  		
	Данные = ПрочитатьJSON(ЧтениеJSON);
	Текст = Данные.content;
	Возврат Текст;
КонецФункции

Показать

36. burgomister 61 03.01.23 16:18 Сейчас в теме

Функция СгенерироватьФразуКота() Экспорт
	
	МассивФраз = ВернутьМассивФраз();
	Генератор  = ...
	НомерФразы = ...
	
	Возврат МассивФраз[НомерФразы];
	
КонецФункции

Функция ВернутьМассивФраз()
	
	МассивФраз = Новый Массив;
	МассивФраз.Добавить("Чтобы помыть кота, нужно: вода, кот и йод с бинтами!");
	МассивФраз.Добавить("....");

        Возврат МассивФраз;

КонецФункции

Показать