Удаление номенклатуры

[alexandr_ll]

Что вы хотите пометить на удаление?

Если Строка = Справочники.Номенклатура.Н айтиПоКоду(Строка) Тогда

Здесь вы пытаетесь сравнить текст из файла с ссылкой на элемент справочника. Они никогда не будут равны.
Попробуйте так

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

[ПётрВладимирович]

Оказывается не проходит проверка. Я даю файл, в котором содержаться цифро-буквенные значения со спец символами (типа дефиз, если код номенклатуры или символ R в круге если наименование номенклатуры)
Сообщить(Строка);
Если Строка = Неопределено Тогда
Прервать;

для этого, я дописал вот это (сейчас, на момент написания этого комментария, я работаю дома и не пишу никаких сложных значений в текстовом документе)
Пока Истина Цикл
Строка = Текст.ПрочитатьСтроку();

Если Строка = Неопределено Тогда
Сообщить(Строка);

Сообщить("Строка не определена");
Прервать;
и функция сообщить мне даёт
1
1
1
1
1

Строка не определена
E:\1.txt

[alexandr_ll]

Оказывается не проходит проверка. Я даю файл, в котором содержаться цифро-буквенные значения со спец символами (типа дефиз, если код номенклатуры или символ R в круге если наименование номенклатуры)
Сообщить(Строка);
Если Строка = Неопределено Тогда
Прервать;

для этого, я дописал вот это (сейчас, на момент написания этого комментария, я работаю дома и не пишу никаких сложных значений в текстовом документе)
Пока Истина Цикл
Строка = Текст.ПрочитатьСтроку();

Если Строка = Неопределено Тогда
Сообщить(Строка);

Сообщить("Строка не определена");
Прервать;
и функция сообщить мне даёт
1
1
1
1
1

Строка не определена
E:\1.txt

Что за цикл?

Пока Истина Цикл

По-видимому нужно так:

Строка = Текст.ПрочитатьСтроку();

Пока Строка <> Неопределено Цикл
Строка = Текст.ПрочитатьСтроку();
Сообщить(Строка);
КонецЦикла;