I use this to restore purchase, success is true but I can't get it to save the value in kvs:
B4XMainPage:
Public Sub Initialize
kvs.Initialize(xui.DefaultFolder, "data_store.dat")
AdsRemoved = kvs.GetDefault("AdsRemoved", False)
End Sub
RestoreTransactions:
Sub RestaurarCompras()
MyStore.RestoreTransactions
End Sub
TransactionsRestored:
Sub MyStore_TransactionsRestored (Success As Boolean)
If Success Then
AdsRemoved = True
MensajeToast(Root, "Restauración exitosa")
Else
AdsRemoved = False
MensajeToast(Root, "Restauración fallida")
End If
kvs.Put("AdsRemoved", AdsRemoved)
End Sub