tx · 2HtWoRCctsSQVYFe7d95XkreJUa5XPkBrYzQYR49YPsZ

3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8:  -0.01000000 Waves

2021.10.18 15:39 [1751736] smart account 3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2HtWoRCctsSQVYFe7d95XkreJUa5XPkBrYzQYR49YPsZ",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1634560747354,
    "version": 2,
    "chainId": 84,
    "sender": "3N6D1fPBTu4QuZenU7hKNuxEKsxd13USum8",
    "senderPublicKey": "8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U",
    "proofs": [
        "5hL3im13Xs9aWN1UJ6Q13n3VDGDj2rVKc5oXCAuPvD9kwKD5hqbktfxvnLfqf59yemVtBMTex5A4HAfBfTemA7XR"
    ],
    "script": "base64:AAIDAAAAAAAAABcIARIECgIICBIHCgUICAgIARIECgIIAQAAADcAAAAAB3lCaXRDTzIBAAAAIGmM1P/bTQF96Mt4t9+zj8FcPDlb6Qx5aA0hjmfpm0utAAAAAAhzdGFydFF0eQAAAAAAAASqHQAAAAAMRmlyc3RGYXNlUXR5AAAAAAAAAHnZAAAAAA1TZWNvbmRGYXNlUXR5AAAAAAAABDBEAAAAAAROT05FAgAAAARub25lAAAAAAtPd25lclB1YktleQEAAAAgdiWBR/bYuTfu7hq3cysJa14Q3mfrzJBzirlSbXhIDw8AAAAABmlzc3VlcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBVLGfyy1r0onBhV5KbTmujr+1cm+CidoWkwAAAAAEZUFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVJl9LDPuC4uFUEENum3we4/11P1VuB5sVwAAAAAEcEFkZAkBAAAAB0FkZHJlc3MAAAABAQAAABoBVEOlrjWInpptJ9aV0memID9lDjKQsHSkagAAAAAFZXVyb3UAAAAAAAAAAHQAAAAABXVzZG53AAAAAAAAAAnrAAAAAAViY28yZQAAAAAAAAGGoAAAAAAIYml0ZHNjdG8AAAAAAAAAAAMAAAAAA3BJUAAAAAAAAAAACgAAAAADdUJQAAAAAAAAAAAHAAAAAANzQlAAAAAAAAAAAAIAAAAAA2VJUAAAAAAAAAAAAQAAAAADZUJQAAAAAAAAAAACAAAAAAlyZWxhY2RjdG8AAAAAAAAAAAsBAAAADmdldE51bWJlckJ5S2V5AAAAAQAAAANrZXkEAAAAA251bQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQAAAAAAAAAAAAUAAAADbnVtAQAAAAtnZXRTdHJCeUtleQAAAAEAAAADa2V5BAAAAANzdHIEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEFAAAABE5PTkUFAAAAA3N0cgEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgkAASwAAAACBQAAAAhzdXBwbGllcgIAAAAUVmVuZGVkb3IsIExpbWEtUGVyw7oBAAAACmdldEtleUl0ZW0AAAACAAAACHN1cHBsaWVyAAAABGl0ZW0JAAEsAAAAAgkAASwAAAACAgAAAA5Qcm9kdWN0by1HVFM6IAIAAAABIAkAAlgAAAABCQAB9wAAAAEJAAGbAAAAAQkAASwAAAACBQAAAAhzdXBwbGllcgUAAAAEaXRlbQEAAAAMZ2V0S2V5SXNzdWVyAAAAAQAAAARpdGVtAgAAAA1Jc3N1ZXIvVGllbmRhAQAAAA5nZXRWYWx1ZUlzc3VlcgAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADGdldEtleUlzc3VlcgAAAAEFAAAABGl0ZW0BAAAADWdldEtleVByb2plY3QAAAABAAAABGl0ZW0CAAAAB1Byb2plY3QBAAAAD2dldFZhbHVlUHJvamVjdAAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADWdldEtleVByb2plY3QAAAABBQAAAARpdGVtAQAAAApnZXRLZXlOb2RvAAAAAQAAAARpdGVtAgAAAAROb2RvAQAAAAxnZXRWYWx1ZU5vZG8AAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAApnZXRLZXlOb2RvAAAAAQUAAAAEaXRlbQEAAAAYZ2V0S2V5VXNlckl0ZW1HdHNDb3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0CAAAACk9yZGVyX+KEljoBAAAAGmdldFZhbHVlVXNlckl0ZW1HdHNDb3VudGVyAAAAAgAAAAR1c2VyAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAR1c2VyBQAAAARpdGVtAQAAAA5nZXRLZXlJdGVtTmFtZQAAAAEAAAAEaXRlbQIAAAAYQ2F0ZWdvcsOtYSBkZWwgUHJvZHVjdG86AQAAABBnZXRWYWx1ZUl0ZW1OYW1lAAAAAQAAAARpdGVtCQEAAAALZ2V0U3RyQnlLZXkAAAABCQEAAAAOZ2V0S2V5SXRlbU5hbWUAAAABBQAAAARpdGVtAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEAAAAEaXRlbQIAAAATTm9tYnJlIGRlbCBVc3VhcmlvOgEAAAAQZ2V0VmFsdWVVc2VyTmFtZQAAAAEAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADmdldEtleVVzZXJOYW1lAAAAAQUAAAAEaXRlbQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQAAAARpdGVtAgAAACPihJYgZGUgRG9jdW1lbnRvIC8gRE5JIGRlbCBVc3VhcmlvOgEAAAAUZ2V0VmFsdWVVc2VyRG9jdW1lbnQAAAABAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAABJnZXRLZXlVc2VyRG9jdW1lbnQAAAABBQAAAARpdGVtAQAAAAhnZXRLZXlVSQAAAAEAAAAEaXRlbQIAAAAQVUksIHgxMGUtMDQgYml0OgEAAAAKZ2V0VmFsdWVVSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVVJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5UEkAAAABAAAABGl0ZW0CAAAACVBJLCB3dmxzOgEAAAAKZ2V0VmFsdWVQSQAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACGdldEtleVBJAAAAAQUAAAAEaXRlbQEAAAAIZ2V0S2V5U0kAAAABAAAABGl0ZW0CAAAAEFNJLCB4MTBlLTA0IGJpdDoBAAAACmdldFZhbHVlU0kAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAAAhnZXRLZXlTSQAAAAEFAAAABGl0ZW0BAAAACWdldEtleU5JYgAAAAEAAAAEaXRlbQIAAAARTkliLCB4MTBlLTA0IGJpdDoBAAAAC2dldFZhbHVlTkliAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAJZ2V0S2V5TkliAAAAAQUAAAAEaXRlbQEAAAAJZ2V0S2V5Tkl3AAAAAQAAAARpdGVtAgAAAApOSXcsIHd2bHM6AQAAAAtnZXRWYWx1ZU5JdwAAAAEAAAAEaXRlbQkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAACWdldEtleU5JdwAAAAEFAAAABGl0ZW0BAAAAHWdldEtleVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQAAAARpdGVtAgAAADRUb2tlbnMgT2ZlcnRhZG9zIGVuIGxhIHByZXNlbnRlIGV0YXBhIC8gU2FsZG8sIHl0b2s6AQAAAB9nZXRWYWx1ZVNhbGRvVG9rZW5RdHlTdGFydEV0YXBhAAAAAQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABBQAAAARpdGVtAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0CAAAAG0JhbGFuY2UvU2FsZG8gR1RTLCB5dG9rZW5zOgEAAAAaZ2V0VmFsdWVCYWxhbmNlUXR5U3VwcGxpZXIAAAABAAAABGl0ZW0JAQAAAA5nZXROdW1iZXJCeUtleQAAAAEJAQAAABhnZXRLZXlCYWxhbmNlUXR5U3VwcGxpZXIAAAABBQAAAARpdGVtAQAAABNnZXRLZXlCYWxhbmNlSXNzdWVyAAAAAQAAAAhzdXBwbGllcgIAAAAQU2FsZG8gd3ZzLCB3dmxzOgEAAAAVZ2V0VmFsdWVCYWxhbmNlSXNzdWVyAAAAAQAAAAhzdXBwbGllcgkBAAAADmdldE51bWJlckJ5S2V5AAAAAQkBAAAAE2dldEtleUJhbGFuY2VJc3N1ZXIAAAABBQAAAAhzdXBwbGllcgEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQAAAAhzdXBwbGllcgIAAAAcSW5ncmVzb3MgcG9yIFZlbnRhR1RTLCB3dmxzOgEAAAAXZ2V0VmFsdWVCYWxhbmNlU3VwcGxpZXIAAAABAAAACHN1cHBsaWVyCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIAAAADAAAAAWkBAAAAB2RlcG9zaXQAAAACAAAABXRpdGxlAAAADHN1cHBsaWVyRGF0YQQAAAADcG10CQEAAAAHZXh0cmFjdAAAAAEIBQAAAAFpAAAAB3BheW1lbnQDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAAB3lCaXRDTzIJAAACAAAAAQIAAAApZGVwb3NpdG8gcGVybWl0aWRvIHNvbG8gZW4geUJpdENPMiB0b2tlbnMEAAAACHN1cHBsaWVyCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADWN1cnJlbnRBbW91bnQEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAAIc3VwcGxpZXIDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAACW5ld0Ftb3VudAkAAGQAAAACBQAAAA1jdXJyZW50QW1vdW50CAUAAAADcG10AAAABmFtb3VudAMJAABnAAAAAgAAAAAAAAAAAAUAAAAJbmV3QW1vdW50CQAAAgAAAAECAAAAHE5vIGhheSB5Qml0Q08yIGVuIHN1IGJhbGFuY2UJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIFAAAACHN1cHBsaWVyBQAAAAluZXdBbW91bnQFAAAAA25pbAAAAAFpAQAAAAtwdXJjaGFzZUdUUwAAAAUAAAAEaXRlbQAAAAhpdGVtTmFtZQAAAAh1c2VyTmFtZQAAAAx1c2VyRG9jdW1lbnQAAAALdG90YWxBbW91bnQEAAAAA3BtdAkBAAAAB2V4dHJhY3QAAAABCAUAAAABaQAAAAdwYXltZW50AwkBAAAACWlzRGVmaW5lZAAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkAAAIAAAABAgAAABNFbCBQcmVjaW8gZW4gd2F2ZXMuBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAlpc3N1ZXJBZGQEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkBAAAADGdldEtleUlzc3VlcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAGaXNzdWVyBAAAAAdwcm9qQWRkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAARwQWRkBAAAAAdub2RvQWRkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAQAAAApnZXRLZXlOb2RvAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAARlQWRkBAAAAAtwcmVUb2tlblF0eQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAA1TZWNvbmRGYXNlUXR5BAAAAA9iYWxhbmNlU3VwcGxpZXIEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAFWdldEtleUJhbGFuY2VTdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWEFAAAAByRtYXRjaDAFAAAAAWEAAAAAAAAAAAAEAAAADWJhbGFuY2VJc3N1ZXIEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAE2dldEtleUJhbGFuY2VJc3N1ZXIAAAABBQAAAAhzdXBwbGllcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAxGaXJzdEZhc2VRdHkEAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACHN1YlRvdGFsBQAAAAt0b3RhbEFtb3VudAQAAAADcEl3CQAAaQAAAAIJAABoAAAAAgUAAAADcElQBQAAAAhzdWJUb3RhbAUAAAAJcmVsYWNkY3RvBAAAAANlSXcJAABpAAAAAgkAAGgAAAACBQAAAANlSVAFAAAACHN1YlRvdGFsBQAAAAlyZWxhY2RjdG8EAAAADWJjbzJtZW5vc2RjdG8JAABpAAAAAgkAAGgAAAACCQAAZQAAAAIAAAAAAAAAAGQFAAAACGJpdGRzY3RvCQAAaAAAAAIFAAAABWV1cm91BQAAAAViY28yZQAAAAAAAAAnEAQAAAAJc3ViVG90YWxiCQAAaQAAAAIJAABpAAAAAgkAAGgAAAACBQAAAAt0b3RhbEFtb3VudAUAAAAFdXNkbncAAAAAAAAAAGQFAAAADWJjbzJtZW5vc2RjdG8EAAAABnRvdGFsYgkAAGgAAAACAAAAAAAAACcQBQAAAAlzdWJUb3RhbGIEAAAAA3VJYgkAAGkAAAACCQAAaAAAAAIFAAAAA3VCUAUAAAAJc3ViVG90YWxiBQAAAAlyZWxhY2RjdG8EAAAAA3NJYgkAAGkAAAACCQAAaAAAAAIFAAAAA3NCUAUAAAAJc3ViVG90YWxiBQAAAAlyZWxhY2RjdG8EAAAAA2VJYgkAAGkAAAACCQAAaAAAAAIFAAAAA2VCUAUAAAAJc3ViVG90YWxiBQAAAAlyZWxhY2RjdG8EAAAADUJhbGFuY2VUaWVuZGEJAABkAAAAAgUAAAAPYmFsYW5jZVN1cHBsaWVyCAUAAAADcG10AAAABmFtb3VudAQAAAANQmFsYW5jZUlzc3VlcgkAAGUAAAACBQAAAA1iYWxhbmNlSXNzdWVyCAUAAAADcG10AAAABmFtb3VudAMJAABmAAAAAgUAAAALdG90YWxBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50CQAAAgAAAAECAAAANVBheW1lbnQgQW1vdW50IGNhbid0IGJlIGxlc3MgdGhhbiBpdGVtIFB1cmNoYXNlIE9yZGVyAwkAAGYAAAACCAUAAAADcG10AAAABmFtb3VudAUAAAALdG90YWxBbW91bnQJAAACAAAAAQIAAAA3UGF5bWVudCBBbW91bnQgY2FuJ3QgYmUgaGlnaGVyIHRoYW4gaXRlbSBQdXJjaGFzZSBPcmRlcgkBAAAADFNjcmlwdFJlc3VsdAAAAAIJAQAAAAhXcml0ZVNldAAAAAEJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAABhnZXRLZXlVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQkAAGQAAAACCQEAAAAaZ2V0VmFsdWVVc2VySXRlbUd0c0NvdW50ZXIAAAACBQAAAAt1c2VyQWRkcmVzcwUAAAAEaXRlbQAAAAAAAAAAAQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAAEmdldEtleUl0ZW1TdXBwbGllcgAAAAEFAAAACHN1cHBsaWVyBQAAAAhzdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACmdldEtleUl0ZW0AAAACBQAAAAhzdXBwbGllcgUAAAAEaXRlbQUAAAAEaXRlbQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAADmdldEtleUl0ZW1OYW1lAAAAAQUAAAAEaXRlbQUAAAAIaXRlbU5hbWUJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA5nZXRLZXlVc2VyTmFtZQAAAAEFAAAABGl0ZW0FAAAACHVzZXJOYW1lCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAASZ2V0S2V5VXNlckRvY3VtZW50AAAAAQUAAAAEaXRlbQUAAAAMdXNlckRvY3VtZW50CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAMZ2V0S2V5SXNzdWVyAAAAAQUAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADGdldEtleUlzc3VlcgAAAAEFAAAABGl0ZW0JAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAA1nZXRLZXlQcm9qZWN0AAAAAQUAAAAEaXRlbQkBAAAAC2dldFN0ckJ5S2V5AAAAAQkBAAAADWdldEtleVByb2plY3QAAAABBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAKZ2V0S2V5Tm9kbwAAAAEFAAAABGl0ZW0JAQAAAAtnZXRTdHJCeUtleQAAAAEJAQAAAApnZXRLZXlOb2RvAAAAAQUAAAAEaXRlbQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAGVGllbmRhBQAAAAhzdXBwbGllcgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAEdXNkbgUAAAAFdXNkbncJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAABWV1cm91BQAAAAVldXJvdQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAWQXBveW8gRWNvbMOzZ2ljbywgd3ZscwUAAAALdG90YWxBbW91bnQJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAJjEgQml0LUNPMiBQcmVjaW8gTm9taW5hbCwgZXVyb3MgeDEwZS00BQAAAAViY28yZQkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgIAAAAnMSBCaXQtQ08yIFByZWNpbyBjb24gRGVzY3RvLCB1c2QgeDEwZS00BQAAAA1iY28ybWVub3NkY3RvCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAACVTdWJUb3RhbCBhIGRpc3RyaWJ1aXIsIGJpdC1jbzIgeDEwZS00BQAAAAZ0b3RhbGIJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAJVN1YlRvdGFsIGEgZGlzdHJpYnVpciwgYml0LWNvMiB4MTBlLTQJAABoAAAAAgAAAAAAAAAnEAUAAAAJc3ViVG90YWxiCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAIZ2V0S2V5UEkAAAABBQAAAARpdGVtBQAAAANwSXcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAlnZXRLZXlOSXcAAAABBQAAAARpdGVtBQAAAANlSXcJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAIJAQAAAAhnZXRLZXlVSQAAAAEFAAAABGl0ZW0FAAAAA3VJYgkABEwAAAACCQEAAAAJRGF0YUVudHJ5AAAAAgkBAAAACGdldEtleVNJAAAAAQUAAAAEaXRlbQUAAAADc0liCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAJZ2V0S2V5TkliAAAAAQUAAAAEaXRlbQUAAAADZUliCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQABLAAAAAICAAAADk9yZGVyX1N0YXR1czpfBQAAAAt1c2VyQWRkcmVzcwIAAAAYVHJhbnNhY2Npw7NuIENvbmZpcm1hZGEhCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAtQcmVUb2tlblF0eQUAAAALcHJlVG9rZW5RdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAAD2JhbGFuY2VTdXBwbGllcgUAAAAPYmFsYW5jZVN1cHBsaWVyCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAA1iYWxhbmNlVGllbmRhBQAAAA1CYWxhbmNlVGllbmRhCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAA1iYWxhbmNlSXNzdWVyBQAAAA1CYWxhbmNlSXNzdWVyCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAAhzdGFydFF0eQUAAAAIc3RhcnRRdHkJAARMAAAAAgkBAAAACURhdGFFbnRyeQAAAAICAAAADEZpcnN0RmFzZVF0eQUAAAAMRmlyc3RGYXNlUXR5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACAgAAAA1TZWNvbmRGYXNlUXR5BQAAAA1TZWNvbmRGYXNlUXR5CQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABBQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABBQAAAARpdGVtCQEAAAAOZ2V0TnVtYmVyQnlLZXkAAAABCQEAAAAdZ2V0S2V5U2FsZG9Ub2tlblF0eVN0YXJ0RXRhcGEAAAABBQAAAARpdGVtCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAYZ2V0S2V5QmFsYW5jZVF0eVN1cHBsaWVyAAAAAQUAAAAEaXRlbQkAAGUAAAACBQAAAAtwcmVUb2tlblF0eQkAAGkAAAACBQAAAA1CYWxhbmNlVGllbmRhAAAAAAAAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACCQEAAAAVZ2V0S2V5QmFsYW5jZVN1cHBsaWVyAAAAAQUAAAAIc3VwcGxpZXIJAABkAAAAAgUAAAAPYmFsYW5jZVN1cHBsaWVyCAUAAAADcG10AAAABmFtb3VudAUAAAADbmlsCQEAAAALVHJhbnNmZXJTZXQAAAABCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAABHBBZGQFAAAAA3BJdwUAAAAEdW5pdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAA3VJYgUAAAAHeUJpdENPMgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAZpc3N1ZXIFAAAAA3NJYgUAAAAHeUJpdENPMgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAARlQWRkBQAAAANlSXcFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAEZUFkZAUAAAADZUliBQAAAAd5Qml0Q08yBQAAAANuaWwAAAABaQEAAAAId2l0aGRyYXcAAAACAAAABGl0ZW0AAAAGYW1vdW50BAAAAAt1c2VyQWRkcmVzcwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBAAAAAhzdXBwbGllcgQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQEAAAASZ2V0S2V5SXRlbVN1cHBsaWVyAAAAAQUAAAAEaXRlbQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhBQAAAAROT05FBAAAAAlwcmVJY29RdHkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwkBAAAAGGdldEtleUJhbGFuY2VRdHlTdXBwbGllcgAAAAEFAAAABGl0ZW0DCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYQUAAAAHJG1hdGNoMAUAAAABYQUAAAAIc3RhcnRRdHkEAAAACW5ld0Ftb3VudAkAAGUAAAACBQAAAAlwcmVJY29RdHkFAAAABmFtb3VudAMJAABmAAAAAgAAAAAAAAAAAAUAAAAGYW1vdW50CQAAAgAAAAECAAAAK0VsIGJhbGFuY2UgZGUgcmV0aXJvIG5vIHB1ZWRlIHNlciBuZWdhdGl2byEDCQAAZwAAAAIAAAAAAAAAAAAFAAAACW5ld0Ftb3VudAkAAAIAAAABAgAAAB5Pb3Bwc3MuLiBJbnN1ZmljaWVudGUgYmFsYW5jZSEJAQAAAAxTY3JpcHRSZXN1bHQAAAACCQEAAAAIV3JpdGVTZXQAAAABCQAETAAAAAIJAQAAAAlEYXRhRW50cnkAAAACBQAAAARpdGVtBQAAAAluZXdBbW91bnQFAAAAA25pbAkBAAAAC1RyYW5zZmVyU2V0AAAAAQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAABmFtb3VudAUAAAAHeUJpdENPMgUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFFNldFNjcmlwdFRyYW5zYWN0aW9uBAAAAAF0BQAAAAckbWF0Y2gwCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAALT3duZXJQdWJLZXkDAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAABJSZWlzc3VlVHJhbnNhY3Rpb24GCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAD0RhdGFUcmFuc2FjdGlvbgQAAAABZAUAAAAHJG1hdGNoMAYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAE1RyYW5zZmVyVHJhbnNhY3Rpb24EAAAAAnR4BQAAAAckbWF0Y2gwBgeacsh/",
    "height": 1751736,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DzHWD8rC8q8DnrBXQ9XA5xxuTcuTDXn6uza3LSxyQko4
Next: CRXfmLW1ke1VeZeJo9VMMP1tALWMyHDYennVTT6588bT

Diff: 
Old
New
Differences
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let yBitCO2 = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5
5
 
6
-
let startQty = 3056930000
6
+
let startQty = 305693
7
7
 
8
-
let FirstFaseQty = 311930000
8
+
let FirstFaseQty = 31193
9
9
 
10
-
let SecondFaseQty = 2745000000
10
+
let SecondFaseQty = 274500
11
11
 
12
12
 
let NONE = "none"
13
13
 
151
151
 
func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
152
152
 
153
153
 
154
+
func getKeyBalanceIssuer (supplier) = "Saldo wvs, wvls:"
155
+
156
+
157
+
func getValueBalanceIssuer (supplier) = getNumberByKey(getKeyBalanceIssuer(supplier))
158
+
159
+
154
160
 
func getKeyBalanceSupplier (supplier) = "Ingresos por VentaGTS, wvls:"
155
161
 
156
162
 
221
227
 
                case _ => 
222
228
 
                    0
223
229
 
            }
230
+
            let balanceIssuer =             match getInteger(this, getKeyBalanceIssuer(supplier)) {
231
+
                case a: Int => 
232
+
                    a
233
+
                case _ => 
234
+
                    FirstFaseQty
235
+
            }
224
236
 
            let userAddress = toBase58String(i.caller.bytes)
225
237
 
            let subTotal = totalAmount
226
238
 
            let pIw = ((pIP * subTotal) / relacdcto)
227
239
 
            let eIw = ((eIP * subTotal) / relacdcto)
228
240
 
            let bco2menosdcto = (((100 - bitdscto) * (eurou * bco2e)) / 10000)
229
241
 
            let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
242
+
            let totalb = (10000 * subTotalb)
230
243
 
            let uIb = ((uBP * subTotalb) / relacdcto)
231
244
 
            let sIb = ((sBP * subTotalb) / relacdcto)
232
245
 
            let eIb = ((eBP * subTotalb) / relacdcto)
233
246
 
            let BalanceTienda = (balanceSupplier + pmt.amount)
247
+
            let BalanceIssuer = (balanceIssuer - pmt.amount)
234
248
 
            if ((totalAmount > pmt.amount))
235
249
 
                then throw("Payment Amount can't be less than item Purchase Order")
236
250
 
                else if ((pmt.amount > totalAmount))
237
251
 
                    then throw("Payment Amount can't be higher than item Purchase Order")
238
-
                    else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyIssuer(item), getStrByKey(getKeyIssuer(item))), DataEntry(getKeyProject(item), getStrByKey(getKeyProject(item))), DataEntry(getKeyNodo(item), getStrByKey(getKeyNodo(item))), DataEntry("Tienda", supplier), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, euros x10e-4", bco2menosdcto), DataEntry("SubTotal a distribuir, bit-co2 x10e-4", (subTotalb / 10000)), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("PreTokenQty", preTokenQty), DataEntry("balanceSupplier", balanceSupplier), DataEntry("balanceTienda", BalanceTienda), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (BalanceTienda / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(issuer, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
252
+
                    else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyIssuer(item), getStrByKey(getKeyIssuer(item))), DataEntry(getKeyProject(item), getStrByKey(getKeyProject(item))), DataEntry(getKeyNodo(item), getStrByKey(getKeyNodo(item))), DataEntry("Tienda", supplier), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("SubTotal a distribuir, bit-co2 x10e-4", totalb), DataEntry("SubTotal a distribuir, bit-co2 x10e-4", (10000 * subTotalb)), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("PreTokenQty", preTokenQty), DataEntry("balanceSupplier", balanceSupplier), DataEntry("balanceTienda", BalanceTienda), DataEntry("balanceIssuer", BalanceIssuer), DataEntry("startQty", startQty), DataEntry("FirstFaseQty", FirstFaseQty), DataEntry("SecondFaseQty", SecondFaseQty), DataEntry(getKeySaldoTokenQtyStartEtapa(item), getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))), DataEntry(getKeySaldoTokenQtyStartEtapa(item), getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (BalanceTienda / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(issuer, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
239
253
 
            }
240
254
 
    }
241
255
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 3 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let yBitCO2 = base58'872MvpMoQx7SnV58HMcR9hd6vBWDtQvqmt5javCmYwpx'
5
5
 
6
-
let startQty = 3056930000
6
+
let startQty = 305693
7
7
 
8
-
let FirstFaseQty = 311930000
8
+
let FirstFaseQty = 31193
9
9
 
10
-
let SecondFaseQty = 2745000000
10
+
let SecondFaseQty = 274500
11
11
 
12
12
 
let NONE = "none"
13
13
 
14
14
 
let OwnerPubKey = base58'8xCH82jKi2DM7HXXD45fmftPUDjr3TJpjanUATKMK37U'
15
15
 
16
16
 
let issuer = Address(base58'3N67GoXrZo4iwmEjLhS9iNUCbzpPEjoYgNW')
17
17
 
18
18
 
let eAdd = Address(base58'3N3uf7RK8Aed4v5ufGB8xV2Wsz4WNoHj21c')
19
19
 
20
20
 
let pAdd = Address(base58'3Mv5mXTRhpWZxZxstmnsBhckWNgErMTFEaD')
21
21
 
22
22
 
let eurou = 116
23
23
 
24
24
 
let usdnw = 2539
25
25
 
26
26
 
let bco2e = 100000
27
27
 
28
28
 
let bitdscto = 3
29
29
 
30
30
 
let pIP = 10
31
31
 
32
32
 
let uBP = 7
33
33
 
34
34
 
let sBP = 2
35
35
 
36
36
 
let eIP = 1
37
37
 
38
38
 
let eBP = 2
39
39
 
40
40
 
let relacdcto = 11
41
41
 
42
42
 
func getNumberByKey (key) = {
43
43
 
    let num =     match getInteger(this, key) {
44
44
 
        case a: Int => 
45
45
 
            a
46
46
 
        case _ => 
47
47
 
            0
48
48
 
    }
49
49
 
    num
50
50
 
    }
51
51
 
52
52
 
53
53
 
func getStrByKey (key) = {
54
54
 
    let str =     match getString(this, key) {
55
55
 
        case a: String => 
56
56
 
            a
57
57
 
        case _ => 
58
58
 
            NONE
59
59
 
    }
60
60
 
    str
61
61
 
    }
62
62
 
63
63
 
64
64
 
func getKeyItemSupplier (supplier) = (supplier + "Vendedor, Lima-Perú")
65
65
 
66
66
 
67
67
 
func getKeyItem (supplier,item) = (("Producto-GTS: " + " ") + toBase58String(sha256(toBytes((supplier + item)))))
68
68
 
69
69
 
70
70
 
func getKeyIssuer (item) = "Issuer/Tienda"
71
71
 
72
72
 
73
73
 
func getValueIssuer (item) = getStrByKey(getKeyIssuer(item))
74
74
 
75
75
 
76
76
 
func getKeyProject (item) = "Project"
77
77
 
78
78
 
79
79
 
func getValueProject (item) = getStrByKey(getKeyProject(item))
80
80
 
81
81
 
82
82
 
func getKeyNodo (item) = "Nodo"
83
83
 
84
84
 
85
85
 
func getValueNodo (item) = getStrByKey(getKeyNodo(item))
86
86
 
87
87
 
88
88
 
func getKeyUserItemGtsCounter (user,item) = "Order_№:"
89
89
 
90
90
 
91
91
 
func getValueUserItemGtsCounter (user,item) = getNumberByKey(getKeyUserItemGtsCounter(user, item))
92
92
 
93
93
 
94
94
 
func getKeyItemName (item) = "Categoría del Producto:"
95
95
 
96
96
 
97
97
 
func getValueItemName (item) = getStrByKey(getKeyItemName(item))
98
98
 
99
99
 
100
100
 
func getKeyUserName (item) = "Nombre del Usuario:"
101
101
 
102
102
 
103
103
 
func getValueUserName (item) = getStrByKey(getKeyUserName(item))
104
104
 
105
105
 
106
106
 
func getKeyUserDocument (item) = "№ de Documento / DNI del Usuario:"
107
107
 
108
108
 
109
109
 
func getValueUserDocument (item) = getStrByKey(getKeyUserDocument(item))
110
110
 
111
111
 
112
112
 
func getKeyUI (item) = "UI, x10e-04 bit:"
113
113
 
114
114
 
115
115
 
func getValueUI (item) = getNumberByKey(getKeyUI(item))
116
116
 
117
117
 
118
118
 
func getKeyPI (item) = "PI, wvls:"
119
119
 
120
120
 
121
121
 
func getValuePI (item) = getNumberByKey(getKeyPI(item))
122
122
 
123
123
 
124
124
 
func getKeySI (item) = "SI, x10e-04 bit:"
125
125
 
126
126
 
127
127
 
func getValueSI (item) = getNumberByKey(getKeySI(item))
128
128
 
129
129
 
130
130
 
func getKeyNIb (item) = "NIb, x10e-04 bit:"
131
131
 
132
132
 
133
133
 
func getValueNIb (item) = getNumberByKey(getKeyNIb(item))
134
134
 
135
135
 
136
136
 
func getKeyNIw (item) = "NIw, wvls:"
137
137
 
138
138
 
139
139
 
func getValueNIw (item) = getNumberByKey(getKeyNIw(item))
140
140
 
141
141
 
142
142
 
func getKeySaldoTokenQtyStartEtapa (item) = "Tokens Ofertados en la presente etapa / Saldo, ytok:"
143
143
 
144
144
 
145
145
 
func getValueSaldoTokenQtyStartEtapa (item) = getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))
146
146
 
147
147
 
148
148
 
func getKeyBalanceQtySupplier (item) = "Balance/Saldo GTS, ytokens:"
149
149
 
150
150
 
151
151
 
func getValueBalanceQtySupplier (item) = getNumberByKey(getKeyBalanceQtySupplier(item))
152
152
 
153
153
 
154
+
func getKeyBalanceIssuer (supplier) = "Saldo wvs, wvls:"
155
+
156
+
157
+
func getValueBalanceIssuer (supplier) = getNumberByKey(getKeyBalanceIssuer(supplier))
158
+
159
+
154
160
 
func getKeyBalanceSupplier (supplier) = "Ingresos por VentaGTS, wvls:"
155
161
 
156
162
 
157
163
 
func getValueBalanceSupplier (supplier) = getNumberByKey(getKeyBalanceSupplier(supplier))
158
164
 
159
165
 
160
166
 
@Callable(i)
161
167
 
func deposit (title,supplierData) = {
162
168
 
    let pmt = extract(i.payment)
163
169
 
    if ((pmt.assetId != yBitCO2))
164
170
 
        then throw("deposito permitido solo en yBitCO2 tokens")
165
171
 
        else {
166
172
 
            let supplier = toBase58String(i.caller.bytes)
167
173
 
            let currentAmount =             match getInteger(this, supplier) {
168
174
 
                case a: Int => 
169
175
 
                    a
170
176
 
                case _ => 
171
177
 
                    startQty
172
178
 
            }
173
179
 
            let newAmount = (currentAmount + pmt.amount)
174
180
 
            if ((0 >= newAmount))
175
181
 
                then throw("No hay yBitCO2 en su balance")
176
182
 
                else WriteSet([DataEntry(supplier, newAmount)])
177
183
 
            }
178
184
 
    }
179
185
 
180
186
 
181
187
 
182
188
 
@Callable(i)
183
189
 
func purchaseGTS (item,itemName,userName,userDocument,totalAmount) = {
184
190
 
    let pmt = extract(i.payment)
185
191
 
    if (isDefined(pmt.assetId))
186
192
 
        then throw("El Precio en waves.")
187
193
 
        else {
188
194
 
            let supplier =             match getString(this, getKeyItemSupplier(item)) {
189
195
 
                case a: String => 
190
196
 
                    a
191
197
 
                case _ => 
192
198
 
                    NONE
193
199
 
            }
194
200
 
            let issuerAdd =             match getString(this, getKeyIssuer(item)) {
195
201
 
                case a: String => 
196
202
 
                    a
197
203
 
                case _ => 
198
204
 
                    issuer
199
205
 
            }
200
206
 
            let projAdd =             match getString(this, getKeyProject(item)) {
201
207
 
                case a: String => 
202
208
 
                    a
203
209
 
                case _ => 
204
210
 
                    pAdd
205
211
 
            }
206
212
 
            let nodoAdd =             match getString(this, getKeyNodo(item)) {
207
213
 
                case a: String => 
208
214
 
                    a
209
215
 
                case _ => 
210
216
 
                    eAdd
211
217
 
            }
212
218
 
            let preTokenQty =             match getInteger(this, getKeyBalanceQtySupplier(item)) {
213
219
 
                case a: Int => 
214
220
 
                    a
215
221
 
                case _ => 
216
222
 
                    SecondFaseQty
217
223
 
            }
218
224
 
            let balanceSupplier =             match getInteger(this, getKeyBalanceSupplier(supplier)) {
219
225
 
                case a: Int => 
220
226
 
                    a
221
227
 
                case _ => 
222
228
 
                    0
223
229
 
            }
230
+
            let balanceIssuer =             match getInteger(this, getKeyBalanceIssuer(supplier)) {
231
+
                case a: Int => 
232
+
                    a
233
+
                case _ => 
234
+
                    FirstFaseQty
235
+
            }
224
236
 
            let userAddress = toBase58String(i.caller.bytes)
225
237
 
            let subTotal = totalAmount
226
238
 
            let pIw = ((pIP * subTotal) / relacdcto)
227
239
 
            let eIw = ((eIP * subTotal) / relacdcto)
228
240
 
            let bco2menosdcto = (((100 - bitdscto) * (eurou * bco2e)) / 10000)
229
241
 
            let subTotalb = (((totalAmount * usdnw) / 100) / bco2menosdcto)
242
+
            let totalb = (10000 * subTotalb)
230
243
 
            let uIb = ((uBP * subTotalb) / relacdcto)
231
244
 
            let sIb = ((sBP * subTotalb) / relacdcto)
232
245
 
            let eIb = ((eBP * subTotalb) / relacdcto)
233
246
 
            let BalanceTienda = (balanceSupplier + pmt.amount)
247
+
            let BalanceIssuer = (balanceIssuer - pmt.amount)
234
248
 
            if ((totalAmount > pmt.amount))
235
249
 
                then throw("Payment Amount can't be less than item Purchase Order")
236
250
 
                else if ((pmt.amount > totalAmount))
237
251
 
                    then throw("Payment Amount can't be higher than item Purchase Order")
238
-
                    else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyIssuer(item), getStrByKey(getKeyIssuer(item))), DataEntry(getKeyProject(item), getStrByKey(getKeyProject(item))), DataEntry(getKeyNodo(item), getStrByKey(getKeyNodo(item))), DataEntry("Tienda", supplier), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, euros x10e-4", bco2menosdcto), DataEntry("SubTotal a distribuir, bit-co2 x10e-4", (subTotalb / 10000)), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("PreTokenQty", preTokenQty), DataEntry("balanceSupplier", balanceSupplier), DataEntry("balanceTienda", BalanceTienda), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (BalanceTienda / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(issuer, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
252
+
                    else ScriptResult(WriteSet([DataEntry(getKeyUserItemGtsCounter(userAddress, item), (getValueUserItemGtsCounter(userAddress, item) + 1)), DataEntry(getKeyItemSupplier(supplier), supplier), DataEntry(getKeyItem(supplier, item), item), DataEntry(getKeyItemName(item), itemName), DataEntry(getKeyUserName(item), userName), DataEntry(getKeyUserDocument(item), userDocument), DataEntry(getKeyIssuer(item), getStrByKey(getKeyIssuer(item))), DataEntry(getKeyProject(item), getStrByKey(getKeyProject(item))), DataEntry(getKeyNodo(item), getStrByKey(getKeyNodo(item))), DataEntry("Tienda", supplier), DataEntry("usdn", usdnw), DataEntry("eurou", eurou), DataEntry("Apoyo Ecológico, wvls", totalAmount), DataEntry("1 Bit-CO2 Precio Nominal, euros x10e-4", bco2e), DataEntry("1 Bit-CO2 Precio con Descto, usd x10e-4", bco2menosdcto), DataEntry("SubTotal a distribuir, bit-co2 x10e-4", totalb), DataEntry("SubTotal a distribuir, bit-co2 x10e-4", (10000 * subTotalb)), DataEntry(getKeyPI(item), pIw), DataEntry(getKeyNIw(item), eIw), DataEntry(getKeyUI(item), uIb), DataEntry(getKeySI(item), sIb), DataEntry(getKeyNIb(item), eIb), DataEntry(("Order_Status:_" + userAddress), "Transacción Confirmada!"), DataEntry("PreTokenQty", preTokenQty), DataEntry("balanceSupplier", balanceSupplier), DataEntry("balanceTienda", BalanceTienda), DataEntry("balanceIssuer", BalanceIssuer), DataEntry("startQty", startQty), DataEntry("FirstFaseQty", FirstFaseQty), DataEntry("SecondFaseQty", SecondFaseQty), DataEntry(getKeySaldoTokenQtyStartEtapa(item), getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))), DataEntry(getKeySaldoTokenQtyStartEtapa(item), getNumberByKey(getKeySaldoTokenQtyStartEtapa(item))), DataEntry(getKeyBalanceQtySupplier(item), (preTokenQty - (BalanceTienda / 1))), DataEntry(getKeyBalanceSupplier(supplier), (balanceSupplier + pmt.amount))]), TransferSet([ScriptTransfer(pAdd, pIw, unit), ScriptTransfer(i.caller, uIb, yBitCO2), ScriptTransfer(issuer, sIb, yBitCO2), ScriptTransfer(eAdd, eIw, unit), ScriptTransfer(eAdd, eIb, yBitCO2)]))
239
253
 
            }
240
254
 
    }
241
255
 
242
256
 
243
257
 
244
258
 
@Callable(i)
245
259
 
func withdraw (item,amount) = {
246
260
 
    let userAddress = toBase58String(i.caller.bytes)
247
261
 
    let supplier =     match getString(this, getKeyItemSupplier(item)) {
248
262
 
        case a: String => 
249
263
 
            a
250
264
 
        case _ => 
251
265
 
            NONE
252
266
 
    }
253
267
 
    let preIcoQty =     match getInteger(this, getKeyBalanceQtySupplier(item)) {
254
268
 
        case a: Int => 
255
269
 
            a
256
270
 
        case _ => 
257
271
 
            startQty
258
272
 
    }
259
273
 
    let newAmount = (preIcoQty - amount)
260
274
 
    if ((0 > amount))
261
275
 
        then throw("El balance de retiro no puede ser negativo!")
262
276
 
        else if ((0 >= newAmount))
263
277
 
            then throw("Ooppss.. Insuficiente balance!")
264
278
 
            else ScriptResult(WriteSet([DataEntry(item, newAmount)]), TransferSet([ScriptTransfer(i.caller, amount, yBitCO2)]))
265
279
 
    }
266
280
 
267
281
 
268
282
 
@Verifier(tx)
269
283
 
func verify () = match tx {
270
284
 
    case t: SetScriptTransaction => 
271
285
 
        sigVerify(tx.bodyBytes, tx.proofs[0], OwnerPubKey)
272
286
 
    case d: ReissueTransaction|DataTransaction => 
273
287
 
        true
274
288
 
    case tx: TransferTransaction => 
275
289
 
        true
276
290
 
    case _ => 
277
291
 
        false
278
292
 
}
279
293
 

github/deemru/w8io/169f3d6 
113.49 ms ◑