Товарищи знатоки! Спасите мою рабочую душу...
при нажатии на "общий журнал" с утра не работает, пишет:
Если КонтрагентДляОтбора.Выбран()>0 Тогда
{Журнал.ЖурналОбщий.Форма.ФормаСписка.Модуль(30)}: Значение не представляет агрегатный объект (Выбран)

ЧТО ДЕЛАТЬ!?
Заранее благодарю!
---
см. Рабочий каталог.

Либо в коде меняйте

```1c
    Процедура ПриВыбореКонтрагента()

    Попытка
    Если КонтрагентДляОтбора.Выбран()>0 Тогда
    УстановитьОтбор("Контрагент", КонтрагентДляОтбора);
    КонтрагентДляОтбора = КонтрагентДляОтбора.ТекущийЭлемент();
    Иначе
    УстановитьОтбор(");
    КонецЕсли;
    Исключение
    УстановитьОтбор(");
    КонецПопытки;

    КонецПроцедуры
```
---
ЧТО ДЕЛАТЬ!? Во-первых, назвать конфигурацию и релиз.

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

Но чем черт не шутит, попробуем: главное меню(вверху окна программы) "Помощь" - "О программе" - всё содержимое в студию!

Лучше всего выложить скриншот.
---
Странный скриншот: вроде как просматривается "Комплексная конфигурация"... но без номера релиза.

В-общем, если программа до вчерашнего дня работала, и в нее никто не лазил, то я бы посоветовал удалить из папки с базой файл 1Cv7.cfg.

P.S. А если в пути к папке с базой "D:\ФЛЕШКА" и правда означает, что база хранится на флешке, то... вряд ли эта база долго проживет.
---
е лазил, то я бы посоветовал удалить из папки с базой файл 1Cv7.cfg.

база хранится на диске Д, а папка, в которой она лежит, именуется флешкой, хваланебесам.
---
а удаление файла не помогло :(
---
а удаление файла не помогло :( Тогда тут нужен программист, а не "комментатор".
---
я не верю, что в такой концентрации специалистов нет отважного, кто сможет справиться "комментируя"!
---
я не верю, что в такой концентрации специалистов нет отважного, кто сможет справиться "комментируя"! Были... но перешли на "Битву экстрасенсов" и забросили 1С.
---
ну хоть с юмором у вас всё ок
---
ну хоть с юмором у вас всё ок И не только с юмором. ;)

Если телепаты не объявятся, то могу попытаться помочь удаленно, через TeamViewer, примерно полчаса у меня сейчас есть, пишите в ЛС ID и пароль
---
а какой файл? В папке пользователя или в общей папке?
---
Если ВООБЩЕ ничего с базой не происходило (доработки, обновления), то почистите КЭШ
---
Если КонтрагентДляОтбора.Выбран()>0 Тогдаоткрыть конфигуратор и весь этот кусок Если ... КонецЕсли закомментировать...
---
закомментировать...
это значит.....что?))
---
Пожалуйста! Кто нибудь! Спасите!
---
Смотреть релиз в "Справке - О программе".
---
спасибо, с этим разобрались!
---
Ну, КЕШ для семерки чистить - это так - нет его там :-)
---
даже не посмотрел, что 7.7 ))
---
Я вот в конфигураторе вижу знакомые слова:

