Howto - zentrales Push-Nachrichten-Programm zPNP

[dtp]

Gibt es eine Möglichkeit die Medungen auch per All in One Script zuversenden?
Ich nutze dtps Script.

Was meinst du denn konkret mit "All in One Script"? Kannst du mal ein Beispiel verlinken?

Im Grunde genommen kann jedes Skript an das zPNP bzw. zPNS-xx angepasst werden.

[Belei]

Ich meinte das ich deinen AiO Script nutze, hier die ersten beiden Zeilen:

! Servicemeldungen auslesen und senden mittels zPNP
! Version 2.2, Autor: dtp (auf Basis des *allinclusive*-Skripts von Alchy)

Aber der schickt mir aktuell ja "nur" (über zPNP)die Servive Meldungen nicht die Alarm Meldungen.

[dtp]

Nun ja, das All-Inclusive-Skript ist eigentlich auf die Systemvariable 41 beschränkt. Daher nenne ich es auch lieber Servicemeldungen-Skript. Die Alarmmeldungen laufen dagegen über die Systemvariable 40. Dafür sollte dann ein separates Skript erzeugt werden. Damit habe ich mich aber bisher noch nicht beschäftigt.

[stan23]

Ich lasse mir die Alarmmeldungen folgendermaßen schicken:

Code: Alles auswählen

EDIT: von dtp angepasstes Skript in nächsten Beitrag

Es war bei mir bisher aber erst ein Mal im Einsatz, mag sein dass da noch Bugs drin sind.

[dtp]

Hallo Marco,

danke für das Skript. Ich schau mir das noch mal an. Sieht aber auf den ersten Blick schon ganz gut aus.

Kleiner Hinweis:

Code: Alles auswählen

! stan23: "orange" replaced by '#FF9900'

Das ist seit Version 3.x des zPNP nicht mehr nötig, da das automatisch umgewandelt wird. Allerdings wandel ich in "#ffa500" um.

Hab's mal eben auf die Schnelle angepasst, aber selbst noch nicht getestet.

Code: Alles auswählen

! Alarmmeldungen auslesen und senden mittels zPNP
! Version 1.0, Autor: dtp (basierend auf einem Entwurf von stan23)

! Löschen bestätigbarer Kommunikationsstörungen (true = an, false = aus)
boolean autoAckFlag = true;

! Nur im Falle zusätzlicher Servicemitteilungen senden (true = an, false = aus)
boolean addFlag = true;

! Namen der verwendeten Systemvariablen
string svPushText = "CCU SV Push Text"; ! gem. zPNS-xx, obligatorisch
string svPushPrio = "CCU SV Push Prio"; ! gem. zPNS-xx, obligatorisch
string svPushoverSound = "CCU SV Pushover Sound"; ! gem. zPNS-Po, optional
string svPushsaferSound = "CCU SV Pushsafer Sound"; ! gem. zPNS-Ps, optional

! Name des zentralen Push-Nachrichten-Programms
string zPNP = "CCU PRG Push-Nachrichten"; ! obligatorisch

! #####################################################################
! ##### ab hier bitte keine weiteren Einstellungen mehr vornehmen #####
! #####################################################################

! +++++ Deklaration weiterer Variablen +++++
string message; string list = ""; string serviceTmp;
integer valueDiff = 0;

! +++++ Sound für Pushover- bzw. Pushsafer-Nachrichten
if(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svPushoverSound)){(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svPushoverSound)).State("siren");}
if(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svPushsaferSound)){(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svPushsaferSound)).State("25");}

! +++++ Prüfen, ob neue Alarmmeldungen hinzugekommen sind, falls addFlag = true
if(addFlag){valueDiff = dom.GetObject(40).Value() - dom.GetObject(40).LastValue();}
else{valueDiff = 1;}

