Прочитать флаг пометки удаления элемента справочника.
Синтаксис:
ПометкаУдаления()
Англоязычный синоним:
DeleteMark
Возвращаемое значение:
Числовое значение: 1 — если на элементе справочника стоит пометка удаления; 0 — если нет пометки удаления.
Описание:
Метод ПометкаУдаления позволяет прочитать значение пометки удаления текущего элемента справочника.
Пример:
Процедура УсловноеУдалениеСотрудника(Сотр)
Спр = СоздатьОбъект("Справочник.Сотрудники");
Если Сотр.Выбран() > 0 Тогда
// позиционируем справочник на заданном элементе
Спр.НайтиЭлемент(Сотр);
Если Спр.Выбран() > 0 Тогда
Если Вопрос("Удалять??? ", 1) = 1 Тогда
Если Спр.ПометкаУдаления() = 1 Тогда
Предупреждение("Уже помечен на удаление!");
Иначе
// удаляем элемент справочника
Спр.Удалить(0);
КонецЕсли;
КонецЕсли;
Иначе
Предупреждение("Некого удалять!");
КонецЕсли;
КонецЕсли;
КонецПроцедуры
См. также: Удалить, СнятьПометкуУдаления
Прочитать флаг пометки удаления документа.
Синтаксис:
ПометкаУдаления()
Англоязычный синоним:
DeleteMark
Возвращаемое значение:
Число: 1 — если на документе стоит пометка удаления; 0 — если нет пометки удаления.
Описание:
Метод ПометкаУдаления позволяет прочитать значение пометки удаления документа.
Пример:
Процедура УсловноеУдаление(Докум)
Док = СоздатьОбъект("Документ");
Если Докум.Выбран() > 0 Тогда
// позиционируем документ на переданном значении
Док.НайтиДокумент(Докум);
Если Док.Выбран() > 0 Тогда
Если Вопрос("Удалять??? ", 1) = 1 Тогда
Если Док.ПометкаУдаления() = 1 Тогда
Предупреждение("Уже помечен на удаление!");
Иначе
// удаляем документ
Док.Удалить(0);
КонецЕсли;
КонецЕсли;
Иначе
Предупреждение("Нечего удалять! ");
КонецЕсли;
КонецЕсли;
КонецПроцедуры
См. также: Удалить, СнятьПометкуУдаления
Проверяет наличие пометки на удаление для текущего счета.
Синтаксис:
ПометкаУдаления()
Англоязычный синоним:
DeleteMark
Возвращаемое значение:
1 — счет помечен на удаление;
0 — счет не помечен на удаление.
Описание;
Метод используется для проверки, помечен ли на удаление текущий счет.
Пример:
Сч = СоздатьОбъект("Счет.Основной");
Сч.НайтиПоКоду("76.02");
Если Сч.ПометкаУдаления() = 1 Тогда
Сообщить("Счет помечен на удаление");
КонецЕсли;
Проверяет наличие пометки на удаление текущей операции.
Синтаксис:
ПометкаУдаления()
Англоязычный синоним:
DeleteMark
Возвращаемое значение:
Число: 1 — операция помечена на удаление; 0 — операция не помечена на удаление.
Описание:
Метод используется для проверки, помечена ли на удаление текущая операция или документ, которому принадлежит операция.
Пример:
Опер = СоздатьОбъект("Операция");
Опер.ВыбратьОперации(ДатаНач, ДатаКон);
Пока Опер.ПолучитьОперацию() = 1 Цикл
Если Опер.ПометкаУдаления() = 1 Тогда
Сообщить(Опер.Документ);
КонецЕсли;
КонецЦикла;