[sia_1980]

{ВнешняяОбработка.ВнешняяОбработка1(2944,47)}: Ожидается символ ')'
Процедура ЗаполнитьРеквизитыСтроки(спДанные,Ст<<?>> ')'[], НомСтр, НомНачКол, ФорматНомСтр = "Ч(0)4")

Процедура ЗаполнитьРеквизитыСтроки(спДанные,Ст[], НомСтр, НомНачКол, ФорматНомСтр = "Ч(0)4")
    
    
    Для Н=НомНачКол По 12 Цикл
        
        Если Н = 1 Тогда
            Окончание = "D";  
            Н1 = 2;
        ИначеЕсли (Н =2) или (Н = 3) или (Н = 5) Тогда
            Окончание = "S";    
            Н1 = Н + 1;
            Если Н = 5 Тогда
                Н1 = 5;
            КонецЕсли;
        ИначеЕсли (Н =12) Тогда
            Окончание = "";    
            Н1 = 4;
        Иначе
            Окончание = ""; 
            Если Н = 4 Тогда
                Н1 = 5
            Иначе
                Н1 = Н;
            КонецЕсли;
        КонецЕсли;
        
        Значение = Ст[Н];
        
        спДанные.ДобавитьЗначение(Значение,  "R" + Формат(НомСтр, ФорматНомСтр) + "G" + Н1 + Окончание);
    
    КонецЦикла;
    
КонецПроцедуры

что надо исправить ?

[logist]

Ну в ошибке ж написано в чем проблема.
Вероятно так:

Процедура ЗаполнитьРеквизитыСтроки(спДанные,Ст, НомСтр, НомНачКол, ФорматНомСтр = "Ч(0)4")

[sia_1980]

в результате выдало

{ВнешняяОбработка.ВнешняяОбработка1(3477,10)}: Ожидается символ ';'
Перем Ст<<?>>[12];
{ВнешняяОбработка.ВнешняяОбработка1(3477,11)}: Неопознанный оператор
Перем Ст[<<?>>12];
{ВнешняяОбработка.ВнешняяОбработка1(3477,11)}: Неопознанный оператор
Перем Ст[<<?>>12];

роцедура СформироватьПриложение2011(спДанные = "")
    Перем Ст[12];  
    

    ТаблТМЦ = СоздатьОбъект("ТаблицаЗначений");
    стрДокумент.ВыгрузитьТабличнуюЧасть(ТаблТМЦ);
    КодНДС = СокрЛП(стрДокумент.ВидНДС.Код);
    ТаблТМЦ.ВыбратьСтроки();      
    Ном = 1;   
    
    Итог9 = 0; Итог10 = 0; Итог11 = 0;
    
    Пока ТаблТМЦ.ПолучитьСтроку() > 0 Цикл
        Ст[1] = ДатаОтчета;
        Ст[2] = ТаблТМЦ.Причина;
        Ст[3] = ТаблТМЦ.ТМЦ.ПолнНаименование;
        Ст[12] = СокрЛП(СтрЗаменить(ТаблТМЦ.КодУКТВЭД,".",""));
        Ст[4] = ?(ТаблТМЦ.ТМЦ.Вид()="ТМЦ",ТаблТМЦ.Ед,ТаблТМЦ.ТМЦ.БазЕдиница);
        Для Н = 5 По 11 Цикл
            Ст[Н] = 0;
        КонецЦикла;                    
        
        Если ТаблТМЦ.ИзмКво<>0 Тогда
            Ст[5] = ТаблТМЦ.ИзмКво;
            Ст[6] = ТаблТМЦ.ЦенаБезНДС*ТаблТМЦ.Коэффициент;
        Иначе
            Ст[7] = ТаблТМЦ.ИзмЦеныБезНДС*ТаблТМЦ.Коэффициент; 
            Ст[8] = ТаблТМЦ.Кво;
        КонецЕсли;  
        ИзмСуммыБезНДС = ТаблТМЦ.ИзмСуммыБезНДС;
        Если КодНДС = "НДС20" Тогда
            Ст[9]  = ИзмСуммыБезНДС;
            Итог9 = Итог9 + ИзмСуммыБезНДС; 
        ИначеЕсли КодНДС = "НДС0" Тогда
            Ст[10] = ИзмСуммыБезНДС;
            Итог10 = Итог10 + ИзмСуммыБезНДС; 
        ИначеЕсли КодНДС = "БезНДС" Тогда
            Ст[11] = ИзмСуммыБезНДС;
            Итог11 = Итог11 + ИзмСуммыБезНДС; 
        КонецЕсли;
        
        ЗаполнитьСтрокуПриложения(спДанные, Ст, Ном, 1, 12);
        Ном = Ном + 1;
    КонецЦикла;
    
    Ст[9] = Итог9;
    Ст[10] = Итог10;
    Ст[11] = Итог11;
    
    ЗаполнитьСтрокуПриложения(спДанные, Ст, 1, 9, 12, "Ч(0)2");      
    
    Итог12 = стрДокумент.Итог("ИзмНДС");
    
    Ст[9] = Итог12;
    
    ЗаполнитьСтрокуПриложения(спДанные, Ст, 2, 9, 9, "Ч(0)2");      

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

Сообщение отредактировал logist - 18.01.12, 0:29

Причина редактирования: Правила п. 13 log

[logist]

Ну блин. В ошибке все написано. Хотя если учесть первое сообщение, то вероятно там исправление могло быть неверным. Проблему надо смотреть в комплексе, а не тупо дергать каждую ошибку методом тыка.

[5_kopeek]

Ну блин. В ошибке все написано.

А формальным параметром может быть массив? Безразмерный?

[logist]

А что такое "Перем Ст[12]; "? Почему не Ст = Новый Массив(12);
Это вообще код от восьмерки??

[sia_1980]

А что такое "Перем Ст[12]; "? Почему не Ст = Новый Массив(12);
Это вообще код от восьмерки??

код от внешней обработки 77 для выгрузки НН в медок пробую перевести для УТ8,1 и завтра крайний срок

[logist]

код от внешней обработки 77 для выгрузки НН в медок пробую перевести для УТ8,1 и завтра крайний срок

А сразу об этом сказать самоуверенность не позволяет?
Код от 7.7 так просто не подходит для 8.1, то шо вы делаете - это занятие фигней, надо переписывать код под 8-ку, а не исправлять ошибки

[sia_1980]

А сразу об этом сказать самоуверенность не позволяет?
Код от 7.7 так просто не подходит для 8.1, то шо вы делаете - это занятие фигней, надо переписывать код под 8-ку, а не исправлять ошибки

Значит я попал и прийдется ехать

но что можно сделать ?

Сообщение отредактировал logist - 18.01.12, 1:33

Причина редактирования: Правила п. 13 log

[Ardi]

но что можно сделать ?

В Бобруйск можно полететь, поплыть, попрыгать. Можно до Бобруйска скользить.
[необходимо зарегистрироваться для просмотра ссылки]

[logist]

Значит я попал и прийдется ехать

но что можно сделать ?

Даже не знаю что и посоветовать, поезд в Бобруйск ушел 50 минут назад, следующий аж в четверг...

p.s. адаптируйте код, мне думается там не так уж сложно.

[sia_1980]

В Бобруйск можно полететь, поплыть, попрыгать. Можно до Бобруйска скользить.
[необходимо зарегистрироваться для просмотра ссылки]

оно то да но хочется сделать обработку

[Ardi]

оно то да но хочется сделать обработку

Я думаю что никто не будет запрещать её делать и безработному.