B4J Question Send Request to Apple server

[ajk]

Follwing instructions

enhanced receipts for subscriptions, purchase

Hello, I got mail from apple. https://itunespartner.apple.com/en/apps/news/45333106?sc_cid=NSL-AP-ENREC It seems apple improves the possibilties to handle subscriptions. Is it possible to use these informations in b4i. Can someone give my a hint how to get this.

www.b4x.com

and

requestBody | Apple Developer Documentation

The JSON contents you submit with the request to the App Store.

developer.apple.com

I'm trying to communicate with apple's sanbox server from my VPS with code like below
Still gettins 21002 that means: The data in the receipt-data property was malformed or the service experienced a temporary issue. Try again (obwiously request is not-well formed)
Any help appreciated.

Private Sub DownloadApple (numer As String)
    
    Dim B64 As Base64
    Dim  url As String = "https://sandbox.itunes.apple.com/verifyReceipt"
    Dim Job As HttpJob
    Job.Initialize("fcm", Me)

    Dim m As Map
    m.Initialize
    
    m.put ("receipt-data", B64.EncodeStoB( numer,"UTF8"))
    m.put("password",  SubskrypcjaSPLKluczAPPLE)
    Dim jg As JSONGenerator
    jg.Initialize(m)
    Job.PostString(url, jg.ToString)
    Job.GetRequest.SetContentType("application/json")
End Sub

 

[Erel]

You should learn how to use Wait For: [B4X] OkHttpUtils2 with Wait For

Your request looks correct. The problem is somewhere else.

 

[ajk]

But it doesn't change Apple's response. I have had

Sub JobDone(job As HttpJob)
    Log(">>>2")
    If job.Success Then
        Log(job.GetString)
    End If
    job.Release
End Sub

That gives response:

>>>2
{"status":21002}

and if I use:

    Wait For (Job) JobDone(j As HttpJob) 'redim
    If Job.Success Then
        Log(">>>3")
        Log(j.GetString)
    End If
    Job.Release

Server answer is the same:

>>>3
{"status":21002}

 

[DonManfred]

B64.EncodeStoB( numer,"UTF8"))

I guess here is the problem! You are expected to send a base64 STRING but you are generating a BYTES Array and use this in your Api-Call.

Check

B4A - Encryption

and change the call to use encodestos

Even if the documentation points a

receipt-data
byte

I would try to send the bytes as a string. At least it should be worth the try

 

[ajk]

Than you for suggestion, I have tested all options including

m.put ("receipt-data", B64.EncodeStoS( numer,"UTF8"))

before sending code to forum. Moreover according to apple manual

receipt-data
byte
(Required)
The Base64 encoded receipt data.
password
string
(Required)
Your app's shared secret (a hexadecimal string).
Use this field only for receipts that contain auto-renewable subscriptions.

as stadet in https://developer.apple.com/documentation/appstorereceipts/requestbody

No matter what version I use, the answer is always the same

{"status":21002}

 

[DonManfred]

is the receipt a auto-renewable subscription?
If so then you are missing the password in your call.

password
string
(Required)
Your app's shared secret (a hexadecimal string).
Use this field only for receipts that contain auto-renewable subscriptions.

 

[ajk]

auto-renewable subscription
I have tested before sending to forum with

m.put("password", key)
m.put ("receipt-data", B64.EncodeStoS( numer,"UTF8"))

in almost all posible configuration including key encoded and as stated in manual non-encoded.
So all fields were included.