Внешняя компонента для работы с Cyberplat

16.11.10

Разработка - Разработка внешних компонент

С использованием этой внешней компоненты несложно написать свою обработку/конфигурацию для приема платежей в системе киберплат прямо из 1С.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Архив с компонентой, исходниками и описанием версия 1.1
.rar 524,54Kb
79
79 Скачать (1 SM) Купить за 1 850 руб.
Обработка для 77
.ert 44,50Kb
20
20 Скачать (1 SM) Купить за 1 850 руб.
"Родная" киберплатовская компонента
.1222381245 648,70Kb
250
250 Скачать бесплатно
Архив с компонентой, исходниками и описанием версия 1.0
.1222136059 335,56Kb
483
483 Скачать (1 SM) Купить за 1 850 руб.

До того как написать эту библиотеку, перерыл интернет, обращался в саппорт киберплата, но найденные варианты не устроили. Саппорт предлагал два варианта: использовать их внешнюю компоненту и использовать сервер платежей. Минусы первого варианта: не учитывает новые правила формирования тройки адресов для разных операторов, необходимость каждый раз вводить кодовое слово вручную (как сказал наш сисадмин, если продавец будет знать кодовое слово - никто не мешает ему скопировать файлы ключей себе домой и пользоваться ими из дома в свое удовольствие за счет компании).
Сервер платежей работает с одним комплектом ключей. Поэтому когда много точек приема, сложно разбираться от какой прошел платеж. Если же сервер платежей ставить на каждой точке приема - опять же удар по безопасности, поскольку кодовое слово записано в конфигурационном файле в незашифрованном виде.

В итоге решил написать свою внешнюю компоненту. Использовал Delphi 6, информацию с диска ИТС, документацию с www.cyberplat.ru
Это мой первый опыт написания внешних компонент, да и на Delphi очень давно ничего не писал, поэтому сильно не пинайте. Конструктивная критика приветствуется.
Исходники прилагаются.
Также есть пример работы с компонентой для 1с 8.1

 

PS

Уважаемый Dr_DelProg нашел неточность в предлагаемых тестовых обработках. Для исправления ошибки необходимо при подключении библиотеки использовать команду с описанием класса

ПодключитьВнешнююКомпоненту("AddIn.CyberPlatDVV");

а не

ПодключитьВнешнююКомпоненту("AddIn.CyberDVV");

Давайте поблагодарим его плюсами в комментарии (52)

 

12/11/2010 Версия 1.1

Добавлено:

свойство StandartBody (русск. СтандартноеТелоЗапроса) чтение / запись. Тип целое. По умолчанию значение = 1. Если присвоить свойству значение 0, то тело запроса будет формироваться в сокращенном варианте (см. инструкцию). Это полезно, если Вы хотите иметь полный контроль над содержимым запроса.

свойство ResponseText (русск. ТекстОтвета) только чтение. В это свойство возвращается полный текст отчета сервера Cyberplat. Полезно поскольку разработчики Cyberplat постоянно добавляют какие-то поля в ответы сервера.

Спасибо Антону за то, что уговорил внести эти изменения и за его терпение в многочисленных попытках выяснить, почему сервер Cyberplat не принимает с виду нормальный запрос, сформированный "вручную" средствами 1С. О выясненных подводных камнях читайте инструкцию.

См. также

Разработка внешних компонент Системный администратор Программист Платформа 1С v7.7 Платформа 1С v8.3 Платформа 1C v8.2 Платформа 1С v8.1 Россия Платные (руб)

Аддон "Структура Обмена" (ExchangeStruc) - это компонента, которая обеспечивает доступ к разделяемым процессом структурам, аналогичным структурам 1С. Обеспечивает прозрачную передачу данных примитивных типов, в том числе Двоичных данных, в режиме Реального времени между разными контекстами (формами) или потоками одного процесса. В перспективе функционал будет расширен для обмена между процессами, даже разных версий платформ. Совместим с версиями Windows рабочих станций и серверов, с платформами 1С разных версий и релизов в режиме Native начиная с 8.2, и в режиме COM начиная с версий 7.7. По скорости чтения и записи лишь немногим уступает стандартной структуре 1С. НОВОЕ: Добавлен функционал регистрации компоненты COM в качестве OLE Auto (COMОбъект) для поддержки её работы в серверах старых версий 1С: 8.0 и 8.1, где работа с компонентами исключена. Теперь можно коммуникацию с Фоновыми заданиями на этих версиях проводить.

