Ситуация следующая. Укргазбанк в феврале переходит на новую систему интернет банкинга ЭКОБУМ и (соответственно) новый клиентбанк. По инструкции разработал обработку для экспорта платежек из 1С в ЭКОБУМ. При загрузке файлов пишет - операция прошла успешно - но загруженных платежек нет.
Горячая линия - сказали у Вас наверное фильтры стоят на платежках - сбросьте их и попробуйте посмотреть снова.
)))))))))
Сброс фильтров сделал - выслал им скриншоты - тишина!
))
Если кому интересно то вот части кода:
Описание полей
ДБФ = Новый XBase;
ДБФ.Кодировка = КодировкаXBase.ANSI;
ДБФ.Поля.Добавить("MFO_A","S",200);
ДБФ.Поля.Добавить("ACCOUNT_A","S",200);
ДБФ.Поля.Добавить("IBAN_A","S",200);
ДБФ.Поля.Добавить("MFO_B","S",200);
ДБФ.Поля.Добавить("ACCOUNT_B","S",200);
ДБФ.Поля.Добавить("IBAN_B","S",200);
ДБФ.Поля.Добавить("OPER_TYPE","S",200);
ДБФ.Поля.Добавить("AMOUNT","S",200);
ДБФ.Поля.Добавить("DOC_TYPE","S",200);
ДБФ.Поля.Добавить("NUMBER","S",200);
ДБФ.Поля.Добавить("CURRENCY","S",200);
ДБФ.Поля.Добавить("DOC_DATE","S",200);
ДБФ.Поля.Добавить("VALUE_DATE","S",200);
ДБФ.Поля.Добавить("NAME_A","S",200);
ДБФ.Поля.Добавить("NAME_B","S",200);
ДБФ.Поля.Добавить("DETAILS","S",200);
ДБФ.Поля.Добавить("ADD_DATA","S",200);
ДБФ.Поля.Добавить("PURP_CODE","S",200);
ДБФ.Поля.Добавить("EMPTY_COL","S",200);
ДБФ.Поля.Добавить("OKPO_A","S",200);
ДБФ.Поля.Добавить("OKPO_B","S",200);
ДБФ.Поля.Добавить("EXT_NUMBER","S",200);
ДБФ.Поля.Добавить("VAT_TYPE","S",200);
И заполнение полей:
ДБФ.Добавить();
ДБФ.MFO_A = СокрЛП(РасчетныйСчет.Банк.Код);
ДБФ.ACCOUNT_A = СокрЛП(РасчетныйСчет.НомерСчета);
ДБФ.IBAN_A = СокрЛП(РасчетныйСчет.НомерСчета);
ДБФ.MFO_B = СокрЛП(Стр.БанковскийСчет.Банк.Код);
ДБФ.ACCOUNT_B = СокрЛП(Стр.БанковскийСчет.НомерСчета);
ДБФ.IBAN_B = СокрЛП(Стр.БанковскийСчет.НомерСчета);
ДБФ.OPER_TYPE = "";
ДБФ.AMOUNT = Формат(Стр.Сумма,"ЧДЦ=2; ЧРД=,; ЧГ=0");
ДБФ.DOC_TYPE = "";
ДБФ.NUMBER = "";
ДБФ.CURRENCY = ?(СокрЛП(Стр.Валюта.Код) = "980","UAH",СокрЛП(Стр.Валюта.Наименование));
ДБФ.DOC_DATE = "";
ДБФ.VALUE_DATE = "";
ДБФ.NAME_A = СокрЛП(Стр.Контрагент.Наименование);
ДБФ.NAME_B = СокрЛП(Стр.Контрагент.Наименование);
Назначение_Платежа = "виплата купон.дох. по ОВДП зг.Розпор.від "+Формат(Стр.ДатаРаспоряжение,"ДФ=dd.MM.yyyy")+" ВЗ не опод.зг.Закону України №466-IX від 16.01.20р. ПДФО не опод. зг.п.165.1.2 ПКУ";
ДБФ.DETAILS = Назначение_Платежа;
ДБФ.ADD_DATA = "";
ДБФ.PURP_CODE = "";
ДБФ.EMPTY_COL = "";
ДБФ.OKPO_A = КодОКПО;
ДБФ.OKPO_B = СокрЛП(Стр.Контрагент.КодПоЕДРПОУ);
ДБФ.EXT_NUMBER = "";
ДБФ.VAT_TYPE = "";
ДБФ.Записать();
Разрабатывал ли кто-нибудь экспорт платежек в данный сервис?
Цитата(romio_33 @ 22.01.21, 11:11)
ДБФ.NAME_A = СокрЛП(Стр.Контрагент.Наименование);
тут уже исправлено - на результат не повлияло
Сообщение отредактировал Vofka - 22.01.21, 11:17