Процедура КонтрольКоличестваДокументовВДень(Отказ)     
    Если Процедуры.Количество()
         ИЛИ НаправленияНазначенные.Количество() Тогда
        
        Запрос = Новый Запрос;
        Запрос.Текст =
        "ВЫБРАТЬ
        |    МЦ_ПриемКонтрагента.Ссылка
        |ИЗ
        |    Документ.МЦ_ПриемКонтрагента КАК МЦ_ПриемКонтрагента
        |ГДЕ
        |    МЦ_ПриемКонтрагента.Контрагент = &Контрагент
        |    И МЦ_ПриемКонтрагента.ЯвляетсяНаправлением = &ЯвляетсяНаправлением
        |    И МЦ_ПриемКонтрагента.Проведен
        |    И НАЧАЛОПЕРИОДА(МЦ_ПриемКонтрагента.Дата, ДЕНЬ) = &ТекущийДень
        |    И МЦ_ПриемКонтрагента.Организация = &Организация
        |    И МЦ_ПриемКонтрагента.Ссылка <> &ТекущийДокумент";
        
        Запрос.УстановитьПараметр("Организация", Организация);
        Запрос.УстановитьПараметр("ТекущийДокумент", Ссылка);
        Запрос.УстановитьПараметр("Контрагент", Контрагент);
        Запрос.УстановитьПараметр("ТекущийДень", НачалоДня(?(ЗначениеЗаполнено(Дата), Дата, ТекущаяДата())));
        Запрос.УстановитьПараметр("ЯвляетсяНаправлением", ЯвляетсяНаправлением);
        
        РезультатЗапроса = Запрос.Выполнить();
        Отказ = НЕ РезультатЗапроса.Пустой();
        Если Отказ Тогда
            
            Выборка = РезультатЗапроса.Выбрать();
            Выборка.Следующий();
            Предупреждение("Сегодня уже создан документ для пациента " + Символы.ПС + ОбщегоНазначения.СформироватьЗаголовокДокумента(Выборка.Ссылка));
            
        КонецЕсли;
    КонецЕсли;
КонецПроцедуры // КонтрольКоличестваДокументовВДень()

зависает не всегда

Сколько платят за решение вопроса?

мне не нужно решать вопрос
просто мнение ваше интересно, мб в процедуре дело

(3) Диагностика бесплатно при условии ремонта в нашем СЦ!

Сегодня создан документ для пациента [x]

(3) Потестите запрос в консоли запросов.

Конечно зависает пока предупреждение не закроешь, делай сообщить()

если это в модуле объекта перед/при записи или в обработке проведения или в форме в при записи - то неудивительно.

>Предупреждение

классика жанра...

Ошибка при выполнении обработчика - 'ПередЗаписью'
по причине:
{Документ.МЦ_ПриемКонтрагента.МодульОбъекта(741)}: Ошибка при вызове
метода контекста (Выполнить)

по причине:
Ошибка выполнения запроса
по причине:
Конфликт блокировок при выполнении транзакции:
Microsoft SQL Server Native Client 11.0: Превышено время ожидания
запроса на блокировку.
HRESULT=80040E31, SQLSrvr: SQLSTATE=HYT00, state=33, Severity=10,
native=1222, line=1

(9) читать (7) до просветления

(10) Ну я эту процедуру не писал, стаж у меня 2 недели, я учусь
и (7) мне мало о чем говорит

(11) ты через предупреждение() ставишь раком всю систему - блокируешь таблицу (или диапазон в таблице). читать  про блокировки на SQL

(11) А от нас-то ты что хочешь? Процедуру мы посмотрели.

(12) Вместо предупреждение сделать сообщение ?

(12) + меняй предупреждение() на сообщить()

(11) Или это какой-то хитрый франч отлаживает юнглинга такой постановкой задач?

вместо
НАЧАЛОПЕРИОДА(МЦ_ПриемКонтрагента.Дата, ДЕНЬ) = &ТекущийДень
лучше
МЦ_ПриемКонтрагента.Дата МЕЖДУ &НачалоДня И &КонецДня

(16) да не

(15) но ошибка выходит на 741 строке, т.е. он до ПРедупрежждение() не доходит даже

(19) до предупреждения дошло у другого пользователя, а все остальные теперь ждут когда тот нажав "ОК" разблокирует таблицы.

(20) т.е. всё дело в том, что какой то пользователь не жмёт ОК?

740 Запрос.УстановитьПараметр("ЯвляетсяНаправлением", ЯвляетсяНаправлением);
741        
742РезультатЗапроса = Запрос.Выполнить();

ошибка в 741 строке и она пустая

(21) вам уже ответили на вопрос, разжевали, мб попробуете заменить на "сообщить()", а потом дальше вопросы кидать?

(23) Он не хочет решать вопрос - см (3) Ему надо наше мнение, и оно начинает портится

раз "помогает ребут скл" можно вместо предупреждения сразу ребутить

(22) Ну так и зависает оно не всегда.

а ПоказатьПредупреждение(), блокирует таблицы?
в СП про это ничего не нашел.

(27) блокирует не Предупреждение, а открытая транзакция, которая ждет ответа на предупреждение.

(28) понял.
а ПоказатьПредупреждение не ждет ответа, т.е. блокировки не будет?

(27) и (29) Если использовать ПоказатьПредупреждение(), тогда после окончания транзакции вылезет куча окон, а оно надо? Используй Сообщить()

Спасибо, попробуем

Мне больше интересно было не решить эту проблему, а узнать причину
Я узнал, спасиб

А подскажите, ЖР открывается через конфигуратор ?

(33) А попробовать - религия не позволяет?
И через него тоже.

(34) ПРосто через 1с предприятие не получается
кофнигуратор грузится)

(35) Сильно грузится?

(36) загружается, окей

http://screenshot.ru/upload/image/ZCen

що это?

Обновление конфы решает эту проблему точно ?

(38) Это называется г*внокод