Процедура или функция с указанным именем уже определена

(24) всё-таки весь текст

Перем АтрибутыДокументов, ЗагрДокументы, ТаблицаДокументов, ОписаниеТиповС, ОписаниеТиповЧ, ОписаниеТиповД, ОписаниеТиповБулево;
Перем РегиональноеЮЛ;
Перем МассивПричиныСписания;
Перем КоличествоПопыток;

//_____________________________________________________________________________
&НаСервере
Процедура СоздатьТаблицаДокументов()
    ТаблицаДокументов=Новый ТаблицаЗначений;

    // шапка платежного документа
    ТаблицаДокументов.Колонки.Добавить("Документ",                ОписаниеТиповС,    "Вид документа");
    ТаблицаДокументов.Колонки.Добавить("СекцияДокумент",        ОписаниеТиповС,    "Вид документа");
    ТаблицаДокументов.Колонки.Добавить("Номер",                    ОписаниеТиповС,    "Номер документа");
    ТаблицаДокументов.Колонки.Добавить("Дата",                    ОписаниеТиповД,        "Дата документа");
    ТаблицаДокументов.Колонки.Добавить("Сумма",                    ОписаниеТиповЧ,    "Сумма платежа",    17);
    ТаблицаДокументов.Колонки.Добавить("НомерСтрокиИсхДокумента", ОписаниеТиповС,    "Номер строки исх. документа");
    ТаблицаДокументов.Колонки.Добавить("КодПодразделения",        ОписаниеТиповС,    "Код подразделения",    5);

    // Квитанция по платежному документу
    ТаблицаДокументов.Колонки.Добавить("КвитанцияДата",            ОписаниеТиповД,    "Дата формирования квитанции");
    ТаблицаДокументов.Колонки.Добавить("КвитанцияВремя",        ОписаниеТиповС,    "Время формирования квитанции",    8);
    ТаблицаДокументов.Колонки.Добавить("КвитанцияСодержание",    ОписаниеТиповС,    "Содержание квитанции");

    ТаблицаДокументов.Колонки.Добавить("ПлательщикСчет",        ,            "Номер р/с плательщика в его банке");    // Номер р/с плательщика в его банке
    ТаблицаДокументов.Колонки.Добавить("ДатаСписано",            ОписаниеТиповД,        "Дата списания средств с р/с");
    // реквизиты плательщика                                                                                               в случае непрямых расчетов:
    ТаблицаДокументов.Колонки.Добавить("ПлательщикИНН",         ОписаниеТиповС,    "ИНН плательщика",    12);                        // ИНН плательщика
    ТаблицаДокументов.Колонки.Добавить("ПлательщикКПП",         ОписаниеТиповС,    "КПП плательщика",    9);                        // КПП плательщика
    ТаблицаДокументов.Колонки.Добавить("ПлательщикКод",         ОписаниеТиповС,    "Код плательщика",    20);                        // Код плательщика
    ТаблицаДокументов.Колонки.Добавить("ПлательщикКодПодразделения", ОписаниеТиповС,    "Код подразделения плательщика",    20);    // Код плательщика
    ТаблицаДокументов.Колонки.Добавить("Плательщик",            ОписаниеТиповС,    "Плательщик");                            // Плательщик
    ТаблицаДокументов.Колонки.Добавить("Плательщик1",            ОписаниеТиповС,    "Наименование плательщика");            // Наименование плательщика
    ТаблицаДокументов.Колонки.Добавить("Плательщик2",            ОписаниеТиповС,    "Наименование плательщика, стр. 2");    // Расчетный счет плательщика
    ТаблицаДокументов.Колонки.Добавить("Плательщик3",            ОписаниеТиповС,    "Наименование плательщика, стр. 3");    // Банк плательщика
    ТаблицаДокументов.Колонки.Добавить("Плательщик4",            ОписаниеТиповС,    "Наименование плательщика, стр. 4");    // Город банка плательщика
    ТаблицаДокументов.Колонки.Добавить("ПлательщикРасчСчет",    ОписаниеТиповС,    "Расчетный счет плательщика",    20);            // Корсчет банка плательщика
    // реквизиты банка плательщика
    ТаблицаДокументов.Колонки.Добавить("ПлательщикБанк1",        ОписаниеТиповС,    "Банк плательщика");                    // РЦ банка плательщика
    ТаблицаДокументов.Колонки.Добавить("ПлательщикБанк2",        ОписаниеТиповС,    "Город банка плательщика");                // Город РЦ банка плательщика
    ТаблицаДокументов.Колонки.Добавить("ПлательщикБИК",            ОписаниеТиповС,    "БИК банка плательщика",    9);                // БИК РЦ банка плательщика
    ТаблицаДокументов.Колонки.Добавить("ПлательщикКорсчет",        ОписаниеТиповС,    "Корсчет банка плательщика",    20);            // Корсчет РЦ банка плательщика

    ТаблицаДокументов.Колонки.Добавить("ПолучательСчет",        ОписаниеТиповС,    "Номер р/с получателя в его банке",    20);    // Номер р/с получателя в его банке
    ТаблицаДокументов.Колонки.Добавить("ДатаПоступило",            ОписаниеТиповД,        "Дата поступления средств на р/с");
    // реквизиты получателя (поставщика)
    ТаблицаДокументов.Колонки.Добавить("ПолучательИНН",         ОписаниеТиповС,    "ИНН получателя",    12);                        // ИНН получателя
    ТаблицаДокументов.Колонки.Добавить("ПолучательКПП",         ОписаниеТиповС,    "КПП получателя",    9);                        // КПП получателя
    ТаблицаДокументов.Колонки.Добавить("ПолучательКод",         ОписаниеТиповС,    "Код получателя",    20);                        // Код получателя
    ТаблицаДокументов.Колонки.Добавить("ПолучательКодПодразделения", ОписаниеТиповС,    "Код подразделения получателя",    20);    // Код получателя
    ТаблицаДокументов.Колонки.Добавить("Получатель",            ОписаниеТиповС,    "Получатель");                            // Получатель
    ТаблицаДокументов.Колонки.Добавить("Получатель1",            ОписаниеТиповС,    "Наименование получателя");                // Наименование получателя
    ТаблицаДокументов.Колонки.Добавить("Получатель2",            ОписаниеТиповС,    "Наименование получателя, стр. 2");        // Расчетный счет получателя
    ТаблицаДокументов.Колонки.Добавить("Получатель3",            ОписаниеТиповС,    "Наименование получателя, стр. 3");        // Банк получателя
    ТаблицаДокументов.Колонки.Добавить("Получатель4",            ОписаниеТиповС,    "Наименование получателя, стр. 4");        // Город банка получателя
    ТаблицаДокументов.Колонки.Добавить("ПолучательРасчСчет",     ОписаниеТиповС,    "Расчетный счет получателя",    20);            // Корсчет банка получателя

    // реквизиты банка получателя (поставщика)                                                                           в случае непрямых расчетов:
    ТаблицаДокументов.Колонки.Добавить("ПолучательБанк1",        ОписаниеТиповС,    "Банк получателя");                        // РЦ банка получателя
    ТаблицаДокументов.Колонки.Добавить("ПолучательБанк2",        ОписаниеТиповС,    "Город банка получателя");                // Город РЦ банка получателя
    ТаблицаДокументов.Колонки.Добавить("ПолучательБИК",            ОписаниеТиповС,    "БИК банка получателя",    9);                // БИК РЦ банка получателя
    ТаблицаДокументов.Колонки.Добавить("ПолучательКорсчет",     ОписаниеТиповС,    "Корсчет банка получателя",    20);            // Корсчет РЦ банка получателя

    // реквизиты платежа
    ТаблицаДокументов.Колонки.Добавить("ВидПлатежа",            ОписаниеТиповС,    "Вид платежа");                         // "Почтой". "Телеграфом", "Электронно"
    ТаблицаДокументов.Колонки.Добавить("ВидОплаты",             ОписаниеТиповС,    "Вид операции",    2);
    ТаблицаДокументов.Колонки.Добавить("СрокПлатежа",            ОписаниеТиповД,        "Срок платежа (аккредитива)");
    ТаблицаДокументов.Колонки.Добавить("Очередность",             ОписаниеТиповС,    "Очередность платежа",    2);

    // реквизиты налогового платежа
    ТаблицаДокументов.Колонки.Добавить("СтатусСоставителя",        ОписаниеТиповС,    "Статус составителя платежного документа",    2);
    ТаблицаДокументов.Колонки.Добавить("ПоказательКБК",            ОписаниеТиповС,    "Показатель кода бюджетной классификации",    20);
    ТаблицаДокументов.Колонки.Добавить("ОКАТО",                    ОписаниеТиповС,    "ОКАТО",    11);
    ТаблицаДокументов.Колонки.Добавить("ПоказательОснования",    ОписаниеТиповС,    "Показатель основания налогового платежа",    2);
    ТаблицаДокументов.Колонки.Добавить("ПоказательПериода",        ОписаниеТиповС,    "Показатель налогового периода",    10);
    ТаблицаДокументов.Колонки.Добавить("ПоказательНомера",        ОписаниеТиповС,    "Показатель номера налогового документа",    20);
    ТаблицаДокументов.Колонки.Добавить("ПоказательДаты",        ОписаниеТиповС,    "Показатель даты налогового документа",    10);
    ТаблицаДокументов.Колонки.Добавить("ПоказательТипа",        ОписаниеТиповС,    "Показатель типа налогового платежа",    2);

    // назначение платежа и пр.
    ТаблицаДокументов.Колонки.Добавить("НазначениеПлатежа",        ОписаниеТиповС,    "Назначение платежа");
    ТаблицаДокументов.Колонки.Добавить("НазначениеПлатежа1",    ОписаниеТиповС,    "Назначение платежа, стр. 1");
    ТаблицаДокументов.Колонки.Добавить("НазначениеПлатежа2",    ОписаниеТиповС,    "Назначение платежа, стр. 2");
    ТаблицаДокументов.Колонки.Добавить("НазначениеПлатежа3",    ОписаниеТиповС,    "Назначение платежа, стр. 3");
    ТаблицаДокументов.Колонки.Добавить("НазначениеПлатежа4",    ОписаниеТиповС,    "Назначение платежа, стр. 4");
    ТаблицаДокументов.Колонки.Добавить("НазначениеПлатежа5",    ОписаниеТиповС,    "Назначение платежа, стр. 5");
    ТаблицаДокументов.Колонки.Добавить("НазначениеПлатежа6",    ОписаниеТиповС,    "Назначение платежа, стр. 6");

    // прочее
    ТаблицаДокументов.Колонки.Добавить("СрокАкцепта",            ОписаниеТиповС,    "Срок акцепта");
    ТаблицаДокументов.Колонки.Добавить("ВидАккредитива",        ОписаниеТиповС,    "Вид аккредитива");
    ТаблицаДокументов.Колонки.Добавить("УсловиеОплаты1",        ОписаниеТиповС,    "Условие оплаты, стр. 1");
    ТаблицаДокументов.Колонки.Добавить("УсловиеОплаты2",        ОписаниеТиповС,    "Условие оплаты, стр. 2");
    ТаблицаДокументов.Колонки.Добавить("УсловиеОплаты3",        ОписаниеТиповС,    "Условие оплаты, стр. 3");
    ТаблицаДокументов.Колонки.Добавить("ПлатежПоПредст",        ОписаниеТиповС,    "Платеж по представлению");
    ТаблицаДокументов.Колонки.Добавить("ДополнУсловия"    ,        ОписаниеТиповС,    "Дополнительные условия");
    ТаблицаДокументов.Колонки.Добавить("НомерСчетаПоставщика",    ОписаниеТиповС,    "№ счета поставщика");
    ТаблицаДокументов.Колонки.Добавить("ДатаОтсылкиДок",        ОписаниеТиповД,        "Дата отсылки документов");
    ТаблицаДокументов.Колонки.Добавить("Главсчет",                ОписаниеТиповС,    "Главсчет");
    ТаблицаДокументов.Колонки.Добавить("ОПФ",                    ОписаниеТиповС,    "ОПФ");

    //Для кассы
    ТаблицаДокументов.Колонки.Добавить("Доверенность",            ОписаниеТиповС,    "Доверенность");
    ТаблицаДокументов.Колонки.Добавить("КодСтатьи",                ОписаниеТиповС,    "КодСтатьи");
    ТаблицаДокументов.Колонки.Добавить("КодКонтрагента",        ОписаниеТиповС,    "КодКонтрагента");
    ТаблицаДокументов.Колонки.Добавить("КодПодразделенияКонтрагента",    ОписаниеТиповС,    "КодПодразделенияКонтрагента");
    ТаблицаДокументов.Колонки.Добавить("НаименованиеКонтрагента",    ОписаниеТиповС,    "НаименованиеКонтрагента");
    ТаблицаДокументов.Колонки.Добавить("Основание",                ОписаниеТиповС,    "Основание");
    ТаблицаДокументов.Колонки.Добавить("ИННКонтрагента",        ОписаниеТиповС,    "ИННКонтрагента");
    ТаблицаДокументов.Колонки.Добавить("КППКонтрагента",        ОписаниеТиповС,    "КППКонтрагента");
    ТаблицаДокументов.Колонки.Добавить("СуммаНДС",                ОписаниеТиповС,    "СуммаНДС");
    ТаблицаДокументов.Колонки.Добавить("СтавкаНДС",                ОписаниеТиповС,    "СтавкаНДС");
    ТаблицаДокументов.Колонки.Добавить("КодКассыПолучателяДС",    ОписаниеТиповС,    "КодКассыПолучателяДС");
    ТаблицаДокументов.Колонки.Добавить("КодРодительПодразделения",    ОписаниеТиповС,    "КодРодительПодразделения");
    ТаблицаДокументов.Колонки.Добавить("ЛичныеПродажи",            ОписаниеТиповБулево,    "ЛичныеПродажи");
    ТаблицаДокументов.Колонки.Добавить("ПервоеВоскресеньеМесяца",ОписаниеТиповБулево, "ПервоеВоскресеньеМесяца");

    АтрибутыДокументов=Новый СписокЗначений;
    Для Каждого Колонка Из ТаблицаДокументов.Колонки Цикл
        АтрибутыДокументов.Добавить(Врег(Колонка.Имя), Врег(Колонка.Имя));
    КонецЦикла;
КонецПроцедуры //СоздатьТаблицаДокументов

//******************************************************************************
// ЗагрузитьТекст()
//
// Вызывается из формул элементов диалога:
//  Кнопка "кнЗагрузить".
//
// Описание:
//  Осуществляется загрузка файла обмена данными из системы "Клиент банка",
// в соответствии с принятым форматом.
//
&НаСервере
Процедура ЗагрузитьТекстБанк(ВыбФайл)
    // Создание описателя типов для таблицы значений
    КЧ = Новый КвалификаторыЧисла(15,2);
    КС = Новый КвалификаторыСтроки();
    КД = Новый КвалификаторыДаты();
    Массив = Новый Массив;
    Массив.Добавить(Тип("Строка"));
    ОписаниеТиповС = Новый ОписаниеТипов(Массив, , КС);
    Массив.Очистить();
    Массив.Добавить(Тип("Число"));
    ОписаниеТиповЧ = Новый ОписаниеТипов(Массив, , ,КЧ);
    Массив.Очистить();
    Массив.Добавить(Тип("Дата"));
    ОписаниеТиповД = Новый ОписаниеТипов(Массив, , ,КД);


    СоздатьТаблицаДокументов();
    ДатаЗапретаРедактирования = Дата("00010101000000");//Константы.ДатаЗапретаРедактирования;

    ТаблицаДокументов.Очистить();

    Если  НЕ ВыбФайл.Существует() Тогда
        ОбщегоНазначенияКлиентСервер.СообщитьПользователю("Не найден файл на сервере "+ВыбФайл.ПолноеИмя);
        Возврат;
    КонецЕсли;

    ДБФ    = Новый XBase;

    ДБФ.Кодировка = КодировкаXBase.OEM; //+- Комус - Бурко К.В. - 06.05.2015 - перенес перед открытьфайл
    ДБФ.ОткрытьФайл(ВыбФайл.ПолноеИмя,,Истина);
    ДБФ.Первая();
    Ном = 1;

    Пока НЕ ДБФ.ВКонце() Цикл

        ДатаДок = Дата(ДБФ.DOPL);
        Если (ДатаДок < Объект.НачПериода) или (ДатаДок > Объект.КонПериода) Тогда
            Ном = Ном + 1;
            ДБФ.Следующая();
            Продолжить;
        КонецЕсли;

        Если ВРЕГ(СокрЛП(ДБФ.NPL)) = "КОРР" Тогда
            Ном = Ном + 1;
            ДБФ.Следующая();
            Продолжить;
        КонецЕсли;

        ТекДокумент = ТаблицаДокументов.Добавить();
        ТекДокумент.Документ = "Платежное поручение";
        ТекДокумент.СекцияДокумент = "Платежное поручение";
        ТекДокумент.Номер = СокрЛП(ДБФ.NPL);
        ТекДокумент.Дата = ДатаДок;
        //ТекДокумент.НомерСтрокиИсхДокумента = "";
        ТекДокумент.КодПодразделения = СокрЛП(ДБФ.NSTORE);
        ОПФ_ДБФ = СокрЛП(ДБФ.OPF_NAME);
        ТекДокумент.ОПФ = ?(НЕ ЗначениеЗаполнено(ОПФ_ДБФ), "пусто", ОПФ_ДБФ);

        Если (ДБФ.SUMITOG > 0) Тогда
            ТекДокумент.ДатаПоступило = ДатаДок;
            ТекДокумент.Сумма = Число(ДБФ.SUMITOG);
            ТекДокумент.Плательщик = СокрЛП(ДБФ.NAMEP);
            ТекДокумент.ПлательщикИНН = СокрЛП(ДБФ.INN);
            ТекДокумент.ПлательщикКПП = СокрЛП(ДБФ.KPP);
            ТекДокумент.ПлательщикСчет = СокрЛП(ДБФ.RS1CL);
            ТекДокумент.ПолучательСчет = СокрЛП(ДБФ.RS1);
            ТекДокумент.ПлательщикКод = ВРЕГ("EC"+СокрЛП(ДБФ.KODPP)); //Шагаева Е.А. 02.09.15 добавила префикс
            ТекДокумент.ПлательщикКодПодразделения = СокрЛП(ДБФ.NStoreOZ);
        Иначе
            ТекДокумент.ДатаСписано = ДатаДок;
            ТекДокумент.Сумма = Число(-ДБФ.SUMITOG);
            ТекДокумент.ПлательщикСчет = СокрЛП(ДБФ.RS1);
            ТекДокумент.Получатель = СокрЛП(ДБФ.NAMEP);
            ТекДокумент.ПолучательИНН = СокрЛП(ДБФ.INN);
            ТекДокумент.ПолучательКПП = СокрЛП(ДБФ.KPP);
            ТекДокумент.ПолучательКод = ВРЕГ("ER"+СокрЛП(ДБФ.KODPP)); //Шагаева Е.А. 02.09.15 добавила префикс //СокрЛП(ДБФ.KODPP);
            ТекДокумент.ПолучательКодПодразделения = СокрЛП(ДБФ.NStoreOZ);
            ТекДокумент.ПолучательСчет = СокрЛП(ДБФ.RS1CL);
            ТекДокумент.ПолучательБанк1 = СокрЛП(ДБФ.RS2CL);
            ТекДокумент.ПолучательБИК = СокрЛП(ДБФ.MFO);
            ТекДокумент.ПолучательКорсчет = СокрЛП(ДБФ.RS2CL);
        КонецЕсли;

        ТекДокумент.НазначениеПлатежа = СокрЛП(ДБФ.NSCH);
        ТекДокумент.Главсчет        = ДБФ.NSCH;

        Ном = Ном + 1;
        ДБФ.Следующая();
    КонецЦикла;
    ДБФ.ЗакрытьФайл();

    ТаблицаДокументов.Свернуть("Документ, СекцияДокумент, Номер, Дата, НомерСтрокиИсхДокумента, НазначениеПлатежа, Главсчет, КодПодразделения,"+
    "ДатаПоступило, Плательщик, ОПФ, ПлательщикИНН, ПлательщикКПП, ПлательщикСчет, ПолучательСчет, ПлательщикКод, ПлательщикКодПодразделения,"+
    "ДатаСписано, Получатель, ПолучательИНН, ПолучательКПП, ПолучательКод, ПолучательКодПодразделения, ПолучательБанк1, ПолучательБИК, ПолучательКорсчет","Сумма");

    // Сортируем таблицу документов.
    ТаблицаДокументов.Сортировать("Дата, Номер, Плательщик, Получатель, НомерСтрокиИсхДокумента");

    НачатьТранзакцию();
    КолЗаписанныхДокументов = 0;

    ЗагрузитьТаблицуДокументовБанк();

    ЗафиксироватьТранзакцию();

КонецПроцедуры // ЗагрузитьТекст()

//******************************************************************************
// ЗагрузитьТаблицуДокументов()
//
// Описание:
//  Процедура осуществляет последовательный вызов процедур поиска (создания)
// платежных документов на основании сформированной таблицы загружаемых
// документов, при этом формируется список загруженных документов.
//

&НаСервере
Процедура ЗагрузитьТаблицуДокументовБанк()
    ВерсияОбработки = "3.2";
    ПустаяДата = Дата("00010101");

    мВалютаРегламентированногоУчета = Константы.ВалютаРегламентированногоУчета.Получить();
    ДоговорыКонтрагентовПустаяСсылка = Справочники.ДоговорыКонтрагентов.ПустаяСсылка();

    ТипДокументСписаниеСРС = Тип("ДокументСсылка.СписаниеСРасчетногоСчета");
    ТипДокументПоступлениеНаРС = Тип("ДокументСсылка.ПоступлениеНаРасчетныйСчет");
    ТипДокументОбъектПнРС = Тип("ДокументОбъект.ПоступлениеНаРасчетныйСчет");
    ТипДокументОбъектСсРС = Тип("ДокументОбъект.СписаниеСРасчетногоСчета");

    ДокументСписаниеСРСПустаяСсылка = Документы.СписаниеСРасчетногоСчета.ПустаяСсылка();
    ДокументПоступлениеНаРСПустаяСсылка = Документы.ПоступлениеНаРасчетныйСчет.ПустаяСсылка();
    СтатьиДДСПустаяСсылка = Справочники.СтатьиДвиженияДенежныхСредств.ПустаяСсылка();
    КонтрагентыПустаяСсылка = Справочники.Контрагенты.ПустаяСсылка();
    ВалютыПустаяСсылка = Справочники.Валюты.ПустаяСсылка();

    СтатьиДДС = Справочники.СтатьиДвиженияДенежныхСредств;
    СтатьяДДССсылка_101 = СтатьиДДС.НайтиПоРеквизиту("КлючСинхронизации", "101");
    СтатьиДДС = "";

    НеопознанныйКонтрагентСсылка = Справочники.Контрагенты.НайтиПоНаименованию("Неопознанный клиент", Истина);

