Счастье привалило, в виде нового клиент банка CABiNET от Credit Agricole Bank.
Ранее было 1С 8.2 УТП для України + обработка клієнт банк от Аbbyy Україна, с помощью костыля работало с клиент банком Стиль(М).
И так на самом сайте есть возможность выгрузки платежных поручений в следующих форматах:
Загрузка входных платежей чуть скромнее:
Сегодня, узнал что новый супер клиент банк CABiNET от Credit Agricole Bank, не совместим с 1С. О чем думали IT-специалисты, лично мне не совсем понятно
На звонки, мол как работать 1С & CABiNET, ответы как пользоваться сайтом, и это уже успех
Выгрузил первую платежку пальчиками из 1С в CABiNET, радости мало, спасибо чудесным клавишам "Ctrl + C & Ctrl + V"
Вопрос можно ли штатный клиент банк 1С, подружить с новым клиент банком CABiNET от Credit Agricole Bank
Банк пошел на встречу и прислал два файла с полезной инфой для обмена.
Группа: Местный
Сообщений: 372
Из: Slovensko
Спасибо сказали: 78 раз
Рейтинг: 66.3
Цитата(Espresso.Doktor @ 11.12.18, 18:44)
Сегодня, узнал что новый супер клиент банк CABiNET от Credit Agricole Bank, не совместим с 1С. О чем думали IT-специалисты, лично мне не совсем понятно
Да ладно?
Цитата(Espresso.Doktor @ 11.12.18, 18:44)
На звонки, мол как работать 1С & CABiNET, ответы как пользоваться сайтом, и это уже успех
Сталкивался. Когда-то мне прислали файлик в несколько мегабайт с клиентами по всему району. Забыли отобрать по нашей организации.
Цитата(Espresso.Doktor @ 11.12.18, 18:44)
Вопрос можно ли штатный клиент банк 1С, подружить с новым клиент банком CABiNET от Credit Agricole Bank
Да, можно. Взять за образец любую подключаемую обработку формата, там и дописать в соответствии с форматом выгрузки. В обработке оставляют шаблонные процедуры обработки - TXT, DBF, XLS... Там же в экспортных переменных и указать обрабатываемые форматы этой обработки, например, из того же КредиАгриколь можно делать выгрузки в форматированном тексте или тексте с разделителями и т.д.
Вам нужна конкретика? Опишите формат выгрузки. Скачивать какие-то файлы для ознакомления не хочется.
Цитата(Espresso.Doktor @ 11.12.18, 19:11)
А родной модуль клиент банка в 1С сложно заставить работать?
Родной модуль работает как универсальный? Там есть мастер настройки, в котором можно выбрать тип файла, а в соотвтествии с типом, например, текста, выбрать это файл с разделителями или с фиксированными строками, а также указать длину фиксированного поля и соответствие полей импорта строкам этого текста? Если есть такое - то настроить в режиме пользователя.
Родной модуль работает как универсальный? Там есть мастер настройки, в котором можно выбрать тип файла, а в соотвтествии с типом, например, текста, выбрать это файл с разделителями или с фиксированными строками, а также указать длину фиксированного поля и соответствие полей импорта строкам этого текста? Если есть такое - то настроить в режиме пользователя.
Родной модуль есть, но что он не хочет даже показывать в отборе платежку, которую через него и создал Мастер настройки это вот эта кнопочка ?
Группа: Пользователи
Сообщений: 4
Спасибо сказали: 0 раз
Рейтинг: 0
Espresso.Doktor @ 11.12.18, 18:44
, В этом файле есть поля и нужно будет по них сделать обработку для клиента Аbbyy Україна 1С. Задача не столь и сложная. Самый простой вариант, взять обработку любого банка и ее исправить под формат нового клиента этого банка.
Тоже столкнулся с выпиской CABiNET, изменил под нее iBank2, Функция ИмпортTXT(Параметры) Ничего сложного, только учесть что выписка начинается со второй строки.
Функция ИмпортTXT(Параметры) ФайлTXT = Новый ТекстовыйДокумент; ИмяФайла = Параметры.ИмяФайла; Попытка ФайлTXT.Прочитать(ИмяФайла, КодировкаТекста[Параметры.КодировкаФайла]); Исключение Предупреждение("Ошибка открытия файла " + ИмяФайла); Возврат Неопределено; КонецПопытки;
Если шСчет <> Формат(Параметры.РСчет,"ЧН=0") Тогда Предупреждение("В текущем файле нет платежей с выбранным расчетным счетом!"); Возврат тзВыписка; КонецЕсли;
Для н = 2 По ФайлTXT.КоличествоСтрок() Цикл ТекСтрока = ФайлTXT.ПолучитьСтроку(н); Спис = РазобратьСтроку(ТекСтрока);
ДатаОперации = Дата(Спис[2+Дельта].Значение); // ггггммдд Если ДатаОперации <> Параметры.ДатаДок Тогда Продолжить; КонецЕсли;
Если Лев(ИмяКонтрагента, 1) = """" И Прав(ИмяКонтрагента, 1) = """" Тогда ИмяКонтрагента = Сред(ИмяКонтрагента, 2, СтрДлина(ИмяКонтрагента) - 2); ИмяКонтрагента = СтрЗаменить(ИмяКонтрагента,"""""", """"); КонецЕсли;
НомерПП = СокрЛП(Спис[25+Дельта].Значение); Назначение = СокрЛП(Спис[24+Дельта].Значение); Если Лев(Назначение, 1) = """" И Прав(Назначение, 1) = """" Тогда Назначение = Сред(Назначение, 2, СтрДлина(Назначение) - 2); Назначение = СтрЗаменить(Назначение,"""""", """"); КонецЕсли;
ДебетКредит = СокрЛП(Спис[11+Дельта].Значение); //'D' - мы платим 'C' - нам платят Если ДебетКредит = "D" Тогда Приход = 0; Расход = Спис[10+Дельта].Значение/100; //Сумма в копейках Иначе Приход = Спис[10+Дельта].Значение/100; //Сумма в копейках Расход = 0; КонецЕсли;
Если Расход > 0 Тогда //Расход НовСтрока.Расход = Расход; НовСтрока.Приход = 0; Иначе //Приход НовСтрока.Расход = 0; НовСтрока.Приход = Приход; КонецЕсли; КонецЦикла;
Если НЕ тзВыписка.Количество() И ФайлTXT.КоличествоСтрок() Тогда Предупреждение("В текущем файле нет платежей с данной датой выписки и расчетным счетом!"); КонецЕсли;
Группа: Пользователи
Сообщений: 1
Спасибо сказали: 0 раз
Рейтинг: 0
kooperdj @ 24.01.19, 22:33
,
Цитата(kooperdj @ 24.01.19, 22:33)
Тоже столкнулся с выпиской CABiNET, изменил под нее iBank2, Функция ИмпортTXT(Параметры) Ничего сложного, только учесть что выписка начинается со второй строки.
Подскажите, а где можно взять iBank2, чтобы подогнать его под выгрузку из CABiNET Credit Agricole?
Группа: Пользователи
Сообщений: 265
Спасибо сказали: 4 раз
Рейтинг: 0
Абби быстро штампует новые форматы. Поищите. Я написал свою байду, так как абби-вские слишком примитивны для нашего предприятия. Там 90% пришлось бы вручную довводить.
Группа: Пользователи
Сообщений: 8
Спасибо сказали: 10 раз
Рейтинг: 0
Цитата(kooperdj @ 24.01.19, 22:33)
Тоже столкнулся с выпиской CABiNET, изменил под нее iBank2, Функция ИмпортTXT(Параметры) Ничего сложного, только учесть что выписка начинается со второй строки.
Здраствуйте. Взял Ваш код но при выполнение ругается на области . Через отладчик показало что на области МФО ({ВнешняяОбработка.КлиентБанк2.Форма.Форма.Форма(751)}: ОбластьКодМФО = КлассификаторБанков.Области.КодМФО; ). В чем может бить проблема ? Спасибо.
Espresso.Doktor @ 28.02.20, 1:12
, Нет, это вы открыли основную обработку. Есть еще обработки форматов, их можно модифицировать под выгрузку вашего банка.
alienextrime @ 26.02.20, 15:33
, Похоже, что КласификаторБанков - это какой-то макет. Его просто может не быть в вашей конфигурации. Нужно знать, что у вас за конфигурация и какой версией обработки вы пользуетесь.
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!