' Inicia la compra asíncrona
Wait For (ComprarProductoSubs(Array As String(sup.ProductId), so.OfferToken)) Complete (res As BillingResult)
Log("Resultado compra: " & res.ResponseCode)
' Comprueba resultado
If res.ResponseCode = br.CODE_OK Then
ToastMessageShow("Compra realizada correctamente", True)
Else
ToastMessageShow("Compra cancelada o error: " & gpb.ReturnResponseMessage(res.ResponseCode), True)
End If