w8 · tx · DmR···Wdr

tx · DmRsfM3fnkuacFV6t6GanrkLrpgtjePUkaHCXByB5Wdr

3NApHaksvsb9ZLCMrFNmz4AnUpV5EEytdG6:  -0.01000000 Waves

2021.11.16 12:58 [1793451] smart account 3NApHaksvsb9ZLCMrFNmz4AnUpV5EEytdG6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DmRsfM3fnkuacFV6t6GanrkLrpgtjePUkaHCXByB5Wdr",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1637056769951,
    "version": 2,
    "chainId": 84,
    "sender": "3NApHaksvsb9ZLCMrFNmz4AnUpV5EEytdG6",
    "senderPublicKey": "G6gPQLsHXcXB4mNCeRfD2nra9dBGiPpeXEKYz1oWTzZ1",
    "proofs": [
        "47PSF4zAxA1fZRt3iYXYEB38McpPZL8SkUqXyqdGSrZEAV1DCfskAYv5ZavXgzHUjopumpvV2cC8R1ToxHDXPS6S"
    ],
    "script": "base64:AAIEAAAAAAAAAAQIAhIAAAAAAQEAAAAHZ2V0RGF0YQAAAAIAAAADYWRyAAAAA2tleQQAAAAEZGF0YQQAAAAHJG1hdGNoMAkABB0AAAACBQAAAANhZHIFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAgAAAAAFAAAABGRhdGEAAAABAAAAAWkBAAAABktvb3BTQwAAAAAEAAAACWx3QWRyZXNzZQkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQgFAAAAAWkAAAAPY2FsbGVyUHVibGljS2V5BAAAAAtrb29wQWRyZXNzZQkBAAAAFGFkZHJlc3NGcm9tUHVibGljS2V5AAAAAQEAAAAg58jmLhmUklDFFtwPenIJPMQcXIcOV+ofvaRmcZovjjYEAAAABGRhcHAJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEBAAAAIOBTvfs6WvpFB8STDjVFkuTCL9oTkGnzznvxK9BV9ldkBAAAAApzZWFyY2hLZXkxAgAAADRObWluLUphaHJfMjAxOS8yMDIwX0F1c2JyaW5ndW5nc3RlY2huaWstSEYtYW5nZXBhc3N0BAAAAApzZWFyY2hLZXkyAgAAAB1ObWluLUphaHJfMjAxOS8yMDIwX05PM18zMC02MAQAAAANa29vcFZlcmdsZWljaAIAAAAQS29vcGVyYXRpb25zbmFtZQQAAAAHbHdEYXRhMQkBAAAAB2dldERhdGEAAAACBQAAAAlsd0FkcmVzc2UFAAAACnNlYXJjaEtleTEEAAAACWtvb3BEYXRhMQkBAAAAB2dldERhdGEAAAACBQAAAAtrb29wQWRyZXNzZQUAAAAKc2VhcmNoS2V5MQQAAAAHYmV6S2V5MQkABLkAAAACCQAETAAAAAIJAAQlAAAAAQUAAAAJbHdBZHJlc3NlCQAETAAAAAIFAAAACnNlYXJjaEtleTEFAAAAA25pbAIAAAABXwQAAAAEYmV6MQkBAAAAB2dldERhdGEAAAACBQAAAARkYXBwBQAAAAdiZXpLZXkxBAAAAAdsd0RhdGEyCQEAAAAHZ2V0RGF0YQAAAAIFAAAACWx3QWRyZXNzZQUAAAAKc2VhcmNoS2V5MgQAAAAJa29vcERhdGEyCQEAAAAHZ2V0RGF0YQAAAAIFAAAAC2tvb3BBZHJlc3NlBQAAAApzZWFyY2hLZXkyBAAAAAdiZXpLZXkyCQAEuQAAAAIJAARMAAAAAgkABCUAAAABBQAAAAlsd0FkcmVzc2UJAARMAAAAAgUAAAAKc2VhcmNoS2V5MgUAAAADbmlsAgAAAAFfBAAAAARiZXoyCQEAAAAHZ2V0RGF0YQAAAAIFAAAABGRhcHAFAAAAB2JlektleTIEAAAAB2NoZWNrTHcJAQAAAAdnZXREYXRhAAAAAgUAAAAJbHdBZHJlc3NlBQAAAA1rb29wVmVyZ2xlaWNoBAAAAAljaGVja0tvb3AJAQAAAAdnZXREYXRhAAAAAgUAAAALa29vcEFkcmVzc2UFAAAADWtvb3BWZXJnbGVpY2gEAAAABUxXYWRyAgAAABljb25uZWN0aW9uX2Zhcm1lcl9GYXJtZXIxBAAAAApjaGVja0xXYWRyCQEAAAAHZ2V0RGF0YQAAAAIFAAAAC2tvb3BBZHJlc3NlBQAAAAVMV2FkcgMJAAAAAAAAAgUAAAAHY2hlY2tMdwUAAAAJY2hlY2tLb29wAwkAAAAAAAACCQAEJQAAAAEFAAAACWx3QWRyZXNzZQUAAAAKY2hlY2tMV2FkcgMJAQAAAAIhPQAAAAIFAAAABGJlejECAAAAFVByw6RtaWUgd3VyZGUgZ2V6YWhsdAMJAAAAAAAAAgUAAAAHbHdEYXRhMQUAAAAJa29vcERhdGExAwkBAAAAAiE9AAAAAgUAAAAEYmV6MgIAAAAVUHLDpG1pZSB3dXJkZSBnZXphaGx0AwkAAGcAAAACCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAlsd0FkcmVzc2UFAAAACnNlYXJjaEtleTIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAAC2tvb3BBZHJlc3NlBQAAAApzZWFyY2hLZXkyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAAEVNDLUF1ZnJ1Zih6UDF6UDIpCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAGERpZSBBdXNicmluZ3VuZ3N0ZWNobmlrIAUAAAAJa29vcERhdGExAgAAABwgdW5kIE5PM18zMC02MCBXZXJ0ZSB2b24gPj0gBQAAAAlrb29wRGF0YTICAAAAKCB3ZXJkZW4gbWl0IGpld2VpbHMgMCwwMSBXYXZlIGdlZsO2cmRlcnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAHYmV6S2V5MQIAAAAVUHLDpG1pZSB3dXJkZSBnZXphaGx0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAB2JlektleTICAAAAFVByw6RtaWUgd3VyZGUgZ2V6YWhsdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAlsd0FkcmVzc2UAAAAAAAAehIAIBQAAAAFpAAAACmZlZUFzc2V0SWQFAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAABBTQy1BdWZydWYoelAxbTIpCQABLAAAAAIJAAEsAAAAAgIAAAAYRGllIEF1c2JyaW5ndW5nc3RlY2huaWsgBQAAAAlrb29wRGF0YTECAAAAYiB3aXJkIG1pdCAwLDAxIFdhdmUgZ2Vmw7ZyZGVydCAsYWxsZXJkaW5ncyBsaWVndCBkZXIgTk8zXzMwLTYwIFdlcnQgbmljaHQgaW0gZ2Vmw7ZyZGVydGVuIEJlcmVpY2guCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAB2JlektleTECAAAAFVByw6RtaWUgd3VyZGUgZ2V6YWhsdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAlsd0FkcmVzc2UAAAAAAAAPQkAIBQAAAAFpAAAACmZlZUFzc2V0SWQFAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAABNTQy1BdWZydWYoelAxYmV6UDIpCQABLAAAAAIJAAEsAAAAAgIAAAAYRGllIEF1c2JyaW5ndW5nc3RlY2huaWsgBQAAAAlrb29wRGF0YTECAAAAWSB3aXJkIG1pdCAwLDAxIFdhdmUgZ2Vmw7ZyZGVydCwgZGllIFByw6RtaWUgZsO8ciBkZW4gTk8zXzMwLTYwIFdlcnQgd3VyZGUgYmVyZWl0cyBiZXphaGx0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAB2JlektleTECAAAAFVByw6RtaWUgd3VyZGUgZ2V6YWhsdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAlsd0FkcmVzc2UAAAAAAAAPQkAIBQAAAAFpAAAACmZlZUFzc2V0SWQFAAAAA25pbAMJAQAAAAIhPQAAAAIFAAAABGJlejICAAAAFVByw6RtaWUgd3VyZGUgZ2V6YWhsdAMJAAAAAAAAAgUAAAAHbHdEYXRhMgUAAAAJa29vcERhdGEyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAAEFNDLUF1ZnJ1ZihtMXpQMikJAAEsAAAAAgkAASwAAAACAgAAAGVMZWlkZXIgd2lyZCBpaHJlIEF1c2JyaW5ndW5nc3RlY2huaWsgYWt0dWVsbCBuaWNodCBnZWbDtnJkZXJ0LCBkZW5ub2NoIHdlcmRlbiBOTzNfMzAtNjAgV2VydGUgdm9uID49IAUAAAAJa29vcERhdGEyAgAAACAgd2VyZGVuIG1pdCAwLDAxIFdhdmUgZ2Vmw7ZyZGVydAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAdiZXpLZXkyAgAAABVQcsOkbWllIHd1cmRlIGdlemFobHQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAJbHdBZHJlc3NlAAAAAAAAD0JACAUAAAABaQAAAApmZWVBc3NldElkBQAAAANuaWwJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAEbjFuMgIAAABRTGVpZGVyIHdpcmQga2VpbmUgZGVyIGR1cmNoZ2Vmw7xocnRlbiBNYcOfbmFobWVuIHZvbiBpaHJlciBLb29wZXJhdGlvbiBnZWbDtnJkZXJ0BQAAAANuaWwJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAGbjFiZXoyAgAAAHlMZWlkZXIgd2lyZCBpaHJlIEF1c2JyaW5ndW5nc3RlY2huaWsgYWt0dWVsbCBuaWNodCBnZWbDtnJkZXJ0LCBkaWUgUHLDpG1pZSBmw7xyIGRlbiBOTzNfMzAtNjAgV2VydCB3dXJkZSBiZXJlaXRzIGJlemFobHQuBQAAAANuaWwDCQEAAAACIT0AAAACBQAAAARiZXoyAgAAABVQcsOkbWllIHd1cmRlIGdlemFobHQDCQAAZwAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAACWx3QWRyZXNzZQUAAAAKc2VhcmNoS2V5MgkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAALa29vcEFkcmVzc2UFAAAACnNlYXJjaEtleTIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAATU0MtQXVmcnVmKGJlelAxelAyKQkAASwAAAACCQABLAAAAAICAAAAV0RpZSBQcsOkbWllIGbDvHIgZGllIEF1c2JyaW5ndW5nc3RlY2huaWsgd3VyZGUgYmVyZWl0cyBiZXphaGx0LCBOTzNfMzAtNjAgV2VydGUgdm9uID49IAUAAAAJa29vcERhdGEyAgAAACEgd2VyZGVuIG1pdCAwLDAxIFdhdmUgZ2Vmw7ZyZGVydC4JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAHYmV6S2V5MgIAAAAVUHLDpG1pZSB3dXJkZSBnZXphaGx0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACWx3QWRyZXNzZQAAAAAAAA9CQAgFAAAAAWkAAAAKZmVlQXNzZXRJZAUAAAADbmlsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAABmJlejFuMgIAAACCRGllIFByw6RtaWUgZsO8ciBkaWUgQXVzYnJpbmd1bmdzdGVjaG5payB3dXJkZSBiZXJlaXRzIGJlemFobHQsIHVuZCBsZWlkZXIgbGllZ3QgZGVyIE5PM18zMC02MCBXZXJ0IG5pY2h0IGltIGdlZsO2cmRlcnRlbiBCZXJlaWNoLgUAAAADbmlsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAACHNjaG9uQmV6AgAAADZBbGxlIGdlZsO2cmRlcnRlbiBNYcOfbmFobWVuIHd1cmRlbiBiZXJlaXRzIGF1c2dlemFobHQFAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAAtMV3VuYmVrYW5udAIAAAA8RmVobGVyOiBCaXR0ZSB3ZW5kZW4gc2llIHNpY2ggYW4gZGllIHp1Z2Vow7ZyaWdlIEtvb3BlcmF0aW9uBQAAAANuaWwJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAALZmFsc2NoZUtvb3ACAAAAQkZlaGxlcjogTGVpZGVyIHd1cmRlIG5pY2h0IGRpZSB6dWdlaG9lcmlnZSBLb29wZXJhdGlvbiBhdXNnZXfDpGhsdAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAQAAAAHJG1hdGNoMAUAAAACdHgDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAD0RhdGFUcmFuc2FjdGlvbgYDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAFFNldFNjcmlwdFRyYW5zYWN0aW9uBgaTkEjC",
    "height": 1793451,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: AsKWvDjVP1J829kkiG7Es8AbLi8jf4vnRDigTNDMaPTc
Next: CW1QKUpVjVS3iP7PisqWbS63E4XqCX7k3jCqr721Lqxh

Diff: 
Old New Differences
48 48                          else [StringEntry("n1bez2", "Leider wird ihre Ausbringungstechnik aktuell nicht gefördert, die Prämie für den NO3_30-60 Wert wurde bereits bezahlt.")]
49 49                  else if ((bez2 != "Prämie wurde gezahlt"))
50 50                      then if ((getIntegerValue(lwAdresse, searchKey2) >= getIntegerValue(koopAdresse, searchKey2)))
51 -                         then [StringEntry("SC-Aufruf(bezP1zP2)", (("Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert.")), StringEntry(makeString([toString(lwAdresse), searchKey2], "_"), "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
51 +                         then [StringEntry("SC-Aufruf(bezP1zP2)", (("Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert.")), StringEntry(bezKey2, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
52 52                          else [StringEntry("bez1n2", "Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, und leider liegt der NO3_30-60 Wert nicht im geförderten Bereich.")]
53 53                      else [StringEntry("schonBez", "Alle geförderten Maßnahmen wurden bereits ausgezahlt")]
54 54              else [StringEntry("LWunbekannt", "Fehler: Bitte wenden sie sich an die zugehörige Kooperation")]
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  func getData (adr,key) = {
5 5      let data =     match getString(adr, key) {
6 6          case a: String => 
7 7              a
8 8          case _ => 
9 9              ""
10 10      }
11 11      data
12 12      }
13 13  
14 14  
15 15  @Callable(i)
16 16  func KoopSC () = {
17 17      let lwAdresse = addressFromPublicKey(i.callerPublicKey)
18 18      let koopAdresse = addressFromPublicKey(base58'GbnrZCzPFcuJG3qQkSimJedC5c9zbZLzmzVp8hkzxe37')
19 19      let dapp = addressFromPublicKey(base58'G6gPQLsHXcXB4mNCeRfD2nra9dBGiPpeXEKYz1oWTzZ1')
20 20      let searchKey1 = "Nmin-Jahr_2019/2020_Ausbringungstechnik-HF-angepasst"
21 21      let searchKey2 = "Nmin-Jahr_2019/2020_NO3_30-60"
22 22      let koopVergleich = "Kooperationsname"
23 23      let lwData1 = getData(lwAdresse, searchKey1)
24 24      let koopData1 = getData(koopAdresse, searchKey1)
25 25      let bezKey1 = makeString([toString(lwAdresse), searchKey1], "_")
26 26      let bez1 = getData(dapp, bezKey1)
27 27      let lwData2 = getData(lwAdresse, searchKey2)
28 28      let koopData2 = getData(koopAdresse, searchKey2)
29 29      let bezKey2 = makeString([toString(lwAdresse), searchKey2], "_")
30 30      let bez2 = getData(dapp, bezKey2)
31 31      let checkLw = getData(lwAdresse, koopVergleich)
32 32      let checkKoop = getData(koopAdresse, koopVergleich)
33 33      let LWadr = "connection_farmer_Farmer1"
34 34      let checkLWadr = getData(koopAdresse, LWadr)
35 35      if ((checkLw == checkKoop))
36 36          then if ((toString(lwAdresse) == checkLWadr))
37 37              then if ((bez1 != "Prämie wurde gezahlt"))
38 38                  then if ((lwData1 == koopData1))
39 39                      then if ((bez2 != "Prämie wurde gezahlt"))
40 40                          then if ((getIntegerValue(lwAdresse, searchKey2) >= getIntegerValue(koopAdresse, searchKey2)))
41 41                              then [StringEntry("SC-Aufruf(zP1zP2)", (((("Die Ausbringungstechnik " + koopData1) + " und NO3_30-60 Werte von >= ") + koopData2) + " werden mit jeweils 0,01 Wave gefördert")), StringEntry(bezKey1, "Prämie wurde gezahlt"), StringEntry(bezKey2, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 2000000, i.feeAssetId)]
42 42                              else [StringEntry("SC-Aufruf(zP1m2)", (("Die Ausbringungstechnik " + koopData1) + " wird mit 0,01 Wave gefördert ,allerdings liegt der NO3_30-60 Wert nicht im geförderten Bereich.")), StringEntry(bezKey1, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
43 43                          else [StringEntry("SC-Aufruf(zP1bezP2)", (("Die Ausbringungstechnik " + koopData1) + " wird mit 0,01 Wave gefördert, die Prämie für den NO3_30-60 Wert wurde bereits bezahlt")), StringEntry(bezKey1, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
44 44                      else if ((bez2 != "Prämie wurde gezahlt"))
45 45                          then if ((lwData2 == koopData2))
46 46                              then [StringEntry("SC-Aufruf(m1zP2)", (("Leider wird ihre Ausbringungstechnik aktuell nicht gefördert, dennoch werden NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert")), StringEntry(bezKey2, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
47 47                              else [StringEntry("n1n2", "Leider wird keine der durchgeführten Maßnahmen von ihrer Kooperation gefördert")]
48 48                          else [StringEntry("n1bez2", "Leider wird ihre Ausbringungstechnik aktuell nicht gefördert, die Prämie für den NO3_30-60 Wert wurde bereits bezahlt.")]
49 49                  else if ((bez2 != "Prämie wurde gezahlt"))
50 50                      then if ((getIntegerValue(lwAdresse, searchKey2) >= getIntegerValue(koopAdresse, searchKey2)))
51 -                         then [StringEntry("SC-Aufruf(bezP1zP2)", (("Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert.")), StringEntry(makeString([toString(lwAdresse), searchKey2], "_"), "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
51 +                         then [StringEntry("SC-Aufruf(bezP1zP2)", (("Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert.")), StringEntry(bezKey2, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
52 52                          else [StringEntry("bez1n2", "Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, und leider liegt der NO3_30-60 Wert nicht im geförderten Bereich.")]
53 53                      else [StringEntry("schonBez", "Alle geförderten Maßnahmen wurden bereits ausgezahlt")]
54 54              else [StringEntry("LWunbekannt", "Fehler: Bitte wenden sie sich an die zugehörige Kooperation")]
55 55          else [StringEntry("falscheKoop", "Fehler: Leider wurde nicht die zugehoerige Kooperation ausgewählt")]
56 56      }
57 57  
58 58  
59 59  @Verifier(tx)
60 60  func verify () = match tx {
61 61      case _: DataTransaction => 
62 62          true
63 63      case _: SetScriptTransaction => 
64 64          true
65 65      case _ => 
66 66          true
67 67  }
68 68

Old	New		Differences
48	48		else [StringEntry("n1bez2", "Leider wird ihre Ausbringungstechnik aktuell nicht gefördert, die Prämie für den NO3_30-60 Wert wurde bereits bezahlt.")]
49	49		else if ((bez2 != "Prämie wurde gezahlt"))
50	50		then if ((getIntegerValue(lwAdresse, searchKey2) >= getIntegerValue(koopAdresse, searchKey2)))
51		-	then [StringEntry("SC-Aufruf(bezP1zP2)", (("Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert.")), StringEntry(~~makeString([toString(lwAdresse), searchKey2], "_")~~, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
	51	+	then [StringEntry("SC-Aufruf(bezP1zP2)", (("Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert.")), StringEntry(bezKey2, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
52	52		else [StringEntry("bez1n2", "Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, und leider liegt der NO3_30-60 Wert nicht im geförderten Bereich.")]
53	53		else [StringEntry("schonBez", "Alle geförderten Maßnahmen wurden bereits ausgezahlt")]
54	54		else [StringEntry("LWunbekannt", "Fehler: Bitte wenden sie sich an die zugehörige Kooperation")]

Old	New		Differences
1	1		{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		func getData (adr,key) = {
5	5		let data = match getString(adr, key) {
6	6		case a: String =>
7	7		a
8	8		case _ =>
9	9		""
10	10		}
11	11		data
12	12		}
13	13
14	14
15	15		@Callable(i)
16	16		func KoopSC () = {
17	17		let lwAdresse = addressFromPublicKey(i.callerPublicKey)
18	18		let koopAdresse = addressFromPublicKey(base58'GbnrZCzPFcuJG3qQkSimJedC5c9zbZLzmzVp8hkzxe37')
19	19		let dapp = addressFromPublicKey(base58'G6gPQLsHXcXB4mNCeRfD2nra9dBGiPpeXEKYz1oWTzZ1')
20	20		let searchKey1 = "Nmin-Jahr_2019/2020_Ausbringungstechnik-HF-angepasst"
21	21		let searchKey2 = "Nmin-Jahr_2019/2020_NO3_30-60"
22	22		let koopVergleich = "Kooperationsname"
23	23		let lwData1 = getData(lwAdresse, searchKey1)
24	24		let koopData1 = getData(koopAdresse, searchKey1)
25	25		let bezKey1 = makeString([toString(lwAdresse), searchKey1], "_")
26	26		let bez1 = getData(dapp, bezKey1)
27	27		let lwData2 = getData(lwAdresse, searchKey2)
28	28		let koopData2 = getData(koopAdresse, searchKey2)
29	29		let bezKey2 = makeString([toString(lwAdresse), searchKey2], "_")
30	30		let bez2 = getData(dapp, bezKey2)
31	31		let checkLw = getData(lwAdresse, koopVergleich)
32	32		let checkKoop = getData(koopAdresse, koopVergleich)
33	33		let LWadr = "connection_farmer_Farmer1"
34	34		let checkLWadr = getData(koopAdresse, LWadr)
35	35		if ((checkLw == checkKoop))
36	36		then if ((toString(lwAdresse) == checkLWadr))
37	37		then if ((bez1 != "Prämie wurde gezahlt"))
38	38		then if ((lwData1 == koopData1))
39	39		then if ((bez2 != "Prämie wurde gezahlt"))
40	40		then if ((getIntegerValue(lwAdresse, searchKey2) >= getIntegerValue(koopAdresse, searchKey2)))
41	41		then [StringEntry("SC-Aufruf(zP1zP2)", (((("Die Ausbringungstechnik " + koopData1) + " und NO3_30-60 Werte von >= ") + koopData2) + " werden mit jeweils 0,01 Wave gefördert")), StringEntry(bezKey1, "Prämie wurde gezahlt"), StringEntry(bezKey2, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 2000000, i.feeAssetId)]
42	42		else [StringEntry("SC-Aufruf(zP1m2)", (("Die Ausbringungstechnik " + koopData1) + " wird mit 0,01 Wave gefördert ,allerdings liegt der NO3_30-60 Wert nicht im geförderten Bereich.")), StringEntry(bezKey1, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
43	43		else [StringEntry("SC-Aufruf(zP1bezP2)", (("Die Ausbringungstechnik " + koopData1) + " wird mit 0,01 Wave gefördert, die Prämie für den NO3_30-60 Wert wurde bereits bezahlt")), StringEntry(bezKey1, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
44	44		else if ((bez2 != "Prämie wurde gezahlt"))
45	45		then if ((lwData2 == koopData2))
46	46		then [StringEntry("SC-Aufruf(m1zP2)", (("Leider wird ihre Ausbringungstechnik aktuell nicht gefördert, dennoch werden NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert")), StringEntry(bezKey2, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
47	47		else [StringEntry("n1n2", "Leider wird keine der durchgeführten Maßnahmen von ihrer Kooperation gefördert")]
48	48		else [StringEntry("n1bez2", "Leider wird ihre Ausbringungstechnik aktuell nicht gefördert, die Prämie für den NO3_30-60 Wert wurde bereits bezahlt.")]
49	49		else if ((bez2 != "Prämie wurde gezahlt"))
50	50		then if ((getIntegerValue(lwAdresse, searchKey2) >= getIntegerValue(koopAdresse, searchKey2)))
51		-	then [StringEntry("SC-Aufruf(bezP1zP2)", (("Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert.")), StringEntry(~~makeString([toString(lwAdresse), searchKey2], "_")~~, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
	51	+	then [StringEntry("SC-Aufruf(bezP1zP2)", (("Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, NO3_30-60 Werte von >= " + koopData2) + " werden mit 0,01 Wave gefördert.")), StringEntry(bezKey2, "Prämie wurde gezahlt"), ScriptTransfer(lwAdresse, 1000000, i.feeAssetId)]
52	52		else [StringEntry("bez1n2", "Die Prämie für die Ausbringungstechnik wurde bereits bezahlt, und leider liegt der NO3_30-60 Wert nicht im geförderten Bereich.")]
53	53		else [StringEntry("schonBez", "Alle geförderten Maßnahmen wurden bereits ausgezahlt")]
54	54		else [StringEntry("LWunbekannt", "Fehler: Bitte wenden sie sich an die zugehörige Kooperation")]
55	55		else [StringEntry("falscheKoop", "Fehler: Leider wurde nicht die zugehoerige Kooperation ausgewählt")]
56	56		}
57	57
58	58
59	59		@Verifier(tx)
60	60		func verify () = match tx {
61	61		case _: DataTransaction =>
62	62		true
63	63		case _: SetScriptTransaction =>
64	64		true
65	65		case _ =>
66	66		true
67	67		}
68	68

github/deemru/w8io/026f985 
39.44 ms ◑