if(dom.GetObject(ID_SYSTEM_VARIABLES)){
  if(valueDiff > 0){
    foreach(serviceTmp, dom.GetObject(ID_SYSTEM_VARIABLES).EnumIDs()) {
      if(dom.GetObject(serviceTmp).IsTypeOf(OT_ALARMDP) && (dom.GetObject(serviceTmp).AlState() == asOncoming)){
        message = dom.GetObject(serviceTmp).DPInfo();

        ! +++++ Meldungen über bestätigbare Kommunikationsstörungen automatisch löschen +++++
        if(autoAckFlag){dom.GetObject(serviceTmp).AlReceipt();}

        list = list # "\n" # dom.GetObject(serviceTmp).Name() # ": " # message;
      }
    }

    ! +++++ Setzen der Systemvariablen svPushPrio für die Push-Nachricht +++++
    (dom.GetObject(ID_SYSTEM_VARIABLES).Get(svPushPrio)).State(2);

    ! +++++ Erzeugen der Nachricht +++++
    message = "<font color=red>Alarmmeldung!</font>";
    message = message#list;

    ! +++++ zPNP ausführen +++++
    (dom.GetObject(ID_SYSTEM_VARIABLES).Get(svPushText)).State(message);
    (dom.GetObject(ID_PROGRAMS).Get(zPNP)).ProgramExecute();
  }
}

[stan23]

Hi Thorsten,
du kannst es gerne weiterverwenden, in dein Servicemeldungen-Skript integrieren oder separat dazustellen.

Das ist seit Version 3.x des zPNP nicht mehr nötig, da das automatisch umgewandelt wird.

Das war mir entgangen, allerdings bin ich mir nichtmal sicher ob ich auf die V3 umgestiegen bin

[mbhomie007]

Ich lasse mir die Alarmmeldungen folgendermaßen schicken:

Alarmmeldungen_Programm.PNG

Code: Alles auswählen

EDIT: von dtp angepasstes Skript in nächsten Beitrag

Es war bei mir bisher aber erst ein Mal im Einsatz, mag sein dass da noch Bugs drin sind.

Hallo zusammen,

Ich habe das Skript von stan23/dtp getestet, so weit so gut.

Ich habe mir das gleiche Programm zum triggern des zPNP anglegt.

Wenn jetzt z.B. ein Fensterkontakt zweimal hintereinander die Alarmvariable auslöst, bekommt man leider nur die erste Alarmmeldung zugesendet.
Die zweite Alarmauslösung triggert nicht das zPNP-Programm.
Der Zähler der CCU-Alarmmeldungen steigt nicht an. Nur die Anzahl der Auslösungen steigt.
Das zPNP-Programm wird nicht gestarten, obwohl Alarmmelungen "bei Aktualisierung auslösen" ausgewählt ist.

Hat jemand eine Idee, wie man jede Auslösung der Alarmvariable triggern kann?

Grüße Marco

[mbhomie007]

Hallo zusammen,

hier nochmal ein Screenshot.
Kann mir jemand sagen,wie ich das Skript abändern muss um bei jeder Alarmauslösung das Programm zu triggern?

[dtp]

Auf was steht denn bei dir "addFlag" im Skript? Wenn diese lokale Variable auf "true" gesetzt ist, erfolgt eine Meldung nur dann, wenn ein neuer Alarm hinzugekommen ist. Macht bei den Alarmmeldungen vermutlich nicht so viel Sinn. Setze ihn daher mal auf "false".

[mbhomie007]

Auf was steht denn bei dir "addFlag" im Skript? Wenn diese lokale Variable auf "true" gesetzt ist, erfolgt eine Meldung nur dann, wenn ein neuer Alarm hinzugekommen ist. Macht bei den Alarmmeldungen vermutlich nicht so viel Sinn. Setze ihn daher mal auf "false".

Vielen Dank für deinen Beitrag!
Ich habe dies ausprobiert, ohne Erfolg.

Das Programm wird erst gar nicht getriggert, also wird das Skript auch nicht ausgelöst.


"Alarmmeldungen, größer gleich 0, Auslösen bei Aktualisierung" löst nicht das Programm aus, wenn mehrmals eine Alarmmeldung ausgelöst wird.
Der Counter erhöht sich auch nicht oben rechts bei Alarmmeldungen (roter Punkt), nur "Anzahl der Auslösungen" erhöht sich.