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:
OldNewDifferences
44
55
66 @Callable(a)
7-func addFarmer () = {
8- let b = toString(a.caller)
9- let c = getInteger((b + "_count"))
10- if ((c == unit))
11- then [StringEntry((b + "_pending"), ""), IntegerEntry((b + "_count"), 0)]
12- else throw("Farmer already exists")
7+func addFarmer (b,c,d,e) = {
8+ let f = getInteger((c + "_count"))
9+ if ((a.caller != this))
10+ then throw("Only the vet office can create new Farmers")
11+ else if ((f == unit))
12+ then [StringEntry((b + "_userdata"), ((((c + ",") + d) + ",") + e)), StringEntry((b + "_pending"), ""), IntegerEntry((b + "_count"), 0)]
13+ else throw("Farmer already exists")
1314 }
1415
1516
1617
1718 @Callable(a)
18-func addAuA (d,e,c) = {
19- let f = {
20- let g = getInteger((c + "_count"))
21- if ($isInstanceOf(g, "Int"))
19+func addAuA (g,h,f) = {
20+ let i = {
21+ let j = getInteger((f + "_count"))
22+ if ($isInstanceOf(j, "Int"))
2223 then {
23- let h = g
24- h
24+ let k = j
25+ k
2526 }
2627 else throw("Farmer does not exist")
2728 }
28- let i = getStringValue((c + "_pending"))
29- let j = [toString(f), split(i, ",")]
30-[StringEntry((c + "_pending"), makeString(j, ",")), StringEntry(((c + "_") + toString(f)), d), StringEntry(((((toString(a.caller) + "_") + c) + "_") + toString(f)), e), IntegerEntry((c + "_count"), (f + 1))]
29+ let l = getStringValue((f + "_pending"))
30+ let m = [toString(i), split(l, ",")]
31+[StringEntry((f + "_pending"), makeString(m, ",")), StringEntry(((f + "_") + toString(i)), g), StringEntry(((((toString(a.caller) + "_") + f) + "_") + toString(i)), h), IntegerEntry((f + "_count"), (i + 1))]
3132 }
3233
3334
3435
3536 @Callable(a)
36-func verify (k,c,l) = if (!(isDefined(getString((c + "_pending")))))
37+func verify (n,f,o) = if (!(isDefined(getString((f + "_pending")))))
3738 then throw("Farmer does not exist")
38- else if (isDefined(getString((((c + "_") + toString(l)) + "_Verified"))))
39+ else if (isDefined(getString((((f + "_") + toString(o)) + "_Verified"))))
3940 then throw("AuA Entry already verified")
40- else if (!(isDefined(getString(((c + "_") + toString(l))))))
41- then throw((("Entry " + toString(l)) + " does not exist"))
41+ else if (!(isDefined(getString(((f + "_") + toString(o))))))
42+ then throw((("Entry " + toString(o)) + " does not exist"))
4243 else {
43- let j = split(getStringValue((c + "_pending")), ",")
44- let m = indexOf(j, toString(l))
45- if ((m == unit))
46- then throw((("Entry " + toString(l)) + " does not exist"))
44+ let m = split(getStringValue((f + "_pending")), ",")
45+ let p = indexOf(m, toString(o))
46+ if ((p == unit))
47+ then throw((("Entry " + toString(o)) + " does not exist"))
4748 else {
48- let n = makeString(removeByIndex(j, value(m)), ",")
49-[StringEntry((((c + "_") + toString(l)) + "_Verified"), k), StringEntry((c + "_pending"), n)]
49+ let q = makeString(removeByIndex(m, value(p)), ",")
50+[StringEntry((((f + "_") + toString(o)) + "_Verified"), n), StringEntry((f + "_pending"), q)]
5051 }
5152 }
5253
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 8 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44
55
66 @Callable(a)
7-func addFarmer () = {
8- let b = toString(a.caller)
9- let c = getInteger((b + "_count"))
10- if ((c == unit))
11- then [StringEntry((b + "_pending"), ""), IntegerEntry((b + "_count"), 0)]
12- else throw("Farmer already exists")
7+func addFarmer (b,c,d,e) = {
8+ let f = getInteger((c + "_count"))
9+ if ((a.caller != this))
10+ then throw("Only the vet office can create new Farmers")
11+ else if ((f == unit))
12+ then [StringEntry((b + "_userdata"), ((((c + ",") + d) + ",") + e)), StringEntry((b + "_pending"), ""), IntegerEntry((b + "_count"), 0)]
13+ else throw("Farmer already exists")
1314 }
1415
1516
1617
1718 @Callable(a)
18-func addAuA (d,e,c) = {
19- let f = {
20- let g = getInteger((c + "_count"))
21- if ($isInstanceOf(g, "Int"))
19+func addAuA (g,h,f) = {
20+ let i = {
21+ let j = getInteger((f + "_count"))
22+ if ($isInstanceOf(j, "Int"))
2223 then {
23- let h = g
24- h
24+ let k = j
25+ k
2526 }
2627 else throw("Farmer does not exist")
2728 }
28- let i = getStringValue((c + "_pending"))
29- let j = [toString(f), split(i, ",")]
30-[StringEntry((c + "_pending"), makeString(j, ",")), StringEntry(((c + "_") + toString(f)), d), StringEntry(((((toString(a.caller) + "_") + c) + "_") + toString(f)), e), IntegerEntry((c + "_count"), (f + 1))]
29+ let l = getStringValue((f + "_pending"))
30+ let m = [toString(i), split(l, ",")]
31+[StringEntry((f + "_pending"), makeString(m, ",")), StringEntry(((f + "_") + toString(i)), g), StringEntry(((((toString(a.caller) + "_") + f) + "_") + toString(i)), h), IntegerEntry((f + "_count"), (i + 1))]
3132 }
3233
3334
3435
3536 @Callable(a)
36-func verify (k,c,l) = if (!(isDefined(getString((c + "_pending")))))
37+func verify (n,f,o) = if (!(isDefined(getString((f + "_pending")))))
3738 then throw("Farmer does not exist")
38- else if (isDefined(getString((((c + "_") + toString(l)) + "_Verified"))))
39+ else if (isDefined(getString((((f + "_") + toString(o)) + "_Verified"))))
3940 then throw("AuA Entry already verified")
40- else if (!(isDefined(getString(((c + "_") + toString(l))))))
41- then throw((("Entry " + toString(l)) + " does not exist"))
41+ else if (!(isDefined(getString(((f + "_") + toString(o))))))
42+ then throw((("Entry " + toString(o)) + " does not exist"))
4243 else {
43- let j = split(getStringValue((c + "_pending")), ",")
44- let m = indexOf(j, toString(l))
45- if ((m == unit))
46- then throw((("Entry " + toString(l)) + " does not exist"))
44+ let m = split(getStringValue((f + "_pending")), ",")
45+ let p = indexOf(m, toString(o))
46+ if ((p == unit))
47+ then throw((("Entry " + toString(o)) + " does not exist"))
4748 else {
48- let n = makeString(removeByIndex(j, value(m)), ",")
49-[StringEntry((((c + "_") + toString(l)) + "_Verified"), k), StringEntry((c + "_pending"), n)]
49+ let q = makeString(removeByIndex(m, value(p)), ",")
50+[StringEntry((((f + "_") + toString(o)) + "_Verified"), n), StringEntry((f + "_pending"), q)]
5051 }
5152 }
5253
5354

github/deemru/w8io/169f3d6 
37.41 ms