Обхожу группировку, надо внести комментарий и записать, или пометить документ на удаление.
Получаю ошибку -
Не выбран документ!

                    Если Запрос. Док.Вид() = ВыбНеДок.Вид() Тогда
                        ДокРаботаем = Запрос.Док;
                        ДокРаботаем.Комментарий = "ххх";
                        ДокРаботаем.Записать();
                        //Сообщить(Запрос.Док);
                    КонецЕсли;


То не так ?

ДокРаботаем = Запрос.Док.ПолучитьОбъект();

ПолучитьОбъект() уже было?

А 7-ка, тогда
ДокРаботаем = СоздатьОбъект("Документ");
ДокРаботаем.Найти(Запрос.Док);

ДокРаботаем = СоздатьОбъект("Документ"); - вынести в начало цикла только вынеси

Хотя конечно стаж 9 лет 5 месяцев 8 дней впечатляет )

От я  ... дворник. Мутное подозрение то было, что то ли найти, то ли получить надо, прежде чем чето делать ...
Попробую.
Пока спасибо.

(6)Дак жизненный опыт - не количество лет, а количество событий за количество лет )))

Усе пучком. Благодарю за помощь.
Правда пришлось интеллект наморщить, потому как
не
ДокРаботаем.Найти(Запрос.Док);

а

ДокРаботаем.НайтиДокумент(Запрос.Док);

Утираю пот, от усилий ...

(9) Ну надо ж что-то напрячь то.

(9) А на свежем воздухе пота не было бы.... ))))

условие на вид документа нужно было в сам запрос воткнуть

(10)Ну ... Напрягаем, чем бог не ? обидел  ))
(11)Ты это про метлу ? :D
(12)А есть, а затупил, чего то. Еще по условию сравнивать начал )

Говорят же - не воздух пора.

Нормально все. Еще раз спасибо.

Ээээ, а можно еще вапроц ?

Я перебираю строки табличной части документа и по условию надо удалять некоторую строку,
Что там с позиционированием ? Надо кудато двигать там минус один или плюс один ?

(14) Выгржай в тз, там удаляй, потом загружай ))

Пляя ... а просто чикнуть не ? И потом, какая разница, где с позиционированием морочится в ТЧ Документа или в ТЗ ?

(16) не надо.. делай, как в (15) советовал
пустяк написать код-то..

Так чем отличается удаление из ТЧ Документа от удаления из ТЗ ?
Если я не правильно делаю, так я и в ТЗ не правильно удалю ...

(18) с тз проще работать

Ну ладно, но удалять то как ?

Типаэ

ВыбратьСтроки()
Пока ВыбратьСтроки() =1 Цикл
Если Док.Номенклатура = УдалНоменклатура Тогда
Док.Номенклатура.УдалитьСтроку;

Так чтоли ? И в ТЗ так же

(20) Перебирай в цикле:
Для к=1 по ТабЧасть.КоличествоСтрок() Цикл

Щас.

вообще-то я-б сделал так:

    ТЗ = СоздатьОбъект("ТаблицаЗначений");
    Док.ВыгрузитьтабличнуюЧасть(ТЗ);
    Стр=0;
    Если ТЗ.Найти(Номенклатура, Стр, "Номенклатура")>0 Тогда
        ТЗ.УдалитьСтроку(Стр);
        Док.УдалитьСтроки();
        Док.ЗагрузитьТабличнуюЧасть(ТЗ);
    КонецЕсли;

но код этот никому-бы не показывал :)

+24 ""но код этот никому-бы не показывал"" - истина, т.к. ошибка
Если ТЗ.НайтиЗначение(Номенклатура, Стр, "Номенклатура")>0 Тогда

(21)Не удаляить ничего

                        ДокРаботаем = СоздатьОбъект("Документ."+Запрос. Док.Вид());
                        ДокРаботаем.НайтиДокумент(Запрос.Док);
                        Для к=1 по ДокРаботаем.КоличествоСтрок() Цикл
                            Если к = УдалНом Тогда
                                 ДокРаботаем.УдалитьСтроку();
                            КонецЕсли;
                        ДокРаботаем.Записать();
                        КонецЦикла;

Можно упростить

ДокРаботаем = СоздатьОбъект("Документ"); // и так хорошо
ДокРаботаем.НайтиДокумент(Запрос.Док);
Если ДокРаботаем.Выбран() = 1 Тогда
ДокРаботаем.УдалитьСтроки(); //читаем блиать СП
ДокРаботаем.Записать();
КонецЕсли;

(27)Чето мне кажется не СП читать надо будет, а пачку беломора ... И скать работу с лопатой на севере )))

(26) //Для к=1 по Док.КоличествоСтрок() Цикл

ДокРаботаем.ВыбратьСтроки();
Пока ДокРаботаем.ПолучитьСтроку()=1 Цикл

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

КонецЦикла; :)

щас насоветуйте - он же сделает. Может сразу sudo mkfs.ntfs /dev/sdX на диске где база?

Да парни, у меня и так в голове каша, вы еще тут суицид подкидываете ...

Дайте нормальный код. Вообще ни что не понимаю, как будто курил канаплю какую то ...

Не, спать таки надо по ночам.

(31)Можно аминь, в принципе )
но в (30) то ничего страшного, оно просто работать ни буит )

Я не соображу, как к то получать значение нужное ...

(34) тогда возвращаемся к (24) точна буить!

(35) это у тебя внешняя обработка?
И что значит "значение нужное"? нужную позицию в ТЧ с удаляемой номенклатурой? или самоё номенклатуру, чтоб её сравнивать со значением в ТЧ?

(36)Дак я уже ... Походу он обратно пустую ТЗ грузит.
Но копия тоесть базы )))
Так тчо для полного эффекта надо реально (32)
(37)Да. Внешняя.

Почему вот этот порошек ни чего не удаляет ??

                        ДокРаботаем.ВыбратьСтроки();
                        Пока ДокРаботаем.ПолучитьСтроку()=1 Цикл
                            Если ДокРаботаем.Номенклатура = УдалНом Тогда
                                ДокРаботаем.УдалитьСтроку();
                                //Прервать; //если номеклатура не дублируется в разных строках
                                // А ЕСЛИ ДУБЛИРУЕТСЯ ?
                            КонецЕсли;
                        КонецЦикла;
                        
                        ДокРаботаем.Записать();

(37)Ну к это же тупо индекс строки
в ТЧ документа то как значение получить номенклатуры ...

Патамушта парни ... Открою секрет.
Я просто сравнение не по той номенклатуре делал ...

Жесть. Втыкаю в стол брови ...

Теперь стало што то удалять но какое то деление на ноль выскакивает.
Гдето видно усе в ТЧ удалилось ...

Тыкните пальцем мне в пост, который есть пральное решение. А то перестану подметать, пойду в дипутаты. Я вам там наворочу ...

(42) увы, могу только отладчик посоветовать..

(44)Дак я и сам могу себе его посоветовать ))

Отладчик говорит что ошибка и все, ну в каком документе еще.
Это первый документ с такой позицией.

Отправил ... Вот жпо то. Дожил. Ведь заморочка то на пустом месте. Просто дворницкая смекалка затупилас. двадцатый час идет как за компом ...

(48) не переживай так.. попытаюсь найти.

Да не то што бы ... Просто тупой коматоз. И кофе кончилось.
Сижу, как тот воробей красноглазый обкуреный на плече у орла ...
Старый онекдод.

Емае ...
Как вот тут до Номенклатуры то добраться ??!

Для сч = - ДокРаботаем.КоличествоСтрок() По -1 Цикл
    ТекСтрока = ДокРаботаем.ПолучитьСтрокуПоНомеру(Сч);
    Сообщить(ТекСтрока.Номенклатура);

Почему оно мне говорит, что нет такого агрегатного объекта ???

п...ц

Всегда пользую этот код. Не подводит.

//"Правильное" удаление строк из ТЗ
Для Индекс = -ТЗ.КоличествоСтрок() По -1 Цикл
    ТЗ.ПолучитьСтрокуПоНомеру(-Индекс);
    Если <ПроверкаУсловий> Тогда
        ТЗ.УдалитьСтроку();
    КонецЕсли;
КонецЦикла;

Для сч = - ДокРаботаем.КоличествоСтрок() По -1 Цикл
    ДокРаботаем.ПолучитьСтрокуПоНомеру(-Сч);
    Сообщить(ДокРаботаем.Номенклатура);

(53)Дак да .. Огромный ...

Блт ... Опять ошибка

ЦенаРеал = Док.Цена*Коэф/Док.Коэффициент;
{C:\ОБМЕНЫ\ОБРАБОТКИ\ОТЧЕТ ПО ПРОДАЖАМ.ERT(881)}: Деление на 0

(57) страсти какие.
Дарю:

ЦенаРеал = ?(,,)

(58)Дак нафига оно уже, если просто строка удаляется ??
И потом уже отчет не формируется. Где то строка остается с номенклатурой но без количества и цены ...
Хо за хня ...

больше кода

и это, докумет то перепроводишь потом хоть, опосля его правки ?

Записываю

(62) круто, проводить не пробовал ?
:)))

твой отчет по продажам данные тащит с регистров, а они то не изменились

Ну да ... Тогда ГП ПЦ.

Понял как надоть.

Отправил. Смотри замечания в письме.
ЗЫ. что смог сообразить - то и сделал.

ЗЫЫ. блин.. заметил после того, как отправил!

измени код блочка на такой:

                        Пока ДокРаботаем.ПолучитьСтроку()=1 Цикл
                            Если ДокРаботаем.Номенклатура = УдалНом Тогда
                                Сообщить(ДокРаботаем.Номенклатура);
                                ДокРаботаем.УдалитьСтроку();
                                //Прервать; //если номеклатура не дублируется в разных строках
                                // А ЕСЛИ ДУБЛИРУЕТСЯ ?
                            КонецЕсли;
                        КонецЦикла;
                        ДокРаботаем.Записать();


Иначе сообщает о номенклатуре оставшейся, а не об удаленной

+66 и проверь работу при установке твоих дополнительных маркеров

Кстати, такое сообщение об авосте?

ЦенаРеал = Док.Цена*Коэф/Док.Коэффициент;
{D:\1C\TMP\EXTFORMS\ОТЧЕТ ПО ПРОДАЖАМ.ERT(881)}: Деление на 0

Если фирма не использует Коэффициенты, можно переделать операторы, примерно так:

ЦенаРеал = Док.Цена; //*Коэф/Док.Коэффициент;

(68)Да это от того, что я в алгоритме удаления строки испоьзовал записать, а не провести.
В регистре то ничего не менялось. А строка отсутствовала в натуре.
После проведения все норм. Но ГП слетает.

Все сделал, короче. Тебе отдельное спасибо. За отклик и вообще.