Имя: Пароль:
1C
1С v8
УФ: Отражать в каждом разделе свой рабочий стол
0 chinzanna
 
27.05.14
19:30
Вот такая мысль.
Как сделать так , чтобы при переключении в какой либо раздел учета видеть в рабочей области какую либо заданную форму.
Иначе получается один лишний клик требуется по панели навигации или действий, хотя можно было бы сразу пользователю показать свой dashboard по разделу.
1 Чайник Рассела
 
27.05.14
20:00
можно. получаешь ссылки и открываешь
2 Чайник Рассела
 
27.05.14
20:03
приначалеработысистемы

ПодключитьОбработчикОжидания("УзнатьТекущуюПодсистему", 0.3, Истина);    


Процедура УзнатьТекущуюПодсистему() Экспорт
    
    Попытка
        Ссылка = АктивноеОкно().ПолучитьНавигационнуюСсылку();
    Исключение
    КонецПопытки;
    
    Если  Найти(Ссылка,"navigationpoint") Тогда
        Подсистема = СтрЗаменить(Ссылка, "e1cib/navigationpoint/", "");
        Знак = Найти(Подсистема, "/");
        Если Знак > 0 Тогда
            Подсистема = Лев(Подсистема, Знак-1);
        КонецЕсли;
        
        Если ТекущаяПодсистема <> Подсистема Тогда
            
            Если Подсистема = "ПриемНаКомиссию" Тогда
                ОткрытьФорму("Документ.ПриемТовараНаКомиссию.ФормаСписка", , , , АктивноеОкно());
            ИначеЕсли Подсистема = "Перемещение" Тогда
                ОткрытьФорму("Документ.ПеремещениеТовара.ФормаСписка", , , , АктивноеОкно());
            ИначеЕсли Подсистема = "Уценка" Тогда
                ОткрытьФорму("Документ.УценкаТовара.ФормаСписка", , , , АктивноеОкно());
            ИначеЕсли Подсистема = "ВозвратТовара" Тогда
                ОткрытьФорму("Документ.ВозвратТовара.ФормаСписка", , , , АктивноеОкно());
            ИначеЕсли Подсистема = "ВозвратТовараКомитенту" Тогда
                ОткрытьФорму("Документ.ВозвратТовараКомитенту.ФормаСписка", , , , АктивноеОкно());
            ИначеЕсли Подсистема = "Расчеты" Тогда
                ОткрытьФорму("Документ.ВыплатаКомитенту.ФормаСписка", , , , АктивноеОкно());
            ИначеЕсли Подсистема = "ВозвратТовараОтПокупателя" Тогда
                ОткрытьФорму("Документ.ВозвратТовараОтПокупателя.ФормаСписка", , , , АктивноеОкно());
            ИначеЕсли Подсистема = "Инвентаризация" Тогда
                ОткрытьФорму("Документ.Инвентаризация.ФормаСписка", , , , АктивноеОкно());
            КонецЕсли;
            
            ТекущаяПодсистема = Подсистема;
            
        КонецЕсли;
    КонецЕсли;
    
    ПодключитьОбработчикОжидания("УзнатьТекущуюПодсистему", 0.3, Истина);
    
КонецПроцедуры
3 chinzanna
 
27.05.14
21:54
(2) Спасибо за способ.
Я так понимаю это пока единственный вариант?
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс