w8 · tx · Hr6···B8q

tx · Hr6vkXSyDycW5XbngsoB6LPgThVD2j85ajeNhrdpvB8q

3MvvGehFMip9atrQz5mn6q6bQ3euFwVgwun:  -0.01000000 Waves

2021.11.05 22:36 [1778106] smart account 3MvvGehFMip9atrQz5mn6q6bQ3euFwVgwun > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Hr6vkXSyDycW5XbngsoB6LPgThVD2j85ajeNhrdpvB8q",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1636141003828,
    "version": 2,
    "chainId": 84,
    "sender": "3MvvGehFMip9atrQz5mn6q6bQ3euFwVgwun",
    "senderPublicKey": "BZy6E9JH7bfGn4fuZJ84XBA7qUdmCXPVF549Mp548Vux",
    "proofs": [
        "3Fu9Wrmyycybu4T274gWbcKYJBEwkiH2Cr6GJqq6qkHZ3QJh4Lzf7CEVE3vNSPhEqLm2FeXE5TY94MztreYKJTa4"
    ],
    "script": "base64:AAIDAAAAAAAAAAoIARIGCgQICAgBAAAAIQAAAAAHeEJpdENPMgEAAAAgIARkpqoDew1vpqr6lyVYs5aJelMM/++6xmiHbINU3I0AAAAADXN0YXJ0VG90YWxRdHkAAAAAAAABhqAAAAAAA3d2cwAAAAAABfXhAAAAAAAETk9ORQIAAAAEbm9uZQAAAAAHbm9tdmd0dQAAAAAAAAAAZAAAAAAFZXVyb3UAAAAAAAAAAGQAAAAABXVzZG53AAAAAAAAAAnEAAAAAAx1c2VyRGlzY291bnQAAAAAAAAAAAAAAAAAC093bmVyUHViS2V5AQAAACCdBuBe4z8Ukl7+WtAQ6jB51JMkT+DJzzSGJpqSvRU+dwEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABAAAAA2tleQQAAAADbnVtBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABQAAAANudW0BAAAAC2dldFN0ckJ5S2V5AAAAAQAAAANrZXkEAAAAA3N0cgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAETk9ORQUAAAADc3RyAQAAAAxnZXRLZXlFbWlzb3IAAAABAAAABGl0ZW0CAAAAB0VtaXNvcjoBAAAADmdldFZhbHVlRW1pc29yAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAMZ2V0S2V5RW1pc29yAAAAAQUAAAAEaXRlbQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkAASwAAAACBQAAAAhzdXBwbGllcgIAAAAHTm9kby0wOAEAAAAUZ2V0S2V5RW1pc2lvbkNvdW50cnkAAAABAAAABGl0ZW0CAAAAC05vZG8tUGHDrXM6AQAAABZnZXRWYWx1ZUVtaXNpb25Db3VudHJ5AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAUZ2V0S2V5RW1pc2lvbkNvdW50cnkAAAABBQAAAARpdGVtAQAAABFnZXRLZXlFbWlzaW9uQ29kZQAAAAEAAAAEaXRlbQIAAAAIQ8OzZGlnbzoBAAAAE2dldFZhbHVlRW1pc2lvbkNvZGUAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABFnZXRLZXlFbWlzaW9uQ29kZQAAAAEFAAAABGl0ZW0BAAAAE2dldEtleU5vbVRva2VuUHJpY2UAAAABAAAABGl0ZW0CAAAAFlByZWNpbyBOb21pbmFsLCAxIFZHVDoBAAAAE2dldEtleXN0YXJ0VG90YWxRdHkAAAABAAAABGl0ZW0CAAAAHENhbnRpZGFkIGRlIHRva2VucyBlbWl0aWRvczoBAAAAFWdldFZhbHVlc3RhcnRUb3RhbFF0eQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAAE2dldEtleXN0YXJ0VG90YWxRdHkAAAABBQAAAARpdGVtAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyAgAAABlGb25kb3MgfCBNb250byByZWNhdWRhZG86AQAAABdnZXRWYWx1ZUJhbGFuY2VTdXBwbGllcgAAAAEAAAAIc3VwcGxpZXIJAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgEAAAAVZ2V0S2V5VXNlckl0ZW1Db3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0CAAAACk9yZGVyX+KEljoBAAAAF2dldFZhbHVlVXNlckl0ZW1Db3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAR1c2VyBQAAAARpdGVtAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABAAAABGl0ZW0CAAAAJURvY3VtZW50byBOYWNpb25hbCBkZSBJZGVudGlkYWQsIEROSToBAAAAFGdldFZhbHVlVXNlckRvY3VtZW50AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQUAAAAEaXRlbQEAAAARZ2V0S2V5VXNlckNvdW50cnkAAAABAAAABGl0ZW0CAAAAIFBhw61zIGRlIFJlc2lkZW5jaWEgZGVsIFVzdWFyaW86AQAAABNnZXRWYWx1ZVVzZXJDb3VudHJ5AAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAARZ2V0S2V5VXNlckNvdW50cnkAAAABBQAAAARpdGVtAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQAAAARpdGVtAgAAAB5DYW50aWRhZCBkZSB0b2tlbnMgYWRxdWlyaWRvczoBAAAAGGdldFZhbHVlSXRlbVVzZXJPcmRlclF0eQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAFmdldEtleUl0ZW1Vc2VyT3JkZXJRdHkAAAABBQAAAARpdGVtAQAAAB1nZXRLZXlTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEAAAAEaXRlbQIAAAAiQ2FudGlkYWQgZGUgdG9rZW5zIFZHVCByZWFsaXphZG9zOgEAAAAfZ2V0VmFsdWVTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQUAAAAEaXRlbQAAAAEAAAABaQEAAAALcHVyY2hhc2VWR1QAAAAEAAAABGl0ZW0AAAAMdXNlckRvY3VtZW50AAAAC3VzZXJDb3VudHJ5AAAACG9yZGVyUXR5BAAAAANwbXQJAQAAAAdleHRyYWN0AAAAAQgFAAAAAWkAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQJAAACAAAAAQIAAABOVWQuIHB1ZWRlIGFkcXVpcmlyIHRva2VucyB4Qml0Q08yIHVzYW5kbyBXYXZlc0tlZXBlciB5IHN1IHRva2VuIGRlIHBhZ28gV2F2ZXMuBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAlwcmVJY29RdHkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAAAAAAAAAAAABAAAAA9iYWxhbmNlU3VwcGxpZXIEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAAEWN1cnJlbnRUb2tlblByaWNlCQAAaQAAAAIJAABpAAAAAgkAAGgAAAACCQAAaAAAAAIJAABoAAAAAgkAAGUAAAACAAAAAAAAAABkBQAAAAx1c2VyRGlzY291bnQFAAAAB25vbXZndHUFAAAABWV1cm91BQAAAAN3dnMAAAAAAAAAAGQFAAAABXVzZG53BAAAAAt0b3RhbEFtb3VudAkAAGgAAAACBQAAAAhvcmRlclF0eQUAAAARY3VycmVudFRva2VuUHJpY2UDCQAAZgAAAAIFAAAAC3RvdGFsQW1vdW50CAUAAAADcG10AAAABmFtb3VudAkAAAIAAAABAgAAADVQYXltZW50IEFtb3VudCBjYW4ndCBiZSBsZXNzIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgMJAABmAAAAAggFAAAAA3BtdAAAAAZhbW91bnQFAAAAC3RvdGFsQW1vdW50CQAAAgAAAAECAAAAN1BheW1lbnQgQW1vdW50IGNhbid0IGJlIGhpZ2hlciB0aGFuIGl0ZW0gUHVyY2hhc2UgT3JkZXIJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAMZ2V0S2V5RW1pc29yAAAAAQUAAAAEaXRlbQIAAAASRWNvc2lzdGVtYSBCaXQtQ08yCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAUZ2V0S2V5RW1pc2lvbkNvdW50cnkAAAABBQAAAARpdGVtAgAAAApOb2RvLTA4L1BFCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAARZ2V0S2V5RW1pc2lvbkNvZGUAAAABBQAAAARpdGVtAgAAAA4wMUUtVkdULU4wOC9QRQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAE2dldEtleU5vbVRva2VuUHJpY2UAAAABBQAAAARpdGVtAgAAAAoxMDAuMDAgVVNECQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAATZ2V0S2V5c3RhcnRUb3RhbFF0eQAAAAEFAAAABGl0ZW0FAAAADXN0YXJ0VG90YWxRdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAE0Rlc2N1ZW50byBvZnJlY2lkbzoCAAAAGVBsYXRhZm9ybWEtR0NDLCBhIGZ1dHVyb3MJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAXZ2V0VmFsdWVVc2VySXRlbUNvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleVVzZXJEb2N1bWVudAAAAAEFAAAABGl0ZW0FAAAADHVzZXJEb2N1bWVudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEWdldEtleVVzZXJDb3VudHJ5AAAAAQUAAAAEaXRlbQUAAAALdXNlckNvdW50cnkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABZnZXRLZXlJdGVtVXNlck9yZGVyUXR5AAAAAQUAAAAEaXRlbQUAAAAIb3JkZXJRdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAI1N1bWEgdHJhbnNtaXRpZGEgYWwgTm9kby0wOC9QRSwgd3ZzBQAAAAt0b3RhbEFtb3VudAkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAcRXN0YWRvIGRlIHN1IHBlZGlkbywgdG9rZW5zOgIAAAAawqFBZHF1aXNpY2nDs24gQ29uZmlybWFkYSEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAB1nZXRLZXlTYWxkb1Rva2VuUXR5U3RhcnRFdGFwYQAAAAEFAAAABGl0ZW0JAABkAAAAAgkBAAAAH2dldFZhbHVlU2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABBQAAAARpdGVtBQAAAAhvcmRlclF0eQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAATU2FsZG8gZGUgVG9rZW5zIFZHVAkAAGUAAAACCQAAZQAAAAIFAAAADXN0YXJ0VG90YWxRdHkJAQAAAB9nZXRWYWx1ZVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQUAAAAEaXRlbQUAAAAIb3JkZXJRdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABVnZXRLZXlCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcgkAAGQAAAACCQEAAAAXZ2V0VmFsdWVCYWxhbmNlU3VwcGxpZXIAAAABBQAAAAhzdXBwbGllcggFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAH0RpcmVjY2nDs24gZW4gV2F2ZXMtQmxvY2tDaGFpbjoCAAAAIzNNdnZHZWhGTWlwOWF0clF6NW1uNnE2YlEzZXVGd1Znd3VuBQAAAANuaWwJAQAAAAtUcmFuc2ZlclNldAAAAAEJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAHEBleHRyVXNlcihhZGRyZXNzRnJvbVN0cmluZykAAAABBQAAAAt1c2VyQWRkcmVzcwUAAAAIb3JkZXJRdHkFAAAAB3hCaXRDTzIFAAAAA25pbAAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAEAAAAByRtYXRjaDAFAAAAAnR4AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABRTZXRTY3JpcHRUcmFuc2FjdGlvbgQAAAABdAUAAAAHJG1hdGNoMAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAFAAAAC093bmVyUHViS2V5AwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAASUmVpc3N1ZVRyYW5zYWN0aW9uBgkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAA9EYXRhVHJhbnNhY3Rpb24EAAAAAWQFAAAAByRtYXRjaDAGAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABNUcmFuc2ZlclRyYW5zYWN0aW9uBAAAAAJ0eAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE0V4Y2hhbmdlVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBAAAAAl3aXRoV2F2ZXMDCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAACnByaWNlQXNzZXQGCQEAAAABIQAAAAEJAQAAAAlpc0RlZmluZWQAAAABCAgIBQAAAAJ0eAAAAAlzZWxsT3JkZXIAAAAJYXNzZXRQYWlyAAAAC2Ftb3VudEFzc2V0BQAAAAl3aXRoV2F2ZXMHNJUeDA==",
    "height": 1778106,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 9VdVrGQdwkEkmoNVVHc4YYc9snVDkoBfTWseQVsQ6yht
