my 1C. Полезная информация.

Функция глВернутьТипКонтекста(Знач Конт) Экспорт
     ТипКонтекста="Справочник.ФормаСпискаДокументЖурналОтчет";
     Попытка
          А=Конт.ТекущийЭлемент();
     Исключение
          ТипКонтекста=СтрЗаменить(ТипКонтекста,"Справочник","");
     КонецПопытки;
     Попытка
          А=Конт.ИерархическийСписок();
     Исключение
          ТипКонтекста=СтрЗаменить(ТипКонтекста,".ФормаСписка","");
     КонецПопытки;
     Попытка
          А=Конт.Проведен();
     Исключение
          ТипКонтекста=СтрЗаменить(ТипКонтекста,"Документ","");
     КонецПопытки;
     Попытка
          А=Конт.ТекущийДокумент;
     Исключение
          ТипКонтекста=СтрЗаменить(ТипКонтекста,"Журнал","");
     КонецПопытки;
     Попытка
          Конт.РасположениеФайла(А,А);
     Исключение
          ТипКонтекста=СтрЗаменить(ТипКонтекста,"Отчет","");
     КонецПопытки;
     Возврат ТипКонтекста;
КонецФункции
<сообщил KOS>


	На PORTA.ru ОГРОМНЫЙ выбор портативной техники: MD-плееры CD-плееры MP3-плееры Кассетные плееры Диктофоны Радио Цифр. камеры Сотовые Дешевые ноутбуки