Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 1
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Отказ от записи в Форме          
Михрутка Подменю пользователя
сообщение 28.01.16, 16:52
Сообщение #1

Оратор
*****
Группа: Пользователи
Сообщений: 311
Из: Харьков
Спасибо сказали: 7 раз
Рейтинг: 0

1с 8.2. УТП 1.2.
Создаю документ из некой формы:
док = Документы.ПеремещениеТоваров.СоздатьДокумент();
    док.ВидОперации = Перечисления.ВидыОперацийПеремещениеТоваров.ТоварыПродукцияПоОрдерам;
    док.ПолучитьФорму().Открыть();

Если документ пустой, то его нужно просто закрыть без записи в базу данных. В обработке "ПередЗаписью" Формы помещаю код:
Если Товары.Количество() = 0 Тогда
        Ответ = Вопрос("В документе нет товаров. Закрыть документ без записи? 'Да'-документ будет закрыт, 'Нет' - продолжить редактирование",РежимДиалогаВопрос.ДаНет);
        Если Ответ = КодВозвратаДиалога.Да Тогда
            ЭтаФорма.Закрыть();
        Иначе
            Отказ = Истина;
        КонецЕсли;
    КонецЕсли;


Если пользователь выбирает "да", то все-равно возникает стандартное окно, что объесть изменен и т.д. и т.п. Как сделать, чтобы его не было?

DrLivsi Подменю пользователя
сообщение 28.01.16, 17:00
Сообщение #2

Завсегдатай
****
Группа: Пользователи
Сообщений: 148
Из: Киев
Спасибо сказали: 20 раз
Рейтинг: 0

Михрутка @ Сегодня, 17:52 *,

Если Товары.Количество() = 0 Тогда
        Ответ = Вопрос("В документе нет товаров. Закрыть документ без записи? 'Да'-документ будет закрыт, 'Нет' - продолжить редактирование",РежимДиалогаВопрос.ДаНет);
        Если Ответ = КодВозвратаДиалога.Да Тогда
            ЭтаФорма.Модифицированность() = Ложь;
            ЭтаФорма.Закрыть();
        Иначе
            Отказ = Истина;
        КонецЕсли;
    КонецЕсли;


Михрутка Подменю пользователя
сообщение 28.01.16, 17:04
Сообщение #3

Оратор
*****
Группа: Пользователи
Сообщений: 311
Из: Харьков
Спасибо сказали: 7 раз
Рейтинг: 0

Цитата(DrLivsi @ 28.01.16, 17:00) *
ЭтаФорма.Модифицированность() = Ложь;

Так не работает. Вопрос не возникает, верно, но объект записывается в БД, а мне нужно, чтобы форма закрывалась и объект не записывался.
P.s.
Наверно это я забыл написать в вопросе...

Сделал вот так:
Если Товары.Количество() = 0 Тогда
        Ответ = Вопрос("В документе нет товаров. Закрыть документ без записи? 'Да'-документ будет закрыт, 'Нет' - продолжить редактирование",РежимДиалогаВопрос.ДаНет);
        Если Ответ = КодВозвратаДиалога.Да Тогда
            ЭтаФорма.Модифицированность() = Ложь;
            ЭтаФорма.Закрыть();
            Отказ = Истина;
        Иначе
            Отказ = Истина;
        КонецЕсли;
    КонецЕсли;

Работает. Но выглядит, как-то криво, как по мне(((

mac84 Подменю пользователя
сообщение 29.01.16, 9:17
Сообщение #4

Молчаливый
*
Группа: Пользователи
Сообщений: 1
Спасибо сказали: 0 раз
Рейтинг: 0

Михрутка @ Вчера, 18:04 *,
СтандартнаяОбработка = Ложь;

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 27.04.24, 21:54
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!