7200 руб.

19.04.2023    5283    1    0    

3

Разработка внешних компонент WEB-интеграция Программист Платформа 1С v7.7 Конфигурации 1cv7 Платные (руб)

Компонента HttpSrv7 позволяет создавать веб-сервисы в среде 1С 7.7 и даже, используя файлы HTML, несложные веб-сайты. С помощью нее можно обеспечить доступ к данным 1С 7.7 из браузера. Дополнительно используя компоненту HTTP_Async или синхронный клиент HTTP для 1С 7.7 (публикация № 1152364) можно наладить обмен данными между удаленными информационными базами. С помощью компоненты HTTP_Async можно сначала послать несколько запросов к сайтам, веб-сервисам (в т.ч. к HttpSrv7), а затем обрабатывать данные по мере их поступления. Компонента GISMT в дополнение к HTTP_Async имеет функцию цифровой подписи и, таким образом, имеет все возможности для работы с API ГИС МТ "Честный знак" непосредственно из среды 1С 7.7.

2000 руб.

27.05.2022    8945    23    17    

34

Разработка внешних компонент Программист Платформа 1С v7.7 Платные (руб)

Компонента для выбора значения из больших списков значений.

1200 руб.

02.12.2021    6267    2    19    

4

Разработка внешних компонент Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v7.7 Конфигурации 1cv7 Абонемент ($m)

Эта внешняя компонента Base64.dll предназначена для платформы 1С версии 7.7. Используется для преобразования файлов из/в кодировку Base64 из встроенного языка 1С Предприятие. Компонента тестировалась на базе конфигурации Бухгалтерский учет для Казахстана, редакции 7.70.257.

10 стартмани

06.04.2021    10051    14    softmaker    13    

5

Разработка внешних компонент Защита ПО и шифрование Программист Платформа 1С v7.7 Абонемент ($m)

Цифровые подписи, шифрование, просмотр сертификатов ключей ЭЦП, работа с различными криптопровайдерами (в т.ч. КриптоПРО ГОСТ 2012) в 1С 7.7.

1 стартмани

08.06.2020    9439    28    mdbruyfn    10    

9

Разработка внешних компонент Программист Платформа 1С v7.7 Абонемент ($m)

Обмен сообщениями и небольшими файлами по протоколу UDP с 1С и внешними приложениями в локальной сети или сети VPN.

1 стартмани

23.05.2020    7607    7    mdbruyfn    0    

6

Внешние источники данных Программист Платформа 1С v7.7 Конфигурации 1cv7 Украина Абонемент ($m)

Рабочий механизм чтения/записи строк в формате JSON для 1С 7.7. Тестировалось на релизах 7.70.25 и 27.

1 стартмани

16.12.2019    23027    64    Volvo32    33    

25

Разработка внешних компонент WEB-интеграция Программист Платформа 1С v7.7 Абонемент ($m)

Компонента позволяет использовать различные веб-сервисы интернет-ресурсов, например работать с онлайн-кассой через API, предоставленное ее разработчиком. Тестировалась на платформе 1С релиза 7.70.027.

1 стартмани

14.11.2019    19354    106    mdbruyfn    105    

18
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. Душелов 4021 23.09.08 09:45 Сейчас в теме
+ за содержание архива ;)
2. Valerich 1637 23.09.08 09:48 Сейчас в теме
спасибо, а как полезность?
3. Душелов 4021 23.09.08 11:08 Сейчас в теме
(2) я не пользуюсь этой системой :)
4. aleph 24.09.08 12:57 Сейчас в теме
Спасибо.
Буду смотреть, давно искал.
А какую внешнюю компоненту предлагал использовать Киберплат?
5. Valerich 1637 25.09.08 07:36 Сейчас в теме
(4) 1cv7cplt.dll - саппорт киберплата присылал, если надо могу подарить - мне не жалко
16. aleph 01.10.08 14:59 Сейчас в теме
(5) Прошу прислать родную компоненту Киберплата 1cv7cplt.dll на aleph@moris.ru
И если возможно объяснить - в чем проблема с ее использованием.
Заранее спасибо.
17. Valerich 1637 02.10.08 02:05 Сейчас в теме
(16) так и выкачивай ее (смотри второй файл: "Родная" киберплатовская компонента). Проблема в использовании описана в описании к разработке: не учитывает новые правила формирования тройки адресов для разных операторов, необходимость каждый раз вводить кодовое слово вручную.
6. twiny 15 25.09.08 14:25 Сейчас в теме
можно ли получить компоненту (киберплатовскую родную) на почту paimukhin@inbox.ru

