УТ 10.3

20.12.16

✎

11:16

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

    Запрос.УстановитьПараметр("ПометкаУдаления", ПометкаУдаления);

    РезультатЗапроса = Запрос.Выполнить();

    Выборка = РезультатЗапроса.Выбрать();

    Пока Выборка.Следующий() Цикл
        // Вставить обработку выборки ВыборкаДетальныеЗаписи
        НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
        НаборЗаписей.отбор.владелец =    Выборка.ссылка;
        //НаборЗаписей.Прочитать();

        НаборЗаписей.Удалить();

    КонецЦикла;

КонецПроцедуры
вылетает с ошибкой {Обработка.УдалениеШтрихКодовПомеченнойНаУдалениеНоменклаутры.Форма.Форма.Форма(25)}: Поле объекта недоступно для записи (Владелец)
        НаборЗаписей.отбор.владелец =    Выборка.ссылка;
подскажите что я не понимаю

1 youalex

20.12.16

✎

11:18

(0) НаборЗаписей.отбор.владелец.Установить()

2 Adilgeriy

20.12.16

✎

11:24

(1) спасибо, но теперь {Обработка.УдалениеШтрихКодовПомеченнойНаУдалениеНоменклаутры.Форма.Форма.Форма(28)}: Недостаточно фактических параметров
НаборЗаписей.Удалить();

3 Cool_Profi

20.12.16

✎

11:25

(2) НаборЗаписей.Прочитать(); НаборЗаписей.Записать(истина);

8 Adilgeriy

20.12.16

✎

11:36

{Обработка.УдалениеШтрихКодовПомеченнойНаУдалениеНоменклаутры.Форма.Форма.Форма(28)}: Недостаточно фактических параметров
        НаборЗаписей.Удалить();

Пока Выборка.Следующий() Цикл
        // Вставить обработку выборки ВыборкаДетальныеЗаписи
        НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
        НаборЗаписей.отбор.владелец.Установить(Выборка.ссылка);
        НаборЗаписей.Прочитать();
        НаборЗаписей.Записать(истина);
        НаборЗаписей.Удалить();

    КонецЦикла;

9 Cool_Profi

20.12.16

✎

11:36

НаборЗаписей.Прочитать();
НаборЗаписей.Записать(истина);
// НаборЗаписей.Удалить();

10 Adilgeriy

20.12.16

✎

11:38

(9) так тоже сделал. они же остаются все почему то

11 PCcomCat

20.12.16

✎

11:39

РегистрСведенийНаборЗаписей.<Имя регистра сведений> (InformationRegisterRecordSet.<Имя регистра сведений>)
Удалить (Delete)
Синтаксис:

Удалить(<Запись>)
Параметры:

<Запись> (обязательный)

Тип: Число; РегистрСведенийЗапись.<Имя регистра сведений>.
Индекс удаляемой записи либо сама запись.
Описание:

Удаляет запись из набора записей регистра сведений.

Доступность:

Сервер, толстый клиент, внешнее соединение, мобильное приложение(сервер).
Пример:

НаборКурсов.Удалить(0);

12 Cool_Profi

20.12.16

✎

11:39

(10) пардон.

        НаборЗаписей.отбор.владелец.Установить(Выборка.ссылка);
//        НаборЗаписей.Прочитать();
        НаборЗаписей.Записать(истина);

13 PCcomCat

20.12.16

✎

11:39

РегистрСведенийНаборЗаписей.<Имя регистра сведений> (InformationRegisterRecordSet.<Имя регистра сведений>)
Очистить (Clear)
Синтаксис:

Очистить()
Описание:

Удаляет все записи из набора.

Доступность:

Сервер, толстый клиент, внешнее соединение, мобильное приложение(сервер).
Пример:

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

    НаборЗаписей.Очистить();
КонецЦикла;

14 PCcomCat

20.12.16

✎

11:39

Пока Выборка.Следующий() Цикл
        // Вставить обработку выборки ВыборкаДетальныеЗаписи

        НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
        НаборЗаписей.отбор.владелец.Установить(Выборка.ссылка);
        НаборЗаписей.Прочитать();
        НаборЗаписей.Очистить();

    КонецЦикла;

15 Adilgeriy

20.12.16

✎

11:51

она не удаляет.
Процедура КнопкаВыполнитьНажатие(Кнопка)
    ПометкаУдаления = истина;
    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
        |    Номенклатура.ссылка
        |ИЗ
        |    Справочник.Номенклатура КАК Номенклатура
        |ГДЕ
        |    Номенклатура.ПометкаУдаления = &ПометкаУдаления";

    Запрос.УстановитьПараметр("ПометкаУдаления", ПометкаУдаления);
    Выборка = Запрос.Выполнить().Выбрать();

    Пока Выборка.Следующий() Цикл
        НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
        сообщить(Выборка.ссылка);
        НаборЗаписей.отбор.владелец.Установить(Выборка.ссылка);
        НаборЗаписей.Прочитать();
        НаборЗаписей.Очистить();
    КонецЦикла;

КонецПроцедуры

16 Cool_Profi

20.12.16

✎

11:52

Процедура КнопкаВыполнитьНажатие(Кнопка)
    ПометкаУдаления = истина;
    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
        |    Номенклатура.ссылка
        |ИЗ
        |    Справочник.Номенклатура КАК Номенклатура
        |ГДЕ
        |    Номенклатура.ПометкаУдаления = &ПометкаУдаления";

    Запрос.УстановитьПараметр("ПометкаУдаления", ПометкаУдаления);
    Выборка = Запрос.Выполнить().Выбрать();

    Пока Выборка.Следующий() Цикл
        НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
        сообщить(Выборка.ссылка);
        НаборЗаписей.отбор.владелец.Установить(Выборка.ссылка);
        НаборЗаписей.Запимсать(истина);
    КонецЦикла;

КонецПроцедуры

17 Cool_Profi

20.12.16

✎

11:52

а лучше


  НаборЗаписей = РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей();
    Пока Выборка.Следующий() Цикл
        сообщить(Выборка.ссылка);
        НаборЗаписей.отбор.владелец.Установить(Выборка.ссылка);
        НаборЗаписей.Запимсать(истина);
    КонецЦикла;

18 stonewolf

20.12.16

✎

11:55

сегодня же не пятница))) не надо читать, при этом заполняется набор. просто пиши

19 Adilgeriy

20.12.16

✎

11:57

(17) спасибо. всё заработало