Не работает двойное условие

[Explorer]

С бодрым утром.
В форме документа нужно установить обязательность заполнения даты, в зависимости от значения поля ЗаявкаТ. Сделал так в модуле формы:

Код Выделить Развернуть

&НаКлиенте
Процедура ПередЗаписью(Отказ, ПараметрыЗаписи)
Если Объект.ЗаявкаТ <> Истина и Объект.ДатаО = Неопределено Тогда
Сообщить ("Не заполнено поле Дата окончания тендера", СтатусСообщения.Важное);
ПараметрыЗаписи.Вставить("Ответ","Нет");
Возврат;
КонецЕсли;
КонецПроцедуры

Все равно разрешает записывать с пустой датой. Ошибок не выдает. Сообщить не делает. Как будто проверки вообще нет.

Подскажите?

[sertak]

Код Выделить Развернуть

И Не ЗначениеЗаполнено(Объект. Дата0)

[Explorer]

Код Выделить Развернуть

И Не ЗначениеЗаполнено(Объект. Дата0)

Спасибо!
Теперь хоть ошибку выдает, что поле объекта не обнаружено, но все равно проводит и записывает.

[cska-fanat-kz]

канонически...
надо установить у реквизита Дата0 проверку в "Выдавать ошибку"
и в ОбработкеПроверкиЗаполнения() в модуле объекта проверять реквизит ЗаявкаТ и при соответствующем условии исключать реквизит Дата0 из списка проверяемых.

[Explorer]

канонически...
надо установить у реквизита Дата0 проверку в "Выдавать ошибку"
и в ОбработкеПроверкиЗаполнения() в модуле объекта проверять реквизит ЗаявкаТ и при соответствующем условии исключать реквизит Дата0 из списка проверяемых.

ОбработкаПроверкиЗаполненияНаСервере ?

Добавлено: 29 ноя 2016, 07:52

канонически...
надо установить у реквизита Дата0 проверку в "Выдавать ошибку"
и в ОбработкеПроверкиЗаполнения() в модуле объекта проверять реквизит ЗаявкаТ и при соответствующем условии исключать реквизит Дата0 из списка проверяемых.

Сделал ДатаО "Выдавать ошибку"
В обработке ОбработкаПроверкиЗаполненияНаСервере добавил

Код Выделить Развернуть

&НаСервере
Процедура ОбработкаПроверкиЗаполненияНаСервере(Отказ, ПроверяемыеРеквизиты)
Если Объект.ЗаявкаТ = Истина Тогда
ПроверяемыеРеквизиты.Удалить(ПроверяемыеРеквизиты.Найти("Дата0"));
КонецЕсли;
КонецПроцедуры


При выполнении пишет

Код Выделить Развернуть

{Документ.Документ1.Форма.ФормаДокумента.Форма(77)}: Ошибка при вызове метода контекста (Удалить)
ПроверяемыеРеквизиты.Удалить(ПроверяемыеРеквизиты.Найти("Дата0"));
по причине:
Несоответствие типов (параметр номер '1')

[cska-fanat-kz]

ОбработкаПроверкиЗаполненияНаСервере() - это на форме
по идее можно и так, но обычно в модуле объекта.

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

[Explorer]

ОбработкаПроверкиЗаполненияНаСервере() - это на форме
по идее можно и так, но обычно в модуле объекта.

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

Уже прямо написал

Код Выделить Развернуть

ПроверяемыеРеквизиты.Удалить("ДатаО");


Добавил

Код Выделить Развернуть

Процедура ОбработкаПроверкиЗаполненияНаСервере(Отказ, ПроверяемыеРеквизиты)
Сообщить(Объект.ДатаО, СтатусСообщения.Внимание);
Если Объект.ЗаявкаТ = Истина Тогда
ПроверяемыеРеквизиты.Удалить("ДатаО");
КонецЕсли;
КонецПроцедуры


Сообщает 01.01.0001 0:00:00 и

Все равно

Код Выделить Развернуть

Несоответствие типов (параметр номер '1')

[cska-fanat-kz]

да правильно пишет!

ПроверяемыеРеквизиты.Удалить("ДатаО")

ПроверяемыеРеквизиты - это массив, его метод Удалить() требует параметр типа ЧИСЛО - индекс удаляемого элемента.

[Explorer]

да правильно пишет!

ПроверяемыеРеквизиты.Удалить("ДатаО")

ПроверяемыеРеквизиты - это массив, его метод Удалить() требует параметр типа ЧИСЛО - индекс удаляемого элемента.

И как быть?

Добавлено: 30 ноя 2016, 07:29

Сделал вот так:

Код Выделить Развернуть

&НаКлиенте
Процедура ПередЗаписью(Отказ, ПараметрыЗаписи)
    Если Объект.ЗаявкаТ <> Истина И Не ЗначениеЗаполнено(Объект.ДатаО) Тогда
        Сообщить ("Не заполнено поле Дата окончания тендера", СтатусСообщения.Важное);
Отказ = Истина;
        Возврат;
КонецЕсли;
КонецПроцедуры


Работает.

Добавлено: 30 ноя 2016, 07:32

Ставлю далее следующее условие не работает:

Код Выделить Развернуть

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


Если написать

Код Выделить Развернуть

Сообщить (Объект.Результат), то слово "Отказ" выводит.

Добавлено: 30 ноя 2016, 08:43

Возможно дело в Объект.Результат = "Отказ"  ?
реквизит Результат выбирается из справочника Результат. Значение "Отказ" там есть, может синтаксис?

Добавлено: 30 ноя 2016, 11:49

Всё заработало! Всем спасибо!
Дело было в синтаксисе. Необходимо было использовать Строка(Объект.Результат) = "Отказ"

[alex0402]

Объект.Результат

какого типа?
пробуй

Код Выделить Развернуть

Если Строка(Объект.Результат) = "Отказ" И Не ЗначениеЗаполнено(Объект.ПричинаО) Тогда

Добавлено: 30 ноя 2016, 18:02

или Объект.Результат может быть с пробелами.