Daten filebasierend auf CCU2 SD-Karte / USBStick loggen

[Gildo]

Hallo Alchy.

Hab jetzt alle Probleme für diese rund gelöst

Im Urlaub kann man sich so schön stunden lang damit beschäftigen.

Ich schreibe alle Öl verbrauch Zeichenkette einmahl in der Wochen in jeweils eine Text Datei mit Name und Datum beschriftet und lasse sie dann auf meinen Nas in jeweils einen separaten Ordner speichern.

So habe ich einmal in der Woche ein schönes Backup.

Vor allen kann ich jetzt alle Zeichenkette bequem in einer Excel Liste auswerten lassen. Der muss ich nur den Dateipfad von der Text Datei geben und ich habe ein schönes Diagramm von meinem verbrauch.

Schones Silvester an alle

Gildo

[Tobra]

Hallo Alchy.

Hab jetzt alle Probleme für diese rund gelöst

Im Urlaub kann man sich so schön stunden lang damit beschäftigen.

Ich schreibe alle Öl verbrauch Zeichenkette einmahl in der Wochen in jeweils eine Text Datei mit Name und Datum beschriftet und lasse sie dann auf meinen Nas in jeweils einen separaten Ordner speichern.

So habe ich einmal in der Woche ein schönes Backup.

Vor allen kann ich jetzt alle Zeichenkette bequem in einer Excel Liste auswerten lassen. Der muss ich nur den Dateipfad von der Text Datei geben und ich habe ein schönes Diagramm von meinem verbrauch.

Schones Silvester an alle

Gildo

Hallo Gildo, ich bin neu hier und habe mich seit kürzen mit CCU3 beschäftigt, kannst du mir bitte genauer auflisten was ich machen muss damit ich die Datei auf meinen Nas absichern kann und nicht aufs Stick?
Vielen Dank im Voraus
Viele Grüße Tom

PS:natürlich kann jeder darauf antworten der eine Lösung für mich hat

[rlaudor]

Hallo hab mal den Vorschlag aufgenommen und versucht die Variabeln die in einer Favoritenliste angelegt sind in eine CSV Datei zu schreiben.
Und was soll ich sagen es klappt. Dank Eurer Vorarbeit.

Hab die Datei nur umbenant in log2file2.tcl weil ich die log2file.tcl ja scho benutze für einen anderen Export.

Besten dank

Code: Alles auswählen

!Auslesen der Favoritenliste Verbrauch
var FAVS = dom.GetObject("Verbrauch"); !öffnet der Liste die in Klammern angegeben ist
string itemID;
	var cntopen=0;
	foreach(itemID, FAVS.EnumUsedIDs()) {
		var item = dom.GetObject(itemID);   !läd den Namen aus der Favoritenliste
        var itemV = dom.GetObject(itemID).Value(); !läd den wert aus der Favoritenliste
          ! WriteLine (item);         !Test der Namen
          ! WriteLine (itemV);        !Test der Werte
                  string slist = "Fehler";
                  object src = dom.GetObject(itemID);
                  if (src){
                  if (src.TypeName() == "HSSDP") {
                  slist = system.Date("%d.%m.%y,%H:%M")#","#dom.GetObject(((dom.GetObject(src)).Channel())).Name()#","#src.Value();
                  } else {
                  slist = system.Date("%d.%m.%y,%H:%M")#","#src.Name()#","#src.Value().ToString(3)#","#src.ValueUnit() ;
                  }
                   dom.GetObject("CUxD.CUX2801001:1.CMD_EXEC").State("tclsh /usr/local/addons/log2file/log2file2.tcl " # slist);
                  }


		if(item.IsTypeOf(OT_CHANNEL))
		{
			var state=item.DPByHssDP("STATE");
			if(state.Value()<>0)
			{
				cntopen=cntopen+1;
			}
		}
	}
            

[Raspihausfan_1]

Hallo rlaudor,
bei mir läuft das Programm nicht. Was ist als Voraussetzung zusätzlich anzulegen?
Sowohl log2file.tcl ist angelegt (ausfürbar, Speicherort im File) als auch der Speicherort auf dem USB-Stick sind definiert.
Was muss im Mailprogramm E-Mail CCU Programm (Addon) aktiviert sein (Tcl aktivieren, Script auf TCL-Seite)?
Muss für FAVS etwas definiert werden? Das Script lässt sich als solches nicht testen, es gibt kein Ergebnis, aber auch keine Fehler.

[Gildo]

Hallo Zusammen.

Diese Beiträge sind zwar schon etwas Älter aber ich versuche trotzdem mein Glück.

Das ganze Jahr ist mein TCL Skript ohne Probleme gelaufen.
Jetzt musste ich aber feststellen das der TCL nicht mehr ausgeführt wird.

Code: Alles auswählen

#!/bin/tclsh
file mkdir "/var/tmp"
set datum [clock format [clock seconds] -format  {%d.%m.%Y--%H.%M.%S}]
set filename "/var/tmp/Oel-Jahr-$datum.txt"
set args [join $argv " "]
set fileId [open $filename "a+"]
puts -nonewline $fileId $args
close $fileId

Ich habe die Vermutung das es was mit der Größe der erstellten TXT Datei zu tun hat. Sie hat 10 KB mit 314 Zeichenketten Einträgen.

Ab 315 Zeichenketten Eintrag wird auf der CCU2 keine TXT Datei mehr erstellt.

Hat von Euch einer einen Vorschlag oder Idee woran das liegen kann oder wie man es beheben kann?

Grüße an alle
Gildo

[alchy]

Deine TCL ist ja nur die halbe Wahrheit. Den Rest verschweigst du.
Wie sieht das Programm aus und das Script, welches die tcl benutzt?

[EDIT]
Und wenn ich mir den Code anschaue:
Außerdem würde das TCL jedesmal beim Aufruf eine neue Datei zum loggen erstellen.
Das ist so gewünscht?


Alchy

[4_motion]

Hallo an alle,

ich benutze das Script "log2file.tcl" von Alchy seit längerem und es funktioniert super. Vielen Dank Alchy, es ist nicht das einzige Script, welches ich von Dir nutze.
Da sich in der CSV-Datei nun doch einige Daten ansammeln, möchte ich, dass jeden Monat eine neue CSV-Datei mit dem Namen "Jahr-Monat.csv" erstellt wird (z.B. 2021-02.csv). Kann ich das im TCL-Script automatisch machen lassen, indem ich Monat und Jahr aus dem System lese und in den Dateinamen integriere? Wenn ja, wie müsste ich das programmieren?

Liebe Grüße und bleibt gesund

4_motion

[alchy]

Auch dies ist möglich in dem man einfach die TCL Datei anpasst, den Rest so lässt.
Schau dir das [EDIT] im ersten Beitrag an.

Alchy

[4_motion]

@Alchy

sorry, da haben wohl bei mir Hirn und Augen gleichzeitig Pause gemacht. Das habe ich einfach überlesen. Ich probiere es gleich aus.

Danke.

[alchy]

Alles gut mit den Augen. Hab ich ja erst nach deiner Frage reineditiert.

Alchy