tx · Gr9thtj8mX2nBzCYqkEhmJ4CHTmJLouGWmvfFAhDKFou

3MsNyiuucHjySwoeQ8FxeofPKJyYF4cqG28:  -0.00200000 Waves

2024.12.07 14:05 [3404128] smart account 3MsNyiuucHjySwoeQ8FxeofPKJyYF4cqG28 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Gr9thtj8mX2nBzCYqkEhmJ4CHTmJLouGWmvfFAhDKFou",
    "fee": 200000,
    "feeAssetId": null,
    "timestamp": 1733569507641,
    "version": 2,
    "chainId": 84,
    "sender": "3MsNyiuucHjySwoeQ8FxeofPKJyYF4cqG28",
    "senderPublicKey": "HJeoRksknZ8YoWG1bjM8cjCoh51MGhj2K7rcdzhEZn9h",
    "proofs": [
        "41RFckMwoUpgJqQPXCo56G2yJUNNm5YcCtw3vy3CNqaF7pv5gfUm3j4S2S2KQQnMqWh48Exo1dSgMHrbquNGv8mz"
    ],
    "script": "base64:CAIYCAISBgoECAgICBIFCgMICAgSBQoDCAgBAAMBaQEJYWRkRmFybWVyBA13YWxsZXRBZGRyZXNzB2FkZHJlc3MJZmlyc3ROYW1lCGxhc3ROYW1lBAZmYXJtZXIJAJ8IAQkArAICBQdhZGRyZXNzAgZfY291bnQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAipPbmx5IHRoZSB2ZXQgb2ZmaWNlIGNhbiBjcmVhdGUgbmV3IEZhcm1lcnMDCQAAAgUGZmFybWVyBQR1bml0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUNd2FsbGV0QWRkcmVzcwIJX3VzZXJkYXRhCQCsAgIJAKwCAgkArAICCQCsAgIFB2FkZHJlc3MCASwFCWZpcnN0TmFtZQIBLAUIbGFzdE5hbWUJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQ13YWxsZXRBZGRyZXNzAghfcGVuZGluZwIACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFDXdhbGxldEFkZHJlc3MCBl9jb3VudAAABQNuaWwJAAIBAhVGYXJtZXIgYWxyZWFkeSBleGlzdHMBaQEGYWRkQXVBAwpkYXRhRmFybWVyB2RhdGFWZXQGZmFybWVyBAVjb3VudAQHJG1hdGNoMAkAnwgBCQCsAgIFBmZhcm1lcgIGX2NvdW50AwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQkAAgECFUZhcm1lciBkb2VzIG5vdCBleGlzdAQHcGVuZGluZwkBEUBleHRyTmF0aXZlKDEwNTgpAQkArAICBQZmYXJtZXICCF9wZW5kaW5nBAtwZW5kaW5nTGlzdAkAzAgCCQCkAwEFBWNvdW50CQC1CQIFB3BlbmRpbmcCASwJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQZmYXJtZXICCF9wZW5kaW5nCQC5CQIFC3BlbmRpbmdMaXN0AgEsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZmYXJtZXICAV8JAKQDAQUFY291bnQFCmRhdGFGYXJtZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQClCAEIBQFpBmNhbGxlcgIBXwUGZmFybWVyAgFfCQCkAwEFBWNvdW50BQdkYXRhVmV0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBmZhcm1lcgIGX2NvdW50CQBkAgUFY291bnQAAQUDbmlsAWkBBnZlcmlmeQMEZGF0YQZmYXJtZXIFZW50cnkDCQEBIQEJAQlpc0RlZmluZWQBCQCiCAEJAKwCAgUGZmFybWVyAghfcGVuZGluZwkAAgECFUZhcm1lciBkb2VzIG5vdCBleGlzdAMJAQlpc0RlZmluZWQBCQCiCAEJAKwCAgkArAICCQCsAgIFBmZhcm1lcgIBXwkApAMBBQVlbnRyeQIJX1ZlcmlmaWVkCQACAQIaQXVBIEVudHJ5IGFscmVhZHkgdmVyaWZpZWQDCQEBIQEJAQlpc0RlZmluZWQBCQCiCAEJAKwCAgkArAICBQZmYXJtZXICAV8JAKQDAQUFZW50cnkJAAIBCQCsAgIJAKwCAgIGRW50cnkgCQCkAwEFBWVudHJ5Ag8gZG9lcyBub3QgZXhpc3QEC3BlbmRpbmdMaXN0CQC1CQIJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAKwCAgUGZmFybWVyAghfcGVuZGluZwIBLAQFaW5kZXgJAM8IAgULcGVuZGluZ0xpc3QJAKQDAQUFZW50cnkDCQAAAgUFaW5kZXgFBHVuaXQJAAIBCQCsAgIJAKwCAgIGRW50cnkgCQCkAwEFBWVudHJ5Ag8gZG9lcyBub3QgZXhpc3QEEG5ld1BlbmRpbmdTdHJpbmcJALkJAgkA0QgCBQtwZW5kaW5nTGlzdAkBBXZhbHVlAQUFaW5kZXgCASwJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgUGZmFybWVyAgFfCQCkAwEFBWVudHJ5AglfVmVyaWZpZWQFBGRhdGEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQZmYXJtZXICCF9wZW5kaW5nBRBuZXdQZW5kaW5nU3RyaW5nBQNuaWwA1mQyJw==",
    "height": 3404128,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: HftXQzSBfnJEFKEHmeVnwNH7PPPerWxoAE8z6iF8dESZ
