&НаКлиенте
Процедура тзТабЧастьДекларацииПриАктивизацииСтроки(Элемент)
//...
НомерацияСтрок();
//...
КонецПроцедуры

Процедура НомерацияСтрок()

Счетчик=1;

Для каждого ВводДекларация Из тзТабЧастьДекларации Цикл  
 //Нумерация табличной части Декларации
 ВводДекларация.НомерСтроки=Счетчик;
 Счетчик=Счетчик+1;  
КонецЦикла;

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

ааа, я не могу... второй день правлю, а оно все лезет...

Если ВыборкаНоменклатура.Количество=Null Тогда
   НоваяСтрокаТабличнаяЧасть.Количество=1;
Иначе
   НоваяСтрокаТабличнаяЧасть.Количество=ВыборкаНоменклатура.Количество;
КонецЕсли;

придется в день сисадмина пить сгоря...

(37, 73) Ну это еще приличный код.... хуже, если, как у меня в филиале 50%/50% англорусский ховнокод с замечательными идеями и чудными идентификаторами смешанной англолатиницы
   ИначеЕсли Лев(ИсхТабл,5)="Налог" Тогда    
       Таб.КоличествоЭкземпляров(1);        
       ПечатьНН();
       If пар_<>0 then
           Таб.ПараметрыСтраницы(1,,1,10,5,5,0,5,0);
           q=Таб.ВысотаТаблицы()/2;
           q2=?(q-62<11,q-11,62);
           If q>64 then
               Таб.Записать("c:\111.mxl");
           
               Таб.ОбластьПечати(1,1,62,11);
               Таб.Напечатать(0);
               Предупреждение("Вставьте первую страницу налоговой накладной (оригинал)");
               Таб.Открыть("c:\111.mxl");
               Таб.ОбластьПечати(63,1,q+62,11);
               Таб.Напечатать(0);
               Таб.Открыть("c:\111.mxl");