Sagepay отчетности API R Программирование - PullRequest
Новая
       9

Sagepay отчетности API R Программирование

0 голосов
/ 25 сентября 2018

Я пытаюсь вызвать API отчетности sagepay, используя R, но получаю ошибку.По сути, я попытался объединить это руководство: примеры отчетов sagepay и примеры кода API администратора в php с этим: как отправить запрос XML в API с R

Мой код выглядит следующим образом: 

#digest
library(digest)

#RCurl
library(RCurl)

#credentials
vendor<-"vendor"
user<-"user"
pass<-"password"

#hashing password
signature<-digest(paste0("<password>",pass,"</password>"),algo="md5")

#building request
req<-paste0("<vspaccess>
<command>getTransactionList</command>
<vendor>",vendor,"</vendor>
<user>",user,"</user>
<startdate>01/10/2018 00:00:01</startdate>
<enddate>01/02/2018 00:00:01</enddate>
<txtypes><txtype>PAYMENT</txtype></txtypes>
<result>failure</result>
<signature>",signature,"</signature>
</vspaccess>")

myheader<-c(Connection="close", 
           'Content-Type'="application/xml",
           'Content-length'=nchar(req))

data<-getURL(url="https://test.sagepay.com/access/access.htm",
               postfields=req,
               httpheader=myheader,
               verbose=TRUE)

Ошибка, которую я получаю, выглядит следующим образом: 

*   Trying 195.170.169.8...
* Connected to test.sagepay.com (195.170.169.8) port 443 (#0)
* successfully set certificate verify locations:
*   CAfile: C:/Users/Jack/Documents/R/win-library/3.5/RCurl/etc/ca-bundle.crt
  CApath: none
* error:140770FC:SSL routines:SSL23_GET_SERVER_HELLO:unknown protocol
* Closing connection 0
Error in function (type, msg, asError = TRUE)  : 
  error:140770FC:SSL routines:SSL23_GET_SERVER_HELLO:unknown protocol

Я не указал действительные пароли / имена пользователей.

...