```1c
    Процедура ПриВыбореКонтрагента()

    Если КонтрагентДляОтбора.Выбран()>0 Тогда
    УстановитьОтбор("Контрагент", КонтрагентДляОтбора);
    КонтрагентДляОтбора = КонтрагентДляОтбора.ТекущийЭлемент();
    Иначе
    УстановитьОтбор(");
    КонецЕсли;

    КонецПроцедуры
```
---
А если в справочнике Контрагенты - выбрать контрагента, потом в Общий журнал попробовать зайти - всеравно не заходит?
---
момент с "выбрать" не совсем ясен( у нас в контрагентах поставщики и отгружаемые точки(
---
Скорее всего у вас нет колонки с контрагентом. Хотя непонятно, почему все раньше работало.

Попробуйте сделать попытку

```1c
    Процедура ПриВыбореКонтрагента()

    Попытка
    Если КонтрагентДляОтбора.Выбран()>0 Тогда
    УстановитьОтбор("Контрагент", КонтрагентДляОтбора);
    КонтрагентДляОтбора = КонтрагентДляОтбора.ТекущийЭлемент();
    Иначе
    УстановитьОтбор(");
    КонецЕсли;
    Исключение
    Сообщить(ОписаниеОшибки());

    КонецПопытки()

    КонецПроцедуры
```
---
а то, что вам в (15) сообщении это написали еще вчера, вы не видели? Мда уж...
---
Скорее всего у вас был включен Быстрый отбор по клиенту - и выбран Клиент которго удалили (пометили на удаление), теперь по нему не может сделать отбор.
---
```1c
    Процедура ПриВыбореКонтрагента()

    УстановитьОтбор(");
    Возврат;

    Если КонтрагентДляОтбора.Выбран()>0 Тогда
    УстановитьОтбор("Контрагент", КонтрагентДляОтбора);
    КонтрагентДляОтбора = КонтрагентДляОтбора.ТекущийЭлемент();
    Иначе
    УстановитьОтбор(");
    КонецЕсли;

    КонецПроцедуры
```

Как зайдет, закомментируйте (//) строки:

```1c
    //УстановитьОтбор(");
    //Возврат;
```
---
я в этом "файле", но как мне это записать там?
---
в каком файле? это в конфигураторе пишется. У вас пользователь один? Прописан?
---
где и как это смотреть, пошагово, пожалуйста!
---
нашла кнопку "//", но я она не активна
---
Из папки пользователя удалите файлы.
---
ну пожалуйста, пошагово!! кого и откуда
---
см. Рабочий каталог.

Либо в коде меняйте

```1c
    Процедура ПриВыбореКонтрагента()

    Попытка
    Если КонтрагентДляОтбора.Выбран()>0 Тогда
    УстановитьОтбор("Контрагент", КонтрагентДляОтбора);
    КонтрагентДляОтбора = КонтрагентДляОтбора.ТекущийЭлемент();
    Иначе
    УстановитьОтбор(");
    КонецЕсли;
    Исключение
    УстановитьОтбор(");
    КонецПопытки;

    КонецПроцедуры
```
---
мда. пользователя нашла, он у нас один, но вот папки в "рабочий каталог" у вас - нет, это после просто пустое :'(
Как поменять в коде, нужен какой-то особенный доступ? я там не могу ничего написать
---
Правки в конфигураторе вносятся, а не в отладчике.
---
где в конфигураторе искать?
---
Попытка
    Если КонтрагентДляОтбора.Выбран()>0 Тогда
      УстановитьОтбор("Контрагент", КонтрагентДляОтбора);
      КонтрагентДляОтбора = КонтрагентДляОтбора.ТекущийЭлемент();
    Иначе
      УстановитьОтбор("");
    КонецЕсли;
  Исключение
    УстановитьОтбор("");
  КонецПопытки;

а вот это помогло!! урааа! журнал работает!!
теперь вопрос: всё? так и можно оставлять??
---
1) Когда в форме открытия 1С (выбор базы) - выберите режим Конфигуратор. В Конфигураторе: Конфигурация - Открыть; Журналы - ЖурналОбщий - ФормаСписка - ищите нужную процедуру.
2) Кнопка (//) - закомментировать - работает на текущую строку, либо на выделенный текст кода.
3) Найдите через поиск ОС Windows папку usrdef, которая (по умолчанию должна находиться в каталоге базы данных) и либо удалите, либо переместите в другое место. После этого в режиме конфигуратора создаете пользователей.
---
С пользователем получается, но журнал всё равно не открывается
 в строку добавила
---
1) Контрагентов не удаляли?
2) Можно через попытку, можно было просто сбросить:
вот добавьте:
Сообщить("Ошибка отбора по контрагенту: " + ОписаниеОшибки());

```1c
    Попытка
    Если КонтрагентДляОтбора.Выбран()>0 Тогда
    УстановитьОтбор("Контрагент", КонтрагентДляОтбора);
    КонтрагентДляОтбора = КонтрагентДляОтбора.ТекущийЭлемент();
    Иначе
    УстановитьОтбор(");
    КонецЕсли;
    Исключение
    Сообщить("Ошибка отбора по контрагенту: " + ОписаниеОшибки());
    УстановитьОтбор(");
    КонецПопытки;
```

а потом верните как было.
---
уже сделали! там выше про попытку писали уже, и с "ней" всё работает
спасибо!!