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

ТаблицаУслуги = Запрос.Выполнить().Выгрузит ь();


НомерСтроки = 0;

Для Каждого СтрокаТабличнойЧасти Из ТаблицаУслуги Цикл

НомерСтроки = НомерСтроки + 1;
сообщить(НомерСтроки);

КонецЦикла;