На графиках представлена задолженность по поставщикам, покупателям, приход по кассе, остаток на складе, остаток на р/с, обороты по р/с.
Информация отображается по дням (за последние 30 дней). При изменении даты, графики обновятся.
Для запуска при старте 1С необходимо:
1. Подключить скачанную обработку в режиме 1С:Предприятие
2. Подключить расширение, запускающее внешнюю обработку при старте системы;
Вариант 1: Добавить скаченное расширение в конфигурацию. Исправить имена пользователей на нужные вам в модуле приложений для старта обработки при запуске.
Вариант 2: В ранее созданное расширение добавить процедуры в "модуль приложения", "клиентский модуль", "модуль вызова сервера"
Модуль приложения:
&После("ПриНачалеРаботыСистемы")
Процедура Общее_ПриНачалеРаботыСистемы()
ЗапуститьДополнительнуюОбработку();
КонецПроцедуры
Процедура ЗапуститьДополнительнуюОбработку()
Попытка
ИмяПользователя = СОКРЛП(ПользователиКлиент.ТекущийПользователь());
Если ИмяПользователя = "Абрамов Геннадий Сергеевич"
ИЛИ ИмяПользователя = "Ларионова Светлана Викторовна" // !укажите нужных вам!
Тогда
ВОПСС_Клиент.ЗапуститьДополнительнуюОбработку("Диаграммы счетов"); // "ВОПСС_Клиент" имя общего клиентского модуля
КонецЕсли;
Исключение
КонецПопытки;
КонецПроцедуры
Общий Модуль Клиентский :
&НаКлиенте
Процедура ЗапуститьДополнительнуюОбработку(ИмяОбработки) ЭКСПОРТ
ВыполняемаяКоманда=Новый Структура;
ВОПСС_ВызовСервера.ЗаполнитьСтруктуруВыполняемойКоманды(ВыполняемаяКоманда,ИмяОбработки); // "ВОПСС_ВызовСервера" - имя общего модуля вызова сервера
Если ЗначениеЗаполнено(ВыполняемаяКоманда) Тогда
ДополнительныеОтчетыИОбработкиКлиент.ВыполнитьОткрытиеФормыОбработки(ВыполняемаяКоманда,Неопределено,Неопределено);
КонецЕсли;
КонецПроцедуры
ОбщийМодульВызовСервера:
&НаСервере
Процедура ЗаполнитьСтруктуруВыполняемойКоманды(ВыполняемаяКоманда,НаименованиеОбработки) ЭКСПОРТ
ДопОбработкаСсылка=Справочники.ДополнительныеОтчетыИОбработки.НайтиПоНаименованию(НаименованиеОбработки);
Если ЗначениеЗаполнено(ДопОбработкаСсылка) Тогда
ВыполняемаяКоманда=Новый Структура;
ВыполняемаяКоманда.Вставить("ВариантЗапуска",ДопОбработкаСсылка.Команды[0].ВариантЗапуска);
ВыполняемаяКоманда.Вставить("Вид",ДопОбработкаСсылка.Вид);
ВыполняемаяКоманда.Вставить("Идентификатор",ДопОбработкаСсылка.Команды[0].Идентификатор);
ВыполняемаяКоманда.Вставить("Модификатор",ДопОбработкаСсылка.Команды[0].Модификатор);
ВыполняемаяКоманда.Вставить("ОбъектыНазначения",Неопределено);
ВыполняемаяКоманда.Вставить("ПоказыватьОповещение",ДопОбработкаСсылка.Команды[0].ПоказыватьОповещение);
ВыполняемаяКоманда.Вставить("Представление",НаименованиеОбработки);
ВыполняемаяКоманда.Вставить("Ссылка",ДопОбработкаСсылка);
ВыполняемаяКоманда.Вставить("ЭтоОтчет",Ложь);
Иначе
ВыполняемаяКоманда=Неопределено;
КонецЕсли;
КонецПроцедуры
Обработка тестировалась на конфигурации: Бухгалтерия предприятия КОРП, редакция 3.0 (3.0.78.69)
P.S. Публикация подойдет и для приобретения опыта в использовании расширений!
Вступайте в нашу телеграмм-группу Инфостарт