Next: 8v5vpri3Bz8br6M2S78LHcXXgMpwQcqyZ7K7NmrQuTPj

Diff: 
Old New Differences
138 138                  then throw("Payment Amount can't be less than item Purchase Order")
139 139                  else if ((pmt.amount > totalAmount))
140 140                      then throw("Payment Amount can't be higher than item Purchase Order")
141 -                     else ScriptResult(WriteSet([DataEntry(getKeyEmisor(item), "Ecosistema Bit-CO2"), DataEntry(getKeyEmisionCountry(item), "Nodo-08/PE"), DataEntry(getKeyEmisionCode(item), "01E-VGT-N08/PE"), DataEntry(getKeyNomTokenPrice(item), "100.00 USD"), DataEntry(getKeystartTotalQty(item), startTotalQty), DataEntry("Descuento ofrecido:", "Plataforma-GCC, a futuros"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("Suma transmitida al Nodo-08/PE, wvs", totalAmount), DataEntry("Estado de su pedido, tokens:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (getValueSaldoTokenQtyStartEtapa(item) + orderQty)), DataEntry("Saldo de Tokens VGT", ((startTotalQty - getValueSaldoTokenQtyStartEtapa(item)) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
141 +                     else ScriptResult(WriteSet([DataEntry(getKeyEmisor(item), "Ecosistema Bit-CO2"), DataEntry(getKeyEmisionCountry(item), "Nodo-08/PE"), DataEntry(getKeyEmisionCode(item), "01E-VGT-N08/PE"), DataEntry(getKeyNomTokenPrice(item), "100.00 USD"), DataEntry(getKeystartTotalQty(item), startTotalQty), DataEntry("Descuento ofrecido:", "Plataforma-GCC, a futuros"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("Suma transmitida al Nodo-08/PE, wvs", totalAmount), DataEntry("Estado de su pedido, tokens:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (getValueSaldoTokenQtyStartEtapa(item) + orderQty)), DataEntry("Saldo de Tokens VGT", ((startTotalQty - getValueSaldoTokenQtyStartEtapa(item)) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección en Waves-BlockChain:", "3MvvGehFMip9atrQz5mn6q6bQ3euFwVgwun")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
142 142              }
143 143      }
144 144  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 3 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let xBitCO2 = base58'39yw38hm342hiK43SqELTaZRkTWJoBc22XpxmsSiBrsN'
5 5  
6 6  let startTotalQty = 100000
7 7  
8 8  let wvs = 100000000
9 9  
10 10  let NONE = "none"
11 11  
12 12  let nomvgtu = 100
13 13  
14 14  let eurou = 100
15 15  
16 16  let usdnw = 2500
17 17  
18 18  let userDiscount = 0
19 19  
20 20  let OwnerPubKey = base58'BZy6E9JH7bfGn4fuZJ84XBA7qUdmCXPVF549Mp548Vux'
21 21  
22 22  func getNumberByKey (key) = {
23 23      let num =     match getInteger(this, key) {
24 24          case a: Int => 
25 25              a
26 26          case _ => 
27 27              0
28 28      }
29 29      num
30 30      }
31 31  
32 32  
33 33  func getStrByKey (key) = {
34 34      let str =     match getString(this, key) {
35 35          case a: String => 
36 36              a
37 37          case _ => 
38 38              NONE
39 39      }
40 40      str
41 41      }
42 42  
43 43  
44 44  func getKeyEmisor (item) = "Emisor:"
45 45  
46 46  
47 47  func getValueEmisor (item) = getStrByKey(getKeyEmisor(item))
48 48  
49 49  
50 50  func getKeyItemSupplier (supplier) = (supplier + "Nodo-08")
51 51  
52 52  
53 53  func getKeyEmisionCountry (item) = "Nodo-País:"
54 54  
55 55  
56 56  func getValueEmisionCountry (item) = getStrByKey(getKeyEmisionCountry(item))
57 57  
58 58  
59 59  func getKeyEmisionCode (item) = "Código:"
60 60  
61 61  
62 62  func getValueEmisionCode (item) = getStrByKey(getKeyEmisionCode(item))
63 63  
64 64  
65 65  func getKeyNomTokenPrice (item) = "Precio Nominal, 1 VGT:"
66 66  
67 67  
68 68  func getKeystartTotalQty (item) = "Cantidad de tokens emitidos:"
69 69  
70 70  
71 71  func getValuestartTotalQty (item) = getStrByKey(getKeystartTotalQty(item))
72 72  
73 73  
74 74  func getKeyBalanceSupplier (supplier) = "Fondos | Monto recaudado:"
75 75  
76 76  
77 77  func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
78 78  
79 79  
80 80  func getKeyUserItemCounter (user,item) = "Order_№:"
81 81  
82 82  
83 83  func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
84 84  
85 85  
86 86  func getKeyUserDocument (item) = "Documento Nacional de Identidad, DNI:"
87 87  
88 88  
89 89  func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
90 90  
91 91  
92 92  func getKeyUserCountry (item) = "País de Residencia del Usuario:"
93 93  
94 94  
95 95  func getValueUserCountry (item) = getStrByKey(getKeyUserCountry(item))
96 96  
97 97  
98 98  func getKeyItemUserOrderQty (item) = "Cantidad de tokens adquiridos:"
99 99  
100 100  
101 101  func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
102 102  
103 103  
104 104  func getKeySaldoTokenQtyStartEtapa (item) = "Cantidad de tokens VGT realizados:"
105 105  
106 106  
107 107  func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
108 108  
109 109  
110 110  @Callable(i)
111 111  func purchaseVGT (item,userDocument,userCountry,orderQty) = {
112 112      let pmt = extract(i.payment)
113 113      if (isDefined(pmt.assetId))
114 114          then throw("Ud. puede adquirir tokens xBitCO2 usando WavesKeeper y su token de pago Waves.")
115 115          else {
116 116              let supplier =             match getString(this, getKeyItemSupplier(item)) {
117 117                  case a: String => 
118 118                      a
119 119                  case _ => 
120 120                      NONE
121 121              }
122 122              let preIcoQty =             match getInteger(this, getKeySaldoTokenQtyStartEtapa(item)) {
123 123                  case a: Int => 
124 124                      a
125 125                  case _ => 
126 126                      0
127 127              }
128 128              let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
129 129                  case a: Int => 
130 130                      a
131 131                  case _ => 
132 132                      0
133 133              }
134 134              let userAddress = toBase58String(i.caller.bytes)
135 135              let currentTokenPrice = ((((((100 - userDiscount) * nomvgtu) * eurou) * wvs) / 100) / usdnw)
136 136              let totalAmount = (orderQty * currentTokenPrice)
137 137              if ((totalAmount > pmt.amount))
138 138                  then throw("Payment Amount can't be less than item Purchase Order")
139 139                  else if ((pmt.amount > totalAmount))
140 140                      then throw("Payment Amount can't be higher than item Purchase Order")
141 -                     else ScriptResult(WriteSet([DataEntry(getKeyEmisor(item), "Ecosistema Bit-CO2"), DataEntry(getKeyEmisionCountry(item), "Nodo-08/PE"), DataEntry(getKeyEmisionCode(item), "01E-VGT-N08/PE"), DataEntry(getKeyNomTokenPrice(item), "100.00 USD"), DataEntry(getKeystartTotalQty(item), startTotalQty), DataEntry("Descuento ofrecido:", "Plataforma-GCC, a futuros"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("Suma transmitida al Nodo-08/PE, wvs", totalAmount), DataEntry("Estado de su pedido, tokens:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (getValueSaldoTokenQtyStartEtapa(item) + orderQty)), DataEntry("Saldo de Tokens VGT", ((startTotalQty - getValueSaldoTokenQtyStartEtapa(item)) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección en Waves-BlockChain:", "3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
141 +                     else ScriptResult(WriteSet([DataEntry(getKeyEmisor(item), "Ecosistema Bit-CO2"), DataEntry(getKeyEmisionCountry(item), "Nodo-08/PE"), DataEntry(getKeyEmisionCode(item), "01E-VGT-N08/PE"), DataEntry(getKeyNomTokenPrice(item), "100.00 USD"), DataEntry(getKeystartTotalQty(item), startTotalQty), DataEntry("Descuento ofrecido:", "Plataforma-GCC, a futuros"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("Suma transmitida al Nodo-08/PE, wvs", totalAmount), DataEntry("Estado de su pedido, tokens:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (getValueSaldoTokenQtyStartEtapa(item) + orderQty)), DataEntry("Saldo de Tokens VGT", ((startTotalQty - getValueSaldoTokenQtyStartEtapa(item)) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección en Waves-BlockChain:", "3MvvGehFMip9atrQz5mn6q6bQ3euFwVgwun")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
142 142              }
143 143      }
144 144  
145 145  
146 146  @Verifier(tx)
147 147  func verify () = match tx {
148 148      case t: SetScriptTransaction => 
149 149          sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
150 150      case d: ReissueTransaction|DataTransaction => 
151 151          true
152 152      case tx: TransferTransaction => 
153 153          true
154 154      case tx: ExchangeTransaction => 
155 155          let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
156 156              then true
157 157              else !(isDefined(tx.sellOrder.assetPair.amountAsset))
158 158          withWaves
159 159      case _ => 
160 160          false
161 161  }
162 162

Old	New		Differences
138	138		then throw("Payment Amount can't be less than item Purchase Order")
139	139		else if ((pmt.amount > totalAmount))
140	140		then throw("Payment Amount can't be higher than item Purchase Order")
141		-	else ScriptResult(WriteSet([DataEntry(getKeyEmisor(item), "Ecosistema Bit-CO2"), DataEntry(getKeyEmisionCountry(item), "Nodo-08/PE"), DataEntry(getKeyEmisionCode(item), "01E-VGT-N08/PE"), DataEntry(getKeyNomTokenPrice(item), "100.00 USD"), DataEntry(getKeystartTotalQty(item), startTotalQty), DataEntry("Descuento ofrecido:", "Plataforma-GCC, a futuros"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("Suma transmitida al Nodo-08/PE, wvs", totalAmount), DataEntry("Estado de su pedido, tokens:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (getValueSaldoTokenQtyStartEtapa(item) + orderQty)), DataEntry("Saldo de Tokens VGT", ((startTotalQty - getValueSaldoTokenQtyStartEtapa(item)) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección en Waves-BlockChain:", "~~3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL~~")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
	141	+	else ScriptResult(WriteSet([DataEntry(getKeyEmisor(item), "Ecosistema Bit-CO2"), DataEntry(getKeyEmisionCountry(item), "Nodo-08/PE"), DataEntry(getKeyEmisionCode(item), "01E-VGT-N08/PE"), DataEntry(getKeyNomTokenPrice(item), "100.00 USD"), DataEntry(getKeystartTotalQty(item), startTotalQty), DataEntry("Descuento ofrecido:", "Plataforma-GCC, a futuros"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("Suma transmitida al Nodo-08/PE, wvs", totalAmount), DataEntry("Estado de su pedido, tokens:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (getValueSaldoTokenQtyStartEtapa(item) + orderQty)), DataEntry("Saldo de Tokens VGT", ((startTotalQty - getValueSaldoTokenQtyStartEtapa(item)) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección en Waves-BlockChain:", "3MvvGehFMip9atrQz5mn6q6bQ3euFwVgwun")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
142	142		}
143	143		}
144	144

Old	New		Differences
1	1		{-# STDLIB_VERSION 3 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let xBitCO2 = base58'39yw38hm342hiK43SqELTaZRkTWJoBc22XpxmsSiBrsN'
5	5
6	6		let startTotalQty = 100000
7	7
8	8		let wvs = 100000000
9	9
10	10		let NONE = "none"
11	11
12	12		let nomvgtu = 100
13	13
14	14		let eurou = 100
15	15
16	16		let usdnw = 2500
17	17
18	18		let userDiscount = 0
19	19
20	20		let OwnerPubKey = base58'BZy6E9JH7bfGn4fuZJ84XBA7qUdmCXPVF549Mp548Vux'
21	21
22	22		func getNumberByKey (key) = {
23	23		let num = match getInteger(this, key) {
24	24		case a: Int =>
25	25		a
26	26		case _ =>
27	27		0
28	28		}
29	29		num
30	30		}
31	31
32	32
33	33		func getStrByKey (key) = {
34	34		let str = match getString(this, key) {
35	35		case a: String =>
36	36		a
37	37		case _ =>
38	38		NONE
39	39		}
40	40		str
41	41		}
42	42
43	43
44	44		func getKeyEmisor (item) = "Emisor:"
45	45
46	46
47	47		func getValueEmisor (item) = getStrByKey(getKeyEmisor(item))
48	48
49	49
50	50		func getKeyItemSupplier (supplier) = (supplier + "Nodo-08")
51	51
52	52
53	53		func getKeyEmisionCountry (item) = "Nodo-País:"
54	54
55	55
56	56		func getValueEmisionCountry (item) = getStrByKey(getKeyEmisionCountry(item))
57	57
58	58
59	59		func getKeyEmisionCode (item) = "Código:"
60	60
61	61
62	62		func getValueEmisionCode (item) = getStrByKey(getKeyEmisionCode(item))
63	63
64	64
65	65		func getKeyNomTokenPrice (item) = "Precio Nominal, 1 VGT:"
66	66
67	67
68	68		func getKeystartTotalQty (item) = "Cantidad de tokens emitidos:"
69	69
70	70
71	71		func getValuestartTotalQty (item) = getStrByKey(getKeystartTotalQty(item))
72	72
73	73
74	74		func getKeyBalanceSupplier (supplier) = "Fondos \| Monto recaudado:"
75	75
76	76
77	77		func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
78	78
79	79
80	80		func getKeyUserItemCounter (user,item) = "Order_№:"
81	81
82	82
83	83		func getValueUserItemCounter (user,item) = getNumberByKey(getKeyUserItemCounter(user, item))
84	84
85	85
86	86		func getKeyUserDocument (item) = "Documento Nacional de Identidad, DNI:"
87	87
88	88
89	89		func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
90	90
91	91
92	92		func getKeyUserCountry (item) = "País de Residencia del Usuario:"
93	93
94	94
95	95		func getValueUserCountry (item) = getStrByKey(getKeyUserCountry(item))
96	96
97	97
98	98		func getKeyItemUserOrderQty (item) = "Cantidad de tokens adquiridos:"
99	99
100	100
101	101		func getValueItemUserOrderQty (item) = getNumberByKey(getKeyItemUserOrderQty(item))
102	102
103	103
104	104		func getKeySaldoTokenQtyStartEtapa (item) = "Cantidad de tokens VGT realizados:"
105	105
106	106
107	107		func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
108	108
109	109
110	110		@Callable(i)
111	111		func purchaseVGT (item,userDocument,userCountry,orderQty) = {
112	112		let pmt = extract(i.payment)
113	113		if (isDefined(pmt.assetId))
114	114		then throw("Ud. puede adquirir tokens xBitCO2 usando WavesKeeper y su token de pago Waves.")
115	115		else {
116	116		let supplier = match getString(this, getKeyItemSupplier(item)) {
117	117		case a: String =>
118	118		a
119	119		case _ =>
120	120		NONE
121	121		}
122	122		let preIcoQty = match getInteger(this, getKeySaldoTokenQtyStartEtapa(item)) {
123	123		case a: Int =>
124	124		a
125	125		case _ =>
126	126		0
127	127		}
128	128		let balanceSupplier = match getInteger(this, getKeyBalanceSupplier(supplier)) {
129	129		case a: Int =>
130	130		a
131	131		case _ =>
132	132		0
133	133		}
134	134		let userAddress = toBase58String(i.caller.bytes)
135	135		let currentTokenPrice = ((((((100 - userDiscount) * nomvgtu) * eurou) * wvs) / 100) / usdnw)
136	136		let totalAmount = (orderQty * currentTokenPrice)
137	137		if ((totalAmount > pmt.amount))
138	138		then throw("Payment Amount can't be less than item Purchase Order")
139	139		else if ((pmt.amount > totalAmount))
140	140		then throw("Payment Amount can't be higher than item Purchase Order")
141		-	else ScriptResult(WriteSet([DataEntry(getKeyEmisor(item), "Ecosistema Bit-CO2"), DataEntry(getKeyEmisionCountry(item), "Nodo-08/PE"), DataEntry(getKeyEmisionCode(item), "01E-VGT-N08/PE"), DataEntry(getKeyNomTokenPrice(item), "100.00 USD"), DataEntry(getKeystartTotalQty(item), startTotalQty), DataEntry("Descuento ofrecido:", "Plataforma-GCC, a futuros"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("Suma transmitida al Nodo-08/PE, wvs", totalAmount), DataEntry("Estado de su pedido, tokens:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (getValueSaldoTokenQtyStartEtapa(item) + orderQty)), DataEntry("Saldo de Tokens VGT", ((startTotalQty - getValueSaldoTokenQtyStartEtapa(item)) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección en Waves-BlockChain:", "~~3N9DpWDvNPnq3wuuyh2cGk9hcKfoke9CCfL~~")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
	141	+	else ScriptResult(WriteSet([DataEntry(getKeyEmisor(item), "Ecosistema Bit-CO2"), DataEntry(getKeyEmisionCountry(item), "Nodo-08/PE"), DataEntry(getKeyEmisionCode(item), "01E-VGT-N08/PE"), DataEntry(getKeyNomTokenPrice(item), "100.00 USD"), DataEntry(getKeystartTotalQty(item), startTotalQty), DataEntry("Descuento ofrecido:", "Plataforma-GCC, a futuros"), DataEntry(getKeyUserItemCounter(userAddress, item), (getValueUserItemCounter(userAddress, item) + 1)), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyUserCountry(item), userCountry), DataEntry(getKeyItemUserOrderQty(item), orderQty), DataEntry("Suma transmitida al Nodo-08/PE, wvs", totalAmount), DataEntry("Estado de su pedido, tokens:", "¡Adquisición Confirmada!"), DataEntry(getKeySaldoTokenQtyStartEtapa(item), (getValueSaldoTokenQtyStartEtapa(item) + orderQty)), DataEntry("Saldo de Tokens VGT", ((startTotalQty - getValueSaldoTokenQtyStartEtapa(item)) - orderQty)), DataEntry(getKeyBalanceSupplier(supplier), (getValueBalanceSupplier(supplier) + pmt.amount)), DataEntry("Dirección en Waves-BlockChain:", "3MvvGehFMip9atrQz5mn6q6bQ3euFwVgwun")]), TransferSet([ScriptTransfer(addressFromStringValue(userAddress), orderQty, xBitCO2)]))
142	142		}
143	143		}
144	144
145	145
146	146		@Verifier(tx)
147	147		func verify () = match tx {
148	148		case t: SetScriptTransaction =>
149	149		sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
150	150		case d: ReissueTransaction\|DataTransaction =>
151	151		true
152	152		case tx: TransferTransaction =>
153	153		true
154	154		case tx: ExchangeTransaction =>
155	155		let withWaves = if (!(isDefined(tx.sellOrder.assetPair.priceAsset)))
156	156		then true
157	157		else !(isDefined(tx.sellOrder.assetPair.amountAsset))
158	158		withWaves
159	159		case _ =>
160	160		false
161	161		}
162	162

github/deemru/w8io/873ac7e 
32.13 ms ◑