кстати, у нас почему то ЗагрузитьВнешнююКомпоненту не проходит
платформа 025, ОС ВинСервер2003 (терминал)
регсвр32 сделали, загружаем под администраторскими полномочиями

нужно ли переделывать компоненту под 7ку или они универсальны для любой платформы
1Ски (и 7ка и 8ка)?
7. kuzya 25.09.08 16:10 Сейчас в теме
за компоненту спасибо!
только она работать не хочет!
1C 7.7 27 платформа, компонента зарегистрирована!
Попытка
ЗагрузитьВнешнююКомпоненту("Cyberdvv.dll");
Кибер = СоздатьОбъект("AddIn.CyberPlatDVV")
Исключение
Предупреждение("Ошибка");
Кибер = "";
КонецПопытки;
пишет при попытке создания объекта "Ошибка при инициализации объекта из компоненты ...\Cyberdvv.dll"
пробовал перекомпилять из исходников, пишет такую же ошибку!
8. Abadonna 3969 25.09.08 16:18 Сейчас в теме
(7) Если компонента зарегена через regsvr32, ЗагрузитьВнешнююКомпоненту писать не надо.
Сразу писать СоздатьОбъект
9. twiny 15 25.09.08 17:02 Сейчас в теме
убрали ЗагрузитьВнешнююКомпоненту, пишет ошибку Неудачная попытка создания объекта (AddIn.CyberPlatDVV)
на строку СоздатьОбъект("AddIn.CyberPlatDVV")
10. Abadonna 3969 25.09.08 17:05 Сейчас в теме
(9) Проверь реестр на наличие AddIn.CyberPlatDVV
11. twiny 15 25.09.08 17:16 Сейчас в теме
только что попробовали под 1с 80 - работает, под 7.7 не пашет ((
12. twiny 15 25.09.08 17:19 Сейчас в теме
2 Abadonna
regsvr32 /u сделали...добавили опять Загр.Вн..Ком.... не пашет все равно, видимо какие то проблемы есть с исходным кодом компоненты
13. Valerich 1637 26.09.08 05:52 Сейчас в теме
пололжил оригинальную компоненту.
Почему не работает моя под 7-кой понять не могу. Может спецы что-нибудь подскажут. Вроде все по инструкции.
14. kuzya 26.09.08 10:36 Сейчас в теме
Спасибо за оригинальную компоненту!
15. Valerich 1637 26.09.08 12:25 Сейчас в теме
Огромное спасибо спецам с мисты, особенно v77 (http://www.forum.mista.ru/topic.php?id=363863) за помощь. Теперь должно работать и под 7.7. По крайней мере у меня заработала.
пример такой:
Код
   Рез = ЗагрузитьВнешнююКомпоненту("CyberDVV.dll");
   Если Рез <> 1 Тогда
      Предупреждение("Ошибка загрузки");
      Возврат;
   КонецЕсли;
   Сообщить("Объект создан");
   Кибер = СоздатьОбъект("AddIn.CyberPlatDVV");
   Сообщить("Код оператора " + Кибер.Порт);
Показать полностью
18. aleph 18.10.08 18:15 Сейчас в теме
1. Почему на сайте КиберПлат (https://service.cyberplat.ru/cgi-bin/view_stat.utf/help.cgi) для тройки адресов указан протокол https, а в обработке http?

2. Тестовая проверка написана для МТС. С МТС все работает нормально. Меняем в обработке тройку адресов МТС на БИЛАЙН (https://service.cyberplat.ru/cgi-bin/b3/b3_pay_check.cgi, https://service.cyberplat.ru/cgi-bin/b3/b3_pay.cgi, https://service.cyberplat.ru/cgi-bin/b3/b3_pay_status.cgi). Выполняем проверку. Появляется ошибка: «Ошибка подписи ответа: подпись не соответствует содержимому документа». И так для всех операторов, кроме МТС. В чем ошибка?
19. Valerich 1637 19.10.08 07:21 Сейчас в теме
компонента пока не работает я протоколом https. Попробуйте те же самые адреса по http.
24. aleph 21.10.08 10:56 Сейчас в теме
(19)
По первой части вопроса все понятно, а на вторую часть можно получить ответ?

2. Тестовая проверка написана для МТС. С МТС все работает нормально. Меняем в обработке тройку адресов МТС на БИЛАЙН (https://service.cyberplat.ru/cgi-bin/b3/b3_pay_check.cgi, https://service.cyberplat.ru/cgi-bin/b3/b3_pay.cgi, https://service.cyberplat.ru/cgi-bin/b3/b3_pay_status.cgi). Выполняем проверку. Появляется ошибка: «Ошибка подписи ответа: подпись не соответствует содержимому документа». И так для всех операторов, кроме МТС. В чем ошибка?

20. Valerich 1637 19.10.08 08:42 Сейчас в теме
21. VitGun 1 19.10.08 14:34 Сейчас в теме
а у меня вот чего пишет
"Ошибка при создании объекта из компоненты D:\1c_last\CyberDVV.dll (отсутствует CLSID)"

regsvr32 CyberDVV.dll делал

компонента лежит в папке с конфигурацией

7-ка 7.70.025
22. Valerich 1637 20.10.08 02:05 Сейчас в теме
если используете такой способ загрузки компоненты
Рез = ЗагрузитьВнешнююКомпоненту("CyberDVV.dll");
то ее надо положить в подкаталог bin каталога, в который установлено 1С предприятие. По умолчанию это
C:\Program files\1cv77\bin
23. Valerich 1637 20.10.08 02:12 Сейчас в теме
если же хотите использовать ее из другого каталога, предварительно зарегистрировав regsvr32 CyberDVV.dll, то вместо
Рез = ЗагрузитьВнешнююКомпоненту("CyberDVV.dll");
используйте
Рез = ПодключитьВнешнююКомпоненту("AddIn.CyberDVV");
25. Valerich 1637 21.10.08 11:38 Сейчас в теме
попробуйте по всей тройки https: заменить на http: и порт не 443, а 80 (если вдруг меняете)
у нас билайн экзотика - но на акос и мегафон проверки нормально проходят.
26. aleph 21.10.08 12:23 Сейчас в теме
(25) Меняли адрес на http
Мегафон все равно не проходит
В чем может бы проблема?
27. Valerich 1637 21.10.08 12:27 Сейчас в теме
а ключики боевые используете? Я в свое время бился с этой траблой, когда для боевых ключей пытался использовать тестовую тройку адресов, которые начинаются с http://payment.cyberplat.ru. Оказалось, что payment для тестовых ключей, а service для боевых. Сейчас все нормально.
28. aleph 21.10.08 13:09 Сейчас в теме
Поменяли адрес с service на payment, ситуация немного улучшилась.
Но при запросе на Билайн не возвращает Оператора.
29. Valerich 1637 22.10.08 02:02 Сейчас в теме
Я так понял, ситуация такая: Вы пытаетесь отладить программу для разных операторов на тестовых ключиках? Увы, насколько я понял - не получится. Для тестовых ключей можно выполнять запросы на одну тройку адресов - только для МТС через http://payment.cyberplat.ru. Выполнять проверки рекомендуется на 2 телефонных номера:
все 8-ки всегда проходит проверку, а все 9-ки всегда дает ошибку, что такого телефона нет. Для остальных операторов выдает самые разные ошибки. И для других телефонных номеров тоже. Это зависит не от моей ВК, а от сервиса, предоставляемого киберплатом для отладок собственных приложений.
Использование реальных телефонов реальных операторов возможно только при использовании БОЕВЫХ ключей и таких же адресов через http://service.cyberplat.ru
ПОверьте - это не я придумал. Я сам через эти все грабли уже прошел. Тонкости от самого киберплата ищи на странице http://www.cyberplat.ru/tech/ внизу
pahankill; +1 Ответить
31. aleph 25.10.08 13:08 Сейчас в теме
30. Valerich 1637 22.10.08 02:04 Сейчас в теме
вот, например, один из ответов саппорта киберплата:
Ключи должны работать на любом компьютере, только если не просили установить проверку на IP адрес.
Запросы по HTTP и HTTPS проходят одинаково.
С боевыми ключами надо обращаться на боевые URL. Там вместо слова payment стоит слово service.

32. lex81 29.10.08 14:02 Сейчас в теме
Пробуем на "боевых" ключах, при проверке возвращает код ошибки 2: "неправильный код дилера". Мы что-то не нашли, где его надо указать.
33. Valerich 1637 30.10.08 02:27 Сейчас в теме
(32) забыл указать в инструкции
КодДилера (англ. синоним SD) для тестовых ключей равен 17031
34. Valerich 1637 30.10.08 02:32 Сейчас в теме
35. lex81 30.10.08 09:06 Сейчас в теме
36. aleph 12.11.08 12:04 Сейчас в теме
Часто при вызове метода ЗагрузитьВнешнююКомпоненту("CyberDVV.dll") 1С (8.1) «вылетает».
37. Valerich 1637 12.11.08 12:38 Сейчас в теме
(36) пока с таким не сталкивался. Проверьте, последняя ли у Вас версия, а то может первоначальная. В ней косячок был. Выявился на платыорме 7.7. Должен по идее сказываться и при работе с 8.х
38. monk19 23.01.09 10:55 Сейчас в теме

а существуют компонента для приема платежей не только за мобильную связь?
39. Valerich 1637 09.02.09 03:50 Сейчас в теме
посмотрите список операторов, поддерживаемых киберплатом. Там не только сотовая связь, но и ЖКХ, энергетика и много еще чего
40. VitGun 1 03.03.09 12:40 Сейчас в теме
Если планируется следующая версия - добавьте в код обработку параметра REST - это баланс дилера. + какая-то ерунда со статусами платежа. у меня постоянно выдает ошибку 10. неверный формат документа.
65. Valerich 1637 12.11.10 16:50 Сейчас в теме
(40), (59) можете скачать версию 1.1. Надеюсь изменения будут полезными.

О изменениях читайте в описании и инструкции.
41. Терминальщик 29.06.09 10:49 Сейчас в теме
Что-то никак не получается подключить компоненту, пробывал разными способами. Попытался откомпилировать иходники, Дельфи выдает ошибку на 342 строчке, модуля - AddInObj.pas:
LogDebug.Target := ltDebugOutput;
([Error] AddInObj.pas(342): Undeclared identifier: 'Target')

Возможно причина, по которой я не могу подключить компоненту, как то связана с ошибкой при компиляции? Кто нибудь сталкивался с подобным?
42. Valerich 1637 05.07.09 13:29 Сейчас в теме
(41) а если не перекомпилировать (возможно настройки делфей другие или версия). Какая ошибка подключения бибилиотеки?
43. Valerich 1637 05.07.09 13:30 Сейчас в теме
всем сомневающимся: текущая версия библиотеки работает в боевом режиме в сети точек по приему платежей. До сих пор нареканий не было.
44. Терминальщик 07.07.09 11:40 Сейчас в теме
(43) к сомневающимся я не отношусь, и уверен что библиотека рабочая. Видно что то у меня с системой, либо с руками =), хотя и имел опыт с подключением библиотек.
(42) дельфи 7 версии, 1С версии 8.1.11.67. Если следовать иструкции, то при использовании 1-го метода (regsvr32 CyberDVV.dll, ПодключитьВнешнююКомпоненту("AddIn.CyberDVV")) - выдается ошибка:
Ошибка при вызове метода контекста (ПодключитьВнешнююКомпоненту): Ошибка при подключении внешней компоненты;
при использовании 2-го метода (ЗагрузитьВнешнююКомпоненту("CyberDVV.dll")) - ошибка:
Ошибка при вызове метода контекста (ЗагрузитьВнешнююКомпоненту): Ошибка при загрузке внешней компоненты.

Может быть, в моей системе чего то нехватает, от чего зависит CyberDVV.dll?
Незнаю что и делать, а так есть большое желание написать модуль платежей в 1С.
45. Valerich 1637 08.07.09 11:30 Сейчас в теме
(44) попробуй метод подключния вынести из Попытак Исключение. Может 1С-ка тогда более внятно ошибку опишет?
Не забудь, что если используется метод ЗагрузитьВнешнюю компоненту, то обе длл-ки должны лежать в подкаталоге BIN каталога 8-ки (по умолчанию "C:\Program Files\1cv81\bin")
46. Valerich 1637 08.07.09 11:35 Сейчас в теме
(44) при разработке тоже использовал делфи 7, с настройками по умолчанию (только настройки редактора для себя подправил). Но тот делфи канул в лету вместе с работой. Поэтому проверить пока не могу. Вот может на новой работе кака-нибудь поставлю. Попробуй поискать где и как объявляется LogDebug. Что там за тип и где он описан. Может какие-то библиотеки делфей у тебя заменены сторонними компонентами...
Можно еще посмотреть на диске ИТС примеры разработки внешних компонент (я заготовку взял оттуда). Попробуй скомпилировать чистый пример. Получится или нет?
47. dez77 12.08.09 10:33 Сейчас в теме
У меня не работает в 8 ке пишет не найден Кибер. Делаю все по инструкции.
48. Valerich 1637 19.08.09 04:02 Сейчас в теме
(47) подробнее про ошибку можно? Например, приведи код, на которм ошибка, сам полный текст ошибки.
49. dez77 19.08.09 14:09 Сейчас в теме
Убрал попытку исключение пишет,
{Форма.Форма(65)}: Ошибка при вызове метода контекста (ПодключитьВнешнююКомпоненту): Ошибка при подключении внешней компонентыПодключитьВнешнююКомпоненту("AddIn.CyberDVV");
по причине:
Ошибка при подключении внешней компоненты
50. Valerich 1637 21.08.09 04:59 Сейчас в теме
(49) dll-ку регистрил командой regsvr32? регистрировать желательно под правами администратора или близкими (в общем с полными правами на запись в реестр).
Под Вистой сталкивался с тем, что надо еще отключать какой-то контроль учетных записей в висте. Подробнее тут http://www.5pro.ru/news/p2_articleid/28
Если не регистрировал, то вместо ПодключитьВнешнююКомпоненту используется команда ЗагрузитьВнешнююКомпоненту, но dll-ки тогда обязятально должны лежать в подкаталоге bin 1с-ки
51. Dr_DelProg 55 13.03.10 22:00 Сейчас в теме
(49) Удалось разобраться?
(50) Та же проблема:

Ошибка: {Форма.Форма(66)}: Ошибка при вызове метода контекста (ЗагрузитьВнешнююКомпоненту): Ошибка при загрузке внешней компоненты

Win7. UAC отключен. Resvr32 сработал нормально.
52. Dr_DelProg 55 13.03.10 22:41 Сейчас в теме
ПодключитьВнешнююКомпоненту("AddIn.CyberPlatDVV");
а не
ПодключитьВнешнююКомпоненту("AddIn.CyberDVV");

(пока ProgID не увидел в реестре, не понял)
Valerich; +1 Ответить
53. Valerich 1637 16.03.10 16:46 Сейчас в теме
(52) огромное человеческое спасибо, за то, что нашли ошибку.

(44), (49) попробуйте вариант, предложенный в (52)
54. TimIs 29.04.10 07:45 Сейчас в теме
Скачал архив, все делал как положено и все равно ругается
"Ошибка при создании объекта из компоненты C:\Program Files\1Cv77\BIN\CyberDVV.dll (отсутствует CLSID)"
подскажите в чем проблема?
55. Valerich 1637 29.04.10 08:53 Сейчас в теме
(54)
У вас есть административные права на этом компьютере?
Совет (52) пробовали?.
Версия платформы?
Какими способами пробовали подключить (с правами администратора компьютера)
56. TimIs 29.04.10 09:03 Сейчас в теме
работаю на ПК с админискими правами, платформа 1С 7.7 Оперативный учет
пример как я произвожу подключение:
Если ЗагрузитьВнешнююКомпоненту("CyberDVV.dll") <> 0 Тогда
Кибер = СоздатьОбъект("AddIn.CyberPlatDVV");
Иначе
Предупреждение("Ошибка при загрузки внешней компаненты.",60);
КонецЕсли;
Исключение
Предупреждение("Ошибка при загрузки платежной системы!!!",60);
Кибер = "";
КонецПопытки;
57. Valerich 1637 29.04.10 09:47 Сейчас в теме
(56) я выложил пример обработки для 77 отдельным файлом. Для зарегистрированной dll-ки. Скачай, попробуй. У меня заработало.
58. TimIs 29.04.10 09:54 Сейчас в теме
(57)
можно отправить мне на почту, а то с сайта не дает качать.
isaevtimur@mail.ru
Заранее спасибо.
59. lex81 04.08.10 08:58 Сейчас в теме
Скачали ВК, написали для себя платежную систему для приема оплаты за сотовую связь и интернет, - все работает хорошо, большое спасибо за ВК. Сейчас возникла потребность приема платежей за банковский кредит, но возникла сложность - необходимо еще передавать параметр AMOUNT_ALL, а его в Вашей обработке нет. Есть возможность добавить этот параметр?

Сумма с клиента (AMOUNT_ALL) *
*AMOUNT_ALL - обязательный параметр в запросе на платёж.
Разница между AMOUNT_ALL и AMOUNT должна соответствовать условиям взимания комиссии с плательщика указанной в договоре.
60. Valerich 1637 04.08.10 09:41 Сейчас в теме
(59) насколько я помню у драйвера есть поле счет, которое в принципе может содержать произвольную информацию. Можно попробовать сунуть нужную строку туда.
Если не получится, посмотрите исходники - как формируются поля запроса HTTP.

Писал давно, подробностей не помню :( и Delphi под руками нет в связи с увольнением 2 года назад.
61. AntonRUS 21.09.10 22:56 Сейчас в теме
Ситуация аналогична 59.
Очень нужно это поле AMOUNT_ALL, это новшество киберплата для приёма платежей по мультибанковскому шлюзу. Возможно ли решение этого вопроса на коммерческой основе?
P.S. Попытался дописать сам, но столкнулся с такой проблемой: даже компилируя исходный код получаю компоненту с которой 1с зависает в 8 случаях из 10 :?: :!:
Valerich; +1 Ответить
62. Valerich 1637 22.09.10 02:25 Сейчас в теме
(61) вот так формируется тело сообщения:
           Add('SD=' + fSD);
            Add('AP=' + fAP);
            Add('OP=' + fOP);
            Add('SESSION=' + fSession);
            Add('NUMBER='  + fPhoneNumber);
            Add('ACCOUNT=' + fAccount);
            Add('AMOUNT='  + strAmount);
            Add('COMMENT=' + fComment);
Показать

Поэтому можно попробовать полю "Счет" (Aссount) присвоить нужный текст, например

Символы.ПС + "AMOUNT_ALL=Нужная сумма";


Вполне возможно, что все получится. Если нет, значит попробую поставить себе делфи и внести изменения в компоненту.

63. AntonRUS 22.09.10 08:56 Сейчас в теме
В этом я разобрался, проблема с самой компиляцией, даже если никаких изменений не вношу, а компилирую исходники то полученная компонента не работает (1с зависает), хотя размер её один в один с той что идёт с исходниками. Компилировал из windows 7 и windows xp проблема сохраняется.
Кстати тут кто-то уже писал, при компиляции выдаётся ошибка:
[Hint] AddInObj.pas(961): Value assigned to 'TAddInObject.miDoRequest' never used
может быть проблема в этом? или нужны какие-нибудь особенные условия компиляции?
64. Valerich 1637 22.09.10 10:09 Сейчас в теме
(63) про особенные условия не знаю. В свое время поставил Delphi 6 какой был (кажется Professional или Enterprise - мы в России берем по максимуму, что можно) без всяких доп. компонент и т.п. Настраивал там только редактор под себя. Больше ничего не делал - все в режиме по умолчанию.
66. Valerich 1637 12.11.10 16:53 Сейчас в теме
(63) Можно качать обновленную версию с последними исходниками.

кстати [hint] это не ошибка, а предупреждение. В данном случае, говорящая о том, что присвоенное значение возможно нигде не будет использовано. Возможно даже компилятор эту строку выкинет.

Спасибо тебе, Антон и удачи.
67. shushkovka 132 09.12.10 13:40 Сейчас в теме
Эх... где ж ты раньше то был... :)
Как раз требовались нестандартные запросы (штраф ГИБДД), пришлось написать свою ВК... А тут вот оно - щастье :)
68. platonovv 15.12.10 16:44 Сейчас в теме
Пытаюсь подключить компоненту к 1с 7.7. подключилась, но в параметрах (сервис-параметры) не выполняются никакие действия (забиваю любой из параметров и пытаюсь нажать ок, применить и пр. и никаких действий, только отмена). в чем может быть дело? на просьбу начать работу - пустое "результат" и постой "ТекстОшибки". У кого нибудь в семерке она работает?

.... все, разобрался сам.

у кого нибудь есть опыт работы при помощи компоненты с мультибанковским шлюзом?
69. unit_3q 12.02.11 00:30 Сейчас в теме
Вроде работает и под 8.2. только в ответе сервера не читаются номер транзакции, имя оператора и код авторизации. В ихней документации написано, что имя оператора и код авторизации опциональные и могут не передаваться, но номер транзакции-то??
70. a_mironov 11.12.11 04:43 Сейчас в теме
Спасибо, будем анализировать
71. vscooter 17.12.11 10:39 Сейчас в теме
Добрый день.
Скачал обработку, но никак не могу зарегистрировать CyberDVV.dll
перепробовал все варианты, через regsvr32 пишет (Ошибка при вызове LoadLibrary(CyberDVV.dll) - Не найден указанный модуль), права администратора, пытался регистрировать с разных мест, на разных компах (XP разные версии).
Через 1с тоже не регистрируется (ЗагрузитьВнешнююКомпоненту)...- "Компонента не подключена Ошибка создания объекта драйвера Cyberplat".

1c 7.70.025, XP - Professional 2008 Edition.

Возможно у меня битая dll_ка не могли бы отправить новую на адрес vscooter@bk.ru.
72. vscooter 17.12.11 23:34 Сейчас в теме
Ну что, народ, ни у кого нет CyberDVV.dll...
73. vscooter 19.12.11 01:13 Сейчас в теме
Спасибо Валерий.
Модуль зарегистрировался,очень удобный в работе.
Будем обязательно его использовать.
74. Cujo 2 28.01.15 13:22 Сейчас в теме
У меня вопрос:
До того как написать эту библиотеку, перерыл интернет, обращался в саппорт киберплата, но найденные варианты не устроили. Саппорт предлагал два варианта: использовать их внешнюю компоненту
У меня не получается к восьмёрке "прикрутить" оригинальную киберовскую компоненту. Ошибка вида {ВнешняяОбработка.ОплатаКиберПлат.МодульОбъекта(1205)}: Тип не определен (V77.CyberPlat). Хотя все зарегистрировал, в реестре записи есть. Можете подсказать, куда покопать?
75. Valerich 1637 30.01.15 04:49 Сейчас в теме
(74) К сожалению не помню. Очень давно это было. Может она несовместима с 8.3, если вы ее используете? Я то в своих тестах с "родной" остановился либо на 8.0 либо на 8.1... Одно могу сказать - моя библиотека у клиента до сих пор работает уже на платформе 8.2
76. Cujo 2 03.02.15 10:40 Сейчас в теме
Подключить компоненту удалось - винда была 64-битная, а тестовый батник от Киберплата регистрирует в %system32%. Прошу прощения:)
77. user767271 10.06.17 12:57 Сейчас в теме
Подключить компоненту удалось,1C 7.7 ТиС 988 сборка, но в параметрах (сервис-параметры) не выполняются никакие действия . кто нибудь с таким сталкивался? Как заставить параметры сохраняться и меняться?
78. Valerich 1637 13.06.17 05:55 Сейчас в теме
(77) Владимир вот тут (68) написал, что как-то разобрался, но подробностей не знаю
Может 1с надо от имени администратора запустить попробовать?
Оставьте свое сообщение