Форум программистов, компьютерный форум, киберфорум
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Pascal +
137 / 136 / 127
Регистрация: 16.03.2011
Сообщений: 461
1
1C 8.x

Ошибка при проверке группы в регистре

09.02.2013, 19:27. Показов 673. Ответов 0
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Добрый вечер. Такая ситуация. В регистре сведений есть запись о курсанте и его группе. Делаю документ с 2-я реквизитами -Курсант и Группа. Так вот, как сделать так, чтобы если в реквизите группа была выбрана группа, которая не подходит данному выбранному курсанту (то если в регистре у него одна группа, а в документе ставим ему совсем другую группу), то проведение документа запрещалось бы. Сделал запрос на проверку группы в регистре, но почему то даже при правильно выбранной группе, все равно документ не проводит? Скажите пожалуйста в чем ошибка?

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
&НаКлиенте
Процедура ПередЗаписью(Отказ, ПараметрыЗаписи)
    Если Проверка() Тогда
        Сообщить("Данный курсант не заполнял заявление на данную группу. Выберите другого курсанта или заполните заявление на данного курсанта для зачисления в данную группу");
        Отказ=Истина;
    Иначе
        Отказ=Ложь;
    КонецЕсли;
КонецПроцедуры
 
 
Функция Проверка()
    Запрос = Новый Запрос;
    Запрос.Текст = 
        "ВЫБРАТЬ
        |   РегистрЗаявленийСрезПоследних.Группа
        |ИЗ
        |   РегистрСведений.РегистрЗаявлений.СрезПоследних КАК РегистрЗаявленийСрезПоследних
        |ГДЕ
        |   РегистрЗаявленийСрезПоследних.Курсант = &Курсант";
 
    Запрос.УстановитьПараметр("Курсант", Объект.Курсант);
    Результат = Запрос.Выполнить();
     
   Если  Результат <> Объект.Группа Тогда
       Возврат Истина
            Иначе
         Возврат Ложь;
    КонецЕсли; 
КонецФункции
Добавлено через 1 час 42 минуты
закрываем тему
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.02.2013, 19:27
Ответы с готовыми решениями:

Ошибка при проверке метаданных
После создания формы появилась такая ошибка. Кто-то сталкивался? или посоветуете переделать все...

Бухгалтерия. Не заполнены номенклатурные группы в регистре бухгалтерии
Всем привет. Так случилось что данная проблема требует скорейшего решения, а с бухгалтерией я,...

Создание записей в регистре сведений при проведении документа
Подскажите, как можно сделать, чтобы при проведении документа два показателя записывались в регистр...

Сайт CodeWars при проверке решения выдаёт ошибку, при проверке в VisualStudio ошибки нет
Задача написать метод,который будет проверять порядок круглых скобок. Написал код, проверил в...

0
09.02.2013, 19:27
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.02.2013, 19:27
Помогаю со студенческими работами здесь

Ошибка при проверке
∞ Ʃ ((-1)^n) *((x^n)/((2*n)!)) n=0 an=((-1)^n) *((x^n)/((2*n)!)) an-1=((-1)^n-1)...

Ошибка при проверке диапазона
Program p1; var a:array of integer; x,y,m,i:integer; begin writeln('введите колличество чисел,...

Ошибка при проверке на существование
Вот код: if (mysql_query(&quot;SELECT * FROM `&quot;.$db_prefix.&quot;sites` WHERE `link` = `&quot;.$url_site.&quot;`&quot;))...

Ошибка 216 при проверке
Выдает 216-ю ошибку,не могу понять,в чем причина. uses crt; type TElint = byte; TElelem...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru