×
Показано с 1 по 4 из 4
  1. #1
    lanky lanky вне форума
    Клерк
    Регистрация
    19.08.2007
    Сообщений
    3

    перестал выгружатся в текстовый файл обмена с Клиент-банком реквизит КПП Получателя

    После обновления 1С Предприниматель 146 версии на 148-ю перестал выгружатся в текстовый файл обмена с Клиент-банком реквизит КПП Получателя, причём, как при выгрузке вновь созданного пл. поручения так и ранее созданных и успешно выгружавшихся в 146 версии.
    При восстановлении из архива информационной базы 146 версии всё работает.
    Настройки в 148 версии все те же, при выводе платёжки на печать КПП получателя печатается, а в текстовый файл не выводится.
    Не пойму в чём причина? Помогите, пожалуйста, разобраться.
    Фрагменты файлов:
    в 146 версии

    ПолучательИНН=7713218563
    ПолучательКПП=773101001
    Получатель=ИНН 7713218563\773101001 ООО "Дарумсан"

    в 148 версии

    ПолучательИНН=7713218563
    Получатель=ИНН 7713218563\773101001 ООО "Дарумсан"
    Поделиться с друзьями

  2. #2
    Fosihas
    Гость
    есть шанс что сбилcя тип файла.

  3. #3
    Aquad Aquad вне форума
    Модератор Аватар для Aquad
    Регистрация
    04.12.2002
    Адрес
    Москва
    Сообщений
    3,870
    Тип КБ посмотрите... Может отличается?!
    Немногие знают, что при помощи загибания пальцев можно досчитать вовсе не до 10, а до 1023...

  4. #4
    lanky lanky вне форума
    Клерк
    Регистрация
    19.08.2007
    Сообщений
    3
    Прошу извинить за нескорый ответ, был в командировке.
    Причина была в том, что в обработке ПредприятиеКлиент в 148 версии допущена ошибка.
    Решение нашёл следующее:
    в обработке версии 148 заменил текст модуля

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

    на текст из 146 версии

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

    Если ПустоеЗначение(Документ.СчетКонтрагента.Корреспондент)=1 Тогда
    КПППолучателя = ?(ПеречислениеНалога=1,?(ПустаяСтрока(КППполучателя)=1,"0", КППполучателя),"");
    КонецЕсли;

    ТаблицаДокументов.УстановитьЗначение(Стр, Корреспондент + "КПП", КППполучателя);

    и КПП стал выгружаться.

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)