///////////////////////
    ВыборкаСтатьиДДС = Новый Запрос("ВЫБРАТЬ РАЗРЕШЕННЫЕ
                                    |    СтатьиДвиженияДенежныхСредств.Ссылка КАК Ссылка,
                                    |    СтатьиДвиженияДенежныхСредств.КлючСинхронизации КАК КлючСинхронизации
                                    |ИЗ
                                    |    Справочник.СтатьиДвиженияДенежныхСредств КАК СтатьиДвиженияДенежныхСредств
                                    |ГДЕ
                                    |    СтатьиДвиженияДенежныхСредств.ПометкаУдаления = ЛОЖЬ
                                    |
                                    |УПОРЯДОЧИТЬ ПО
                                    |    КлючСинхронизации");

    НайденныеСтатьиДДС = ВыборкаСтатьиДДС.Выполнить().Выбрать();
    //-Получаем все статьи ДДС из БД, далее будем подбирать по КлючСинхронизации

    //+Получаем все статьи ДДС из БД, далее будем подбирать по КлючСинхронизации
    ВыборкаБанковскиеСчета = Новый Запрос("ВЫБРАТЬ РАЗРЕШЕННЫЕ
                                            |    БанковскиеСчета.Ссылка КАК Ссылка,
                                            |    БанковскиеСчета.НомерСчета КАК НомерСчета,
                                            |    БанковскиеСчета.Владелец
                                            |ИЗ
                                            |    Справочник.БанковскиеСчета КАК БанковскиеСчета
                                            |ГДЕ
                                            |    БанковскиеСчета.ПометкаУдаления = ЛОЖЬ
                                            //+ Комус - Бурко К.В. - ограничиваем загрузку выписок указанной организацией, т.к. в файле DBF сборная солянка
                                            |    И БанковскиеСчета.Владелец = &Организация
                                            //- Комус - Бурко К.В. - ограничиваем загрузку выписок указанной организацией, т.к. в файле DBF сборная солянка
                                            |УПОРЯДОЧИТЬ ПО
                                            |    НомерСчета");

    ВыборкаБанковскиеСчета.УстановитьПараметр("Организация", Объект.Организация); //+- Комус - Бурко К.В. - ограничиваем загрузку выписок указанной организацией, т.к. в файле DBF сборная солянка
    НайденныеБанковскиеСчета = ВыборкаБанковскиеСчета.Выполнить().Выбрать();
    //-Получаем все статьи ДДС из БД, далее будем подбирать по КлючСинхронизации

    //+Получаем все шаблоны проводок по организации, которые далее будем использовать в разрезе Статей
    ВыборкаШаблоновПроводок = Новый Запрос("ВЫБРАТЬ РАЗРЕШЕННЫЕ
                                           |    ШаблоныПроводок.Организация КАК Организация,
                                           |    ШаблоныПроводок.Статья,
                                           |    ШаблоныПроводок.ВалютаВзаиморасчетов,
                                           |    ШаблоныПроводок.ПерсональныеПродажи,
                                           |    ШаблоныПроводок.СчетДт,
                                           |    ШаблоныПроводок.СубконтоДт1,
                                           |    ШаблоныПроводок.СубконтоДт2,
                                           |    ШаблоныПроводок.СубконтоДт3,
                                           |    ШаблоныПроводок.СчетКт,
                                           |    ШаблоныПроводок.СубконтоКт1,
                                           |    ШаблоныПроводок.СубконтоКт2,
                                           |    ШаблоныПроводок.СубконтоКт3,
                                           |    ШаблоныПроводок.ВидВзаиморасчетов,
                                           |    ШаблоныПроводок.ВидОперацииПоступление,
                                &nbs