Next: 4wUZpyyhB2xn46oCKEqz1rFhX4r2J7QQW7xPV7Bx4g8J

Diff: 
Old
New
Differences
4
4
 
5
5
 
6
6
 
@Callable(i)
7
-
func addFarmer () = {
8
-
    let address = toString(i.caller)
7
+
func addFarmer (walletAddress,address,firstName,lastName) = {
9
8
 
    let farmer = getInteger((address + "_count"))
10
-
    if ((farmer == unit))
11
-
        then [StringEntry((address + "_pending"), ""), IntegerEntry((address + "_count"), 0)]
12
-
        else throw("Farmer already exists")
9
+
    if ((i.caller != this))
10
+
        then throw("Only the vet office can create new Farmers")
11
+
        else if ((farmer == unit))
12
+
            then [StringEntry((walletAddress + "_userdata"), ((((address + ",") + firstName) + ",") + lastName)), StringEntry((walletAddress + "_pending"), ""), IntegerEntry((walletAddress + "_count"), 0)]
13
+
            else throw("Farmer already exists")
13
14
 
    }
14
15
 
15
16
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 8 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
5
5
 
6
6
 
@Callable(i)
7
-
func addFarmer () = {
8
-
    let address = toString(i.caller)
7
+
func addFarmer (walletAddress,address,firstName,lastName) = {
9
8
 
    let farmer = getInteger((address + "_count"))
10
-
    if ((farmer == unit))
11
-
        then [StringEntry((address + "_pending"), ""), IntegerEntry((address + "_count"), 0)]
12
-
        else throw("Farmer already exists")
9
+
    if ((i.caller != this))
10
+
        then throw("Only the vet office can create new Farmers")
11
+
        else if ((farmer == unit))
12
+
            then [StringEntry((walletAddress + "_userdata"), ((((address + ",") + firstName) + ",") + lastName)), StringEntry((walletAddress + "_pending"), ""), IntegerEntry((walletAddress + "_count"), 0)]
13
+
            else throw("Farmer already exists")
13
14
 
    }
14
15
 
15
16
 
16
17
 
17
18
 
@Callable(i)
18
19
 
func addAuA (dataFarmer,dataVet,farmer) = {
19
20
 
    let count =     match getInteger((farmer + "_count")) {
20
21
 
        case a: Int => 
21
22
 
            a
22
23
 
        case _ => 
23
24
 
            throw("Farmer does not exist")
24
25
 
    }
25
26
 
    let pending = getStringValue((farmer + "_pending"))
26
27
 
    let pendingList = [toString(count), split(pending, ",")]
27
28
 
[StringEntry((farmer + "_pending"), makeString(pendingList, ",")), StringEntry(((farmer + "_") + toString(count)), dataFarmer), StringEntry(((((toString(i.caller) + "_") + farmer) + "_") + toString(count)), dataVet), IntegerEntry((farmer + "_count"), (count + 1))]
28
29
 
    }
29
30
 
30
31
 
31
32
 
32
33
 
@Callable(i)
33
34
 
func verify (data,farmer,entry) = if (!(isDefined(getString((farmer + "_pending")))))
34
35
 
    then throw("Farmer does not exist")
35
36
 
    else if (isDefined(getString((((farmer + "_") + toString(entry)) + "_Verified"))))
36
37
 
        then throw("AuA Entry already verified")
37
38
 
        else if (!(isDefined(getString(((farmer + "_") + toString(entry))))))
38
39
 
            then throw((("Entry " + toString(entry)) + " does not exist"))
39
40
 
            else {
40
41
 
                let pendingList = split(getStringValue((farmer + "_pending")), ",")
41
42
 
                let index = indexOf(pendingList, toString(entry))
42
43
 
                if ((index == unit))
43
44
 
                    then throw((("Entry " + toString(entry)) + " does not exist"))
44
45
 
                    else {
45
46
 
                        let newPendingString = makeString(removeByIndex(pendingList, value(index)), ",")
46
47
 
[StringEntry((((farmer + "_") + toString(entry)) + "_Verified"), data), StringEntry((farmer + "_pending"), newPendingString)]
47
48
 
                        }
48
49
 
                }
49
50
 
50
51
 

github/deemru/w8io/169f3d6 
19.37 ms ◑