{"type":"doc","content":[{"type":"bulletList","content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Einführung in die Makro-Programmierungssprachen (Block1)","type":"text","marks":[{"type":"strong"}]}]},{"type":"bulletList","content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Grundsätzliche Bedienung und Debugging","type":"text"}]}]},{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"INTEGRAL ohne Oberfläche via Skript ausführen (Batch-script)","type":"text"}]}]},{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"INTEGRAL Datenmodell und Objekte","type":"text"}]}]},{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Bearbeiten von Steuerdaten","type":"text"}]}]},{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Laden eines Netzes aus einer Datei oder aus der Datenbank","type":"text"}]}]}]}]},{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Netznutzungsfälle und Auswertung von Ergebnissen (Block 2)","type":"text","marks":[{"type":"strong"}]}]},{"type":"bulletList","content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Bearbeiten von Netzdaten und Netznutzungsfälle","type":"text"}]}]},{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Durchführung von Netzberechnungen und Ergebnis-Auswertung","type":"text"}]}]},{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Lesen/Schreiben/Bearbeiten von Dateien","type":"text"}]}]},{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Einführung zur Programmierung einer Grafischen Benutzerschnittstelle","type":"text"}]}]}]}]},{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Q&A Session","type":"text","marks":[{"type":"strong"}]}]}]}]},{"type":"paragraph"},{"type":"heading","attrs":{"level":1},"content":[{"text":"Einführung in die Makro-Programmierungssprachen (Block1)","type":"text"}]},{"type":"paragraph"},{"type":"heading","attrs":{"level":2},"marks":[{"type":"alignment","attrs":{"align":"center"}}],"content":[{"text":"Grundsätzliche Bedienung und Debugging","type":"text"}]},{"type":"mediaSingle","attrs":{"layout":"center","width":892,"widthType":"pixel"},"content":[{"type":"media","attrs":{"width":667,"alt":"OberflaecheQScintilla.png","id":"3565ba11-d6bd-4f17-94cf-82761091b273","collection":"contentId-482607118","type":"file","height":399}},{"type":"caption","content":[{"text":"Die Oberfläche des Makro-Editors","type":"text"}]}]},{"type":"mediaSingle","attrs":{"layout":"center","width":822,"widthType":"pixel"},"content":[{"type":"media","attrs":{"width":980,"alt":"grafik-20240610-124142.png","id":"cb8f74a7-80e9-4d13-b7bb-4d30ad6ef9af","collection":"contentId-482607118","type":"file","height":658}},{"type":"caption","content":[{"text":"Die Oberfläche des Debuggers","type":"text"}]}]},{"type":"paragraph","marks":[{"type":"alignment","attrs":{"align":"center"}}]},{"type":"heading","attrs":{"level":2},"marks":[{"type":"alignment","attrs":{"align":"center"}}],"content":[{"text":"INTEGRAL ohne Oberfläche via Skript ausführen (Batch-script)","type":"text"}]},{"type":"paragraph","content":[{"text":"Die Beschreibung der Aufruf-Parameter ist in der INTEGRAL-Hilfe in Kapitel ","type":"text"},{"text":"1.4 Batchmodus","type":"text","marks":[{"type":"strong"}]},{"text":" beschrieben.","type":"text"}]},{"type":"mediaSingle","attrs":{"layout":"center","width":822,"widthType":"pixel"},"content":[{"type":"media","attrs":{"width":960,"alt":"grafik-20240610-125340.png","id":"24f9cda2-d7a1-45b7-af88-f949dfc2bcd2","collection":"contentId-482607118","type":"file","height":637}},{"type":"caption","content":[{"text":"Aufruf-Parameter für den Batch-Modus","type":"text"}]}]},{"type":"paragraph","content":[{"text":"Beispiel eines Batch-Aufrufs mit Laden eines Netzes aus einer XML-Datei","type":"text"}]},{"type":"codeBlock","attrs":{"language":"none"},"content":[{"text":"@echo off\nrem Installations-Verzeichnis von Integral\nset integral_pfad=C:/Program Files/FGH/Integral7\nrem Integral-Arbeitsverzeichnis (Speicherort der Script-Log-Datei)\nset arbeitsverzeichnis=D:/Users/cremer/Integral/Schulung_Makros_Anwendertreffen_2024\n\nrem Pfad zum Scriptprojekt und Script\nset script_pfad=D:/Users/cremer/Integral/Schulung_Makros_Anwendertreffen_2024\nrem Name des Scriptprojekts\nset script_projekt=MakroSchulung.jsprj\nrem Name des Scripts\nset script_datei=Berechnungsverfahren.js\nrem Name der auszuführenden Funktion im Script\nset script_startFkt=lastfluss\n\nrem Netz-Datei\nset netz=%integral_pfad%/muster_neu/ks_uebung/ks-a1.xml\nrem Integral im Hintergrund starten und \"Scriptprojekt;Scriptdatei;Funktionsname\" ausführen\n\"%integral_pfad%/integral.exe\" /J=%script_pfad%/%script_projekt%;%script_datei%;%script_startFkt% /F=\"%netz%\" -q\nrem Script-Log ausgeben\ntype \"%arbeitsverzeichnis%/java_script_log.txt\"","type":"text"}]},{"type":"paragraph","marks":[{"type":"alignment","attrs":{"align":"center"}}]},{"type":"heading","attrs":{"level":2},"marks":[{"type":"alignment","attrs":{"align":"center"}}],"content":[{"text":"INTEGRAL Datenmodell und Objekte","type":"text"}]},{"type":"paragraph","content":[{"text":"Eine Übersicht über das INTEGRAL-Datenmodell (insbesondere die Besitz-Hierarchie) finden Sie in der INTEGRAL-Hilfe in Kapitel ","type":"text"},{"text":"17.13.1 Übersicht Datenmodell","type":"text","marks":[{"type":"strong"}]},{"text":".","type":"text"}]},{"type":"paragraph","marks":[{"type":"alignment","attrs":{"align":"center"}}]},{"type":"mediaSingle","attrs":{"layout":"center","width":742,"widthType":"pixel"},"content":[{"type":"media","attrs":{"width":742,"alt":"grafik-20240610-140023.png","id":"5c99559a-8dc1-48e2-bc5f-de1c5c04d0ee","collection":"contentId-482607118","type":"file","height":1060}},{"type":"caption","content":[{"text":"Übersicht INTEGRAL-Datenmodell","type":"text"}]}]},{"type":"paragraph","content":[{"text":"Eine Übersicht der Ableitungs-Hierarchie der Objekt-Klassen wird in Kapitel ","type":"text"},{"text":"17.13.2 Klassenhierarchie","type":"text","marks":[{"type":"strong"}]},{"text":" gegeben. Die folgenden Kapitel geben detaillierte Informationen zu den einzelnen Objekt-Klassen.","type":"text"}]},{"type":"paragraph","marks":[{"type":"alignment","attrs":{"align":"center"}}]},{"type":"mediaSingle","attrs":{"layout":"center","width":598,"widthType":"pixel"},"content":[{"type":"media","attrs":{"width":598,"alt":"grafik-20240610-140408.png","id":"e9717b26-92b0-4c73-b52f-02ac2f257503","collection":"contentId-482607118","type":"file","height":684}},{"type":"caption","content":[{"text":"Auszug aus der Ableitungs-Hierarchie","type":"text"}]}]},{"type":"paragraph","content":[{"text":"Beispiel-Makros zur Suche von Netzobjekten:","type":"text"}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"function schleifeUeberObjekte()\n{\n //Schleife über alle Standorte\n var Standort;\n for(var i1 = 0; Standort = Netz.gib_standort(i1); ++i1) {\n //Schleife über alle Querzweige\n var Ortszweig;\n for(var i2 = 0; Ortszweig = Standort.gib_ortszweig(i2); ++i2) {\n var Trafo2W = Ortszweig.wandle_in_trafo2w();\n //Prüft ob es sich um einen 2W-Trafo handelt\n if(Trafo2W) {\n //Gibt die Nennspannung des Transformators an\n var ur1 = Trafo2W.gib_ur1();\n var ur2 = Trafo2W.gib_ur2();\n if(ur1>ur2) {\n //Ausgabe im Log\n Log.message(\"Der Trafo:\" + Trafo2W.gib_bezeichner() + \" verbindet die Spannungsebenen:\" + ur1 + \"kV mit \" + ur2 + \"kV\");\n }\n else {\n //Ausgabe im Log\n Log.message(\"Der Trafo:\" + Trafo2W.gib_bezeichner() + \" verbindet die Spannungsebenen:\" + ur2 + \"kV mit \" + ur1 + \"kV\");\n }\n }\n }\n }\n}\n\n// Beispiele zur Verwendung von CSuche\n//\n// Es sind mehrere CSuche'n im Netz definierbar und wechselweise benutzbar. Jede CSuche legt sich\n// einen Index an, in dem die Objekte nach den Such-Attributen sortiert sind. Der Index wird beim\n// ersten \"finde\"-Aufruf angelegt. Am Ende des Makro's sollten die verwendeten CSuche'n expizit \n// gelöscht werden (erst dann wird der Speicherplatz des Index freigegeben). \n//\n// Werden Objekte innerhalb des Makro-Laufes eingefügt oder gelöscht, beeinflusst dies den einmal \n// angelegten Index nicht. Dadurch können beim \"finde\"-Aufruf evt. gelöschte Objekte geliefert\n// werden. Ein ähnliches Problem erhält man, wenn man bei Objekten die Attribute ändert, nach denen\n// gesucht wird. In diesem Fall werden die \"finde\"-Aufrufe diese Änderungen nicht berücksichtigen.\n// Der Aufruf \"neu_beginn\" führt dazu, dass der Index aktualisiert wird. \n//\n\n//\n// Beispiel 1 - einfache Suche\n//\n\nfunction einfacheSuche()\n{\n Netz.undocmd_anlegen(\"Einfache Suche\"); // Undo weil im Beispiel auch geändert wird\n\n // es wird nach Einspeisungen gesucht (Generatoren, Netzeinspeisungen etc.)\n var suche = Netz.gib_neue_suche(\"CEinspeisung\");\n \n // die Einspeisungen werden an Hand des Kurznamens identifiziert\n suche.setze_attribut_name(\"Kurzname\");\n // Suchen der Einspeisungen mit dem Kurznamen \"FG1\" - liefern der ersten Einspeisung\n var nobjekt = suche.finde(\"FG1\");\n while (nobjekt) {\n var einsp = nobjekt.wandle_in_einspeisung();\n if (einsp) {\n einsp.setze_p0(100.);\n print(\"Einfache Suche erfolgreich\");\n }\n \n // Wurden weitere Einspeisungen mit dem Kurznamen \"FG1\" gefunden ? \n // (die Suche wird nur beim ersten Mal durchgeführt)\n nobjekt = suche.finde_naechstes(\"FG1\");\n }\n \n // Suche löschen - Resourcen freigeben\n Netz.loesche_suche(suche);\n\n Netz.undocmd_abschliessen();\n}\n\n//\n// Beispiel 2 - komplexe Suche\n//\n\nfunction komplexeSuche()\n{\n Netz.undocmd_anlegen(\"Komplexe Suche\"); // Undo weil im Beispiel auch geändert wird\n \n // es wird nach Einspeisungen gesucht (Generatoren, Netzeinspeisungen etc.)\n var suche = Netz.gib_neue_suche(\"CEinspeisung\");\n\n // Suche wird neu organanisiert - \"true\" auch die zu suchende Attribut-Arten sollen neu definiert werden\n // gesucht wird weiterhin nach Einspeisungen\n suche.neu_beginn(true);\n \n // die Einspeisungen werden an Hand der Kombination aus UKZ und Kurznamen identifiziert\n suche.setze_attribut_name(\"UKZ\");\n suche.setze_attribut_name(\"Kurzname\");\n \n // Suchen der Einspeisungen mit dem UKZ \"\" und dem Kurznamen \"FG2\"\n suche.setze_attribut_wert(\"\",true); // \"true\" = Beginn einer neuen Kombination von Attribut-Werten, nach denen gesucht werden soll\n suche.setze_attribut_wert(\"FG2\",false);\n \n var nobjekt = suche.finde(); // liefern der ersten Einspeisung\n while (nobjekt) {\n var einsp = nobjekt.wandle_in_einspeisung();\n if (einsp) {\n einsp.setze_p0(200.);\n print(\"Komplexe Suche erfolgreich\");\n }\n \n // Wurden weitere Einspeisungen der Kombination aus UKZ \"\" und dem Kurznamen \"FG2\" gefunden ? \n // (die Suche wird nur beim ersten Mal durchgeführt)\n nobjekt = suche.finde_naechstes();\n }\n\n // Suche löschen - Resourcen freigeben\n Netz.loesche_suche(suche);\n \n Netz.undocmd_abschliessen();\n}\n\n//\n// Beispiel 3 - alle Objekte einer bestimmten Objektart finden\n//\n\nfunction sucheAnfangsbuchstaben()\n{\n Netz.undocmd_anlegen(\"Suche Anfang\"); // Undo weil im Beispiel auch geändert wird\n\n // weitere Suche definieren - diesmal Netzeinspeisungen\n var suche = Netz.gib_neue_suche(\"CNetzeinspeisung\");\n // keine Aufrufe von \"suche.setze_attribut_name\" und \"suche.setze_attribut_wert\" !\n // Suche liefert dann alle Netzeinspeisungen\n\n var nobjekt = suche.finde(); // liefern der ersten Netzeinspeisung\n while (nobjekt) {\n var einsp = nobjekt.wandle_in_netzeinspeisung();\n if (einsp) {\n if (einsp.gib_bezeichner().substr(0,2)==\"FG\") {\n Log.message(\"Netzeinspeisung \" + einsp.gib_bezeichner() + \" gefunden\");\n einsp.setze_betrieb(false);\n }\n }\n nobjekt = suche.finde_naechstes(); // liefern der 2. ,3. etc. \n }\n \n // Suche löschen - Resourcen freigeben\n Netz.loesche_suche(suche);\n \n Netz.undocmd_abschliessen();\n}\n","type":"text"}]},{"type":"paragraph"},{"type":"heading","attrs":{"level":2},"marks":[{"type":"alignment","attrs":{"align":"center"}}],"content":[{"text":"Bearbeiten von Steuerdaten","type":"text"}]},{"type":"orderedList","attrs":{"order":1},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Funktion um Steuerdaten zu Schreiben/Lesen","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"//Funktion um \nfunction steuerdaten_bearbeiten() {\n\t//Art von Verfahren der Lastflussberechnung umwandlen\n\tvar steuerDatum = Netz.gib_steuerdatum(\"/Lastflussberechnung/gekoppeltWirkLastfluss\");\n\tvar str = \"Verfahren der Lastflussberechnung: \";\n\tvar umwandeln = \"\";\n\tif (steuerDatum == \"Ja\") {\n\t\tprint(str + \"Gekoppelter Wirk-Blindlastfluss\");\n\t\tumwandeln = \"Nein\";\n\t}\n\telse {\n\t\tprint(str + \"Wirklastfluss\");\n\t\tumwandeln = \"Ja\";\n\t}\n\tvar result = Netz.lastfluss(0);\n\tNetz.setze_steuerdatum(\"/Lastflussberechnung/gekoppeltWirkLastfluss\", umwandeln);\n\tNetz.steuerdaten_speichern();\n}","type":"text"}]},{"type":"orderedList","attrs":{"order":2},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Steuerdaten exportieren","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"function steuerdaten_exortieren() {\n\t// alle Steuerdaten exportieren\n Netz.exportiere_steuervariablen(\"SD_Exp.dat\", \"false\", \"\", false);\n // Lastfluss Steuerdaten exportieren\n\tNetz.exportiere_steuervariablen(\"SD_Exp_Lastfluss.dat\", \"true\", \"/Last\", false);\n\tprint('Steuerdaten exportiert!');\n}\n","type":"text"}]},{"type":"orderedList","attrs":{"order":3},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Funktion um Steuerdaten aus einer Datei zu importieren","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"function steuerdaten_importieren() {\n\t// Steuerdatei auswählen\n\tvar datei = FileDialog.getOpenFileName(\"*.dat\");\n\tif (datei != null) {\n\t\tvar steuerDaten = Netz.importiere_steuervariablen(datei);\n\t\tvar steuerDatum = Netz.gib_steuerdatum(\"/Lastflussberechnung/gekoppeltWirkLastfluss\");\n\t\tvar str = \"Verfahren der Lastflussberechnung: \";\n\t\tif (steuerDatum == \"Ja\") {\n\t\t\tprint(str + \"Gekoppelter Wirk-Blindlastfluss\");\n\t\t}\n\t\telse {\n\t\t\tprint(str + \"Wirklastfluss\");\n\t\t}\n\t\tvar result = Netz.lastfluss(0);\n\t}\n\telse {\n\t\tprint('keine Steuer-Datei ausgewaehlt!');\n\t}\n}","type":"text"}]},{"type":"heading","attrs":{"level":2},"marks":[{"type":"alignment","attrs":{"align":"center"}}],"content":[{"text":"Laden eines Netzes aus einer Datei oder aus der Datenbank","type":"text"}]},{"type":"paragraph","content":[{"text":"Eine Übersicht aller verfügbaren Funktionen finden Sie unter den Kapiteln: ","type":"text"},{"text":"17.13.180 CProjekte","type":"text","marks":[{"type":"strong"}]},{"text":" & ","type":"text"},{"text":"17.13.179 CProjekt","type":"text","marks":[{"type":"strong"}]}]},{"type":"orderedList","attrs":{"order":1},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Funktion um ein INTEGRAL Datenbank-Projekt aus Datenbank zu laden","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"//Verbindungsdaten\nvar db_server = \"localhost\"; //Adresse des Datenbank-Servers\nvar db_port = 3306; //Port des Datenbank-Servers\nvar db_user = \"Makroschulung\"; //Datenbankbenutzername\nvar db_password = \"MS2024_bay\"; //Integral-Passwort des Datenbanknutzers\nvar db_name = \"aintegraldb_00033\"; //Datenbankname des Projekts\n//Projekt mit hartkodierte-Verbingunsdaten laden\nfunction projekt_laden()\n{\n //Prüfen ob Verbindungsdaten OK\n var istOnline = Projekte.teste_db_verbindung(db_server, db_user, db_password, db_port);\n \n //Nur weiter wenn Verbindungsdaten OK\n if (istOnline){\n \n //Projekt muss ggf. aktualisiert werden\n var istAktuell = Projekte.aktualisiere_projekt(db_name, db_server, db_user, db_password, db_port);\n \n //Nur weiter wenn Projekt aktuell ist\n if(istAktuell){\n \n //Datenbank-Projekt laden\n var prj = Projekte.lade_db_projekt(db_name, db_server, db_user, db_password, db_port);\n var namen;\n \n //Nur weiter wenn Projekt geladen wurde\n if(prj) { \n //Vorhandene Varianten auslesen\n namen = prj.gib_varianten_namen();\n if(namen && namen.length) {\n //erste Variante laden\n prj.lade_variante(namen[0]);\n //Ausgabe auf Konsole\n print(\"Projekt wurde geladen, aktuelle Variante: \" + namen[0]);\n }\n }else{\n //Fehlermeldung\n print (\"Fehler: '\"+ db_name +\"' konnte nicht geladen werden.\")\n }\n }else{\n //Fehlermeldung\n print (\"Fehler: '\"+ db_name +\"' konnte nicht aktualisiert werden.\")\n } \n }else{\n //Fehlermeldung\n print (\"Fehler: Verbindung zu '\"+ db_server +\"' konnte nicht hergestellt werden.\")\n } \n}\n\n/* Alternaitv, den Nutzer die Möglichkeit geben, ein Projekt auszuwählen und zu laden, inkl. Datenbank Verbindung-Dialog*/\nfunction projekt_auswahl_aus_dbmngr() {\n var projekt = Projekte.db_projekt_auswahl();\n return projekt;\n}","type":"text"}]},{"type":"orderedList","attrs":{"order":2},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Funktion um ein Netz (Beispiel hier eine XML Datei) aus einer Datei zu laden","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"function projekt_laden()\n{\n // zu ladende Datei\n var pfad_meinNetz = FileDialog.getOpenFileName(\"*.xml\");\n //Netzdatei Laden\n var istGeladen = Netz.lese_netz(pfad_meinNetz);\n \n //Nur weiter wenn Verbindungsdaten OK\n if (istGeladen){\n for (var i = 0;ng = Netz.gib_netzgruppe(i);i++) {\n print(\"Netzgruppe gefunden: \" + ng.gib_bezeichner());\n }\n }else{\n //Fehlermeldung\n print (\"Fehler: Netz '\"+ pfad_meinNetz +\"' konnte nicht geladen werden.\")\n } \n}","type":"text"}]},{"type":"heading","attrs":{"level":1},"content":[{"text":"Netznutzungsfälle und Auswertung von Ergebnissen (Block 2)","type":"text"}]},{"type":"paragraph","marks":[{"type":"alignment","attrs":{"align":"center"}}]},{"type":"heading","attrs":{"level":2},"marks":[{"type":"alignment","attrs":{"align":"center"}}],"content":[{"text":"Bearbeiten von Netzdaten und Netznutzungsfälle","type":"text"}]},{"type":"paragraph","content":[{"text":"Eine Übersicht aller verfügbaren Funktionen finden Sie unter den Kapiteln: 1","type":"text"},{"text":"7.13.147 CNetznutzungsfall","type":"text","marks":[{"type":"strong"}]},{"text":" & ","type":"text"},{"text":"17.13.148 CNetznutzungsfallGruppe","type":"text","marks":[{"type":"strong"}]}]},{"type":"orderedList","attrs":{"order":1},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Beispiel-Makro zur Verwaltung von Netznutzungsfällen","type":"text"}]}]}]},{"type":"codeBlock","content":[{"text":"/* -----------------------------------------------\n Beispielmakro zur Verwaltung von Netznutzungsfällen\n \n Damit eine Zeitreihenrechnung in der Oberfläche durchgeführt werden kann,\n muss zunächst ein NTC-Beobachtungsbereich vorhanden sein, den man einem\n Ergebnismonitor zuweist. Die ist auch bei einem Start der Berechnung über Makro so.\n \n Dieses Makro legt zuerst einen NTC-Beobachtungsbereich an. Anschließend wird ein Ergebnismonitor angelegt,\n dem dieser NTC-Beobachtungsbeeich zugewiesen wird.\n \n Wenn es im Netz noch keine Netznutzungsfallgruppe gibt, wird eine neue angelegt \n und es werden drei Netznutzungsfälle erstellt.\n \n Anschließend werden in den Netznutzungsfällen Änderungen vorgenommen.\n \n Zum Schluss wird für die Netznutzungsfälle eine Grundlastfluss-Berechnung durchgeführt.\n----------------------------------------------- */\n\nfunction netznutzungverwaltung() {\n\tvar nil; // Undefinierte Variable als NULL-Pointer\n \n // Die Log-Fenster in INTEGRAL leeren.\n\tLog.clear();\n \n // Gegebenenfalls einen NTC-Beobachtungsbereich erstellen \n\tvar ntcMonitor = Netz.gib_ntcmonitor(0); // Suche nach den ersten NTCMonitor\n\tif (!ntcMonitor) {\n\t\tNetz.undocmd_anlegen(\"NTC-Monitor anlegen\");\n\t\tvar nobj = Netz.erzeuge_netzobjekt(\"CNTCMonitor\");\n ntcMonitor = nobj.wandle_in_ntcmonitor();\n ntcMonitor.setze_bezeichner(\"NTC-Monitor\");\n ntcMonitor.ergaenze_ntcmonnetzgruppe(Netz.gib_netzgruppe(\"NG 110KV BLAU\"));\n\t\tNetz.undocmd_abschliessen();\n\t}\n\n\t// Ergebnis Monitor anlegen\n\tergmonitor_anlegen(); // Bezeichner: 'ErgMon' wird angelegt\n\tNetz.setze_ergmonitor_nnf_str(\"ErgMon\");\n\n //Pruefen ob ErgebnisMonitor gefunden werden konnte\n\tvar ergMon = Netz.gib_ergmonitor_nnf();\n\tif (!ergMon) {\n\t\tLog.error(\"kein ErgebnisMonitor definiert!\");\n\t\tprint(\"kein ErgebnisMonitor definiert!\");\n\t\treturn ;\n\t}\n\n //Gibt es bereits eine Netznutzungsfallgruppe?\n\tvar nnfg = Netz.gib_netznutzungsfallgruppe(0); // die erste NNFGruppe suchen\n\t\n //Wenn nein, dann neue NNF Gruppe anlegen\n if (!nnfg) {\n\t\tnnfanlegen(nnfg);\n\t}\n \n //Erste NNF Gruppe auswählen\n\tnnfg = Netz.gib_netznutzungsfallgruppe(0);\n \n //Netznutzungsfall Gruppe aktivieren\n\tNetz.setze_akt_netznutzungsfallgruppe(nnfg);\n\tLog.message(\"NNFGruppe: \" + nnfg.gib_bezeichner());\n \n //NNFs in NNF Gruppe holen\n\tvar faelle = nnfg.gib_netznutzungsfaelle();\n\tvar anz = faelle.length;\n \n //Gibt es NNF?\n\tif (anz == 0) {\n\t\tLog.warning(\"NNFGruppe: \" + nnfg.gib_bezeichner() + \" enthaelt keine Netznutzungsfaelle\");\n\t\tprint('keine Netznutzungsfaelle definiert!');\n\t\treturn ;\n\t}\n \n //Über die Liste der NNF iterieren\n\tvar i = 0;\n\tfor (var j = 0; i< anz; ++j) {\n // Die Liste der Netznutzungsfälle ist ein zweidimensionales Array mit zwei Spalten\n // Jede Zeile entspricht einem Netznutzungsfall\n // Die 1. Spalte [Index 0] enthält den Namen des Netznutzungsfalls\n // Die 2. Spalte [Index 1] enthält die Datenbank-ID des Netznutzungsfalls\n // Die Datenbank-ID wird zum Laden des Netznutzungsfalls benötigt\n\t\tLog.message(\"Bezeichner NNF:\" + faelle[i][0]);\n\t\tLog.message(\"ID NNF:\" + faelle[i][1]);\n\t\tvar nnf = nnfg.gib_netznutzungsfall(faelle[i][1]);\n\t\tif (!nnf) {\n\t\t\tLog.warning(\"nnf nicht gefunden\");\n\t\t} else {\n //aktiviert den ausgewaehlten NNF\n\t\t\tnnfg.setze_akt_netznutzungsfall(nnf);\n\t\t\t// Solange der Netznutzungsfall gesetzt ist, wird auf Werte\n\t\t\t// des Netznutzungsfalls zugegriffen - hat eine Variable keinen\n\t\t\t// \"Netznutzungsfall-Wert\" wird nach wie vor der Netzwert verwendet\n\n\t\t\t// Einspeisung Suche: Leistungsaenderung durchfuehren\n\t\t\tvar suche = Netz.gib_neue_suche(\"CEinspeisung\"); {\n\t\t\t\t// die Einspeisungen werden an Hand des Kurznamens identifiziert\n\t\t\t\tsuche.setze_attribut_name(\"Kurzname\");\n\t\t\t\t// Suchen der Einspeisungen mit dem Kurznamen \"FG1\" - liefern der ersten Einspeisung\n\t\t\t\tvar nobjekt = suche.finde(\"FG1\");\n\t\t\t\twhile (nobjekt) {\n\t\t\t\t\tvar einsp = nobjekt.wandle_in_einspeisung();\n //P in NNF i an einsp anpassen\n\t\t\t\t\tif (einsp) {\n\t\t\t\t\t\tNetz.undocmd_anlegen(\"P aendern\");\n\t\t\t\t\t\teinsp.setze_p0(einsp.gib_p0() + 10.* (i + 1));\n\t\t\t\t\t\tNetz.undocmd_abschliessen();\n\t\t\t\t\t}\n\t\t\t\t\t// wurden weitere Einspeisungen mit dem Kurznamen \"FG1\" gefunden?\n\t\t\t\t\t// (die eigentliche Suche wurde bereits beim ersten Mal durchgeführt\n\t\t\t\t\t// - hier wird auf schon gefundene Objekte zugegriffen)\n\t\t\t\t\tnobjekt = suche.finde_naechstes(\"FG1\");\n\t\t\t\t}\n\t\t\t}\n\t\t}\n\t\ti = i + 1;\n\t}\n\tNetz.projekt_speichern();\n\t// solgange alle Aenderungen gepeichert sind, kann\n\t// man Netznutzugnsfaelle wieder entladen\n\tnnfg.cache(); // alle Netznutzungsfaelle entladen\n\t// Rueksetzen des Netznutzungsfalls\n\tnnfg.setze_akt_netznutzungsfall(nil);\n\tFghSystem.aktualisiere_status_leiste();\n\n\t// Netznutzungsfallberechnung (Grundlastfluss)\n\ttest_nnf_glfberechnung();\n}\n\n\nfunction test_nnf_glfberechnung() {\n\t// Berechnung einer Auswahl von Netznutzungsfaellen\n\tNetz.setze_berechnungsverfahren(\"Grundlastfluss\");\n\tNetz.setze_ergmonitor_nnf_str(\"ErgMon\");\n //NNFG auswaehlen\n\tvar nnfg = Netz.gib_netznutzungsfallgruppe(0);\n\tif (nnfg) {\n\t\tNetz.setze_akt_netznutzungsfallgruppe(nnfg);\n //NNF abholen\n\t\tvar faelle = nnfg.gib_netznutzungsfaelle();\n\t\tvar anz = faelle.length;\n\t\tvar i = 0;\n\t\tvar anz_berech = 100;\n\t\tvar zu_berechnen = []\n //alle zu berechnenden NNF in einer Liste speichern\n\t\tfor (var i = 0; i< anz && i< anz_berech; ++i) {\n // Die Liste der Netznutzungsfälle ist ein zweidimensionales Array mit zwei Spalten\n // Jede Zeile entspricht einem Netznutzungsfall\n // Die 1. Spalte [Index 0] enthält den Namen des Netznutzungsfalls\n // Die 2. Spalte [Index 1] enthält die Datenbank-ID des Netznutzungsfalls\n // Die Datenbank-ID wird zum Laden des Netznutzungsfalls benötigt\n\t\t\tzu_berechnen.push(faelle[i][1]);\n\t\t}\n //zu berechnende NNF gemaess Liste abarbeiten\n\t\tNetz.berechne_netznutzungsfaelle(zu_berechnen);\n\t}\n}\n\n// Legt einen Ergebnismonitor an\nfunction ergmonitor_anlegen() {\n\tvar ntc_mon = Netz.gib_ntcmonitor(0);\n\tif (!ntc_mon) {\n\t\terror(\"Beobachtungsbereich: es wurde kein NTC-Monitor definiert\");\n\t\treturn ;\n\t}\n\n var nnfErgMonStr = Netz.gib_ergmonitor_nnf_str();\n if (nnfErgMonStr == \"ErgMon\") // die ErgebnisMonitor mit dem Bezeichner ErgMon existiert schon\n {\n\t \tvar ergmon = Netz.gib_ergmonitor_nnf().wandle_in_ergmonitor();\n\t if (!ergmon) {\n\t\t error(\"ErgebnisMonitor wurde nicht gefunden!\");\n\t\t return ;\n\t }\n\t}\n else {\n // ErgebnisMonitor wird angelegt\n\t\tNetz.undocmd_anlegen(\"ErgmonKonfig\");\n\t\tvar ergmon = Netz.erzeuge_netzobjekt(\"CErgMonitor\").wandle_in_ergmonitor();\n\t\tif (!ergmon) {\n\t\t\terror(\"ErgebnisMonitor wurde nicht erzeugt!\");\n\t\t\treturn ;\n\t\t}\n\n\t\tergmon.setze_bezeichner(\"ErgMon\");\n\t\tergmon.setze_netzgruppenfilter(ntc_mon);\n\n //Zu beobachtende Variablen zu ErgebnisMonitor hinzufuegen\n\t\t// Leitung\n\t\tvar vars_leitung = ergmon.erzeuge_ergmon_vars(\"CLeitung\");\n\t\tvars_leitung.erzeuge_ergmon_var(\"auslastung\");\n\t\tvars_leitung.erzeuge_ergmon_var(\"wirkfluss_anf\");\n\t\tvars_leitung.erzeuge_ergmon_var(\"wirkfluss_end\");\n\n\n\t\t// Transformator2W\n\t\tvar vars_transformator2w = ergmon.erzeuge_ergmon_vars(\"CTrafo2W\");\n\t\tvars_transformator2w.erzeuge_ergmon_var(\"auslastung\");\n\t\tvars_transformator2w.erzeuge_ergmon_var(\"wirkfluss_anf\");\n\t\tvars_transformator2w.erzeuge_ergmon_var(\"wirkfluss_end\");\n\n\n\t\t// Knoten\n\t\tvar vars_knotenso = ergmon.erzeuge_ergmon_vars(\"CKnotenSO\");\n\t\tvars_knotenso.erzeuge_ergmon_var(\"u\");\n\t\tvars_knotenso.erzeuge_ergmon_var(\"uw\");\n\t\tvars_knotenso.erzeuge_ergmon_var(\"typ\");\n\t\tNetz.undocmd_abschliessen();\n\t}\n}\n\n//Neue NNF anlegen\nfunction nnfanlegen(nnfg) {\n //Gibt es bereits eine NNF Gruppe\n\tif (!nnfg) {\n //wenn nicht dann neue erzeugen\n\t Netz.undocmd_anlegen(\"NNFG anlegen\");\n\t\tnnfg = Netz.erzeuge_netzobjekt(\"CNetznutzungsfallGruppe\").wandle_in_netznutzungsfallgruppe();\n\t\tnnfg.setze_bezeichner(\"NNFG\");\n Netz.undocmd_abschliessen();\n Netz.projekt_speichern();\n\t\tif (!nnfg) {\n\t\t\tLog.error('keine Netznutzungsfallgruppe definiert');\n\t\t\tprint('keine Netznutzungsfallgruppe definiert');\n\t\t\treturn ;\n\t\t}\n else\n {\n Log.message(\"Verwende NNFG mit dem Bezeichner \" + nnfg.gib_bezeichner());\n }\n\t}\n else\n {\n Log.message(\"Verwende NNFG mit dem Bezeichner \" + nnfg.gib_bezeichner());\n }\n\n Netz.setze_akt_netznutzungsfallgruppe(nnfg);\n\n //In aktueller NNF Gruppe neue NNF erzeugen\n Netz.undocmd_anlegen(\"NNFs anlegen\");\n\tvar anz = 3; //Es sollen drei NNF erzeugt werden\n\tfor (var j = 0; j< anz; ++j) {\n\t\tvar nnf = Netz.erzeuge_netzobjekt(\"CNetznutzungsfall\").wandle_in_netznutzungsfall(); //Neue NNF erzeugen\n\t\tif (nnf) {\n //Neue NNF parametieren\n nnf.setze_netznutzungsfallgruppe(nnfg);\n\t\t\tvar bezeichner = (j+1).toString();\n\t\t\tnnf.setze_bezeichner(bezeichner);\n Log.message(\"NNF mit dem Bezeichner \" + nnf.gib_bezeichner() + \" erstellt\");\n // nnfg.ergaenze_netznutzungsfall(nnf);\n\t\t}\n\t}\n \n\tNetz.undocmd_abschliessen();\n Netz.projekt_speichern();\n}","type":"text"}]},{"type":"orderedList","attrs":{"order":1},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Beispielmakro zum Durchführen einer Netznutzungsfallberechnung","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"/* -----------------------------------------------\n Beispielmakro zum Durchführen einer Zeitreihenrechnung\n Es wird eine Text-Datei eingelesen, in der steht, welche Netznutuzungsfälle\n gerechnet werden sollen.\n Die erste Zeile beinhaltet den Namen der Netznutzungsfallgruppe, die weiteren\n Zeilen beinhalten die Namen der zu berechnenden Netznutzungsfälle\n Die Funktionalität zum Import der Netznutzungsfälle wurde in eine separate\n Funktion ausgegliedert\n----------------------------------------------- */\nfunction nnfberechnung()\n{\n var nnfdatei = \"C:\\\\Users\\\\ahmed\\\\AppData\\\\Local\\\\Integral\\\\SKRIPTE\\\\Tutorial Makroumgebung\\\\Netznutzungsfalldaten\\\\Netznutzungsfaelle.txt\";\n try {\n // Import der zu berechnenden Netznutzungsfälle\n var zu_berechnen = importiere_nnfs(nnfdatei);\n Netz.setze_berechnungsverfahren(\"Grundlastfluss\");\n Netz.setze_ergmonitor_nnf_str(\"ErgMon\");\n Netz.berechne_netznutzungsfaelle(zu_berechnen);\n }\n catch (e) {\n print(e);\n }\n}\nfunction importiere_nnfs(dateiname)\n{\n // Unterfunktion zum Importieren von NNFs aus einer Datei\n // erste Zeile: Name der Netznutzungsfallgruppe\n // jede weitere Zeile: Namen der zu berechnenden Netznutzungsfälle\n // der Name der Datei wird als Aufrufparameter übergeben \n // Import der NNF-Datei\n var nnf_datei = new File(dateiname);\n nnf_datei.open(File.ReadOnly);\n var zeilen_nnf = nnf_datei.readLines(); // Alle Zeilen der Datei werden in Array abgelegt\n nnf_datei.close();\n var nnfg = 0; // zu berechnende Netznutzungsfallgruppe\n var nnfs_berechnen = []; // zu berechnende Netznutzungsfälle\n var i; // Zählvariable über alle eingelesenen Zeilen\n var nnfs_nnfg = []; // Array mit allen vorhandenen NNF der NNFG; aus denen werden die zu berechnenden NNF ausgewählt\n // Schleife über alle eingelesenen Zeilen\n for (i = 0; i < zeilen_nnf.length; ++i) {\n var zeile = FghSystem.string_stripWhiteSpace(zeilen_nnf[i]); // Zeilenenden abschneiden\n if (i == 0) {\n // Zeile mit der Netznutzungsfallgruppe\n var innfg;\n var tmp_nnfg;\n // Suchen der Netznutzungsfallgruppe mit dem richtigen Namen\n for (innfg = 0; tmp_nnfg = Netz.gib_netznutzungsfallgruppe(innfg); ++innfg) {\n if (tmp_nnfg.gib_bezeichner() == zeile) {\n nnfg = tmp_nnfg;\n break; // Wenn gefunden, kann die Suche abgebrochen werden\n }\n }\n if (nnfg) {\n // Wenn die Netznutzungsfallgruppe gefunden wurde, die enthaltenen Netznutzungsfälle bestimmen\n Netz.setze_akt_netznutzungsfallgruppe(nnfg);\n nnfs_nnfg = nnfg.gib_netznutzungsfaelle();\n } else {\n throw \"Keine Netznutzungsfallgruppe gefunden\";\n }\n } else {\n // Netznutzungsfall mit diesem Namen suchen und in Liste eintragen\n var j;\n var gefunden = false;\n for (j = 0; j < nnfs_nnfg.length; ++j) {\n // Die Liste der Netznutzungsfälle ist ein zweidimensionales Array mit zwei Spalten\n // Jede Zeile entspricht einem Netznutzungsfall\n // Die 1. Spalte [Index 0] enthält den Namen des Netznutzungsfalls\n // Die 2. Spalte [Index 1] enthält die Datenbank-ID des Netznutzungsfalls\n // Die Datenbank-ID wird zum Laden des Netznutzungsfalls benötigt\n if (nnfs_nnfg[j][0] == zeile) {\n nnfs_berechnen.push(nnfs_nnfg[j][1]);\n gefunden = true;\n break;\n }\n }\n if (!gefunden && zeile.length){ // Leere Zeile nicht als Fehler melden\n throw (\"Netznutzungsfall \" + zeile + \" nicht gefunden\");\n }\n }\n }\n if (nnfs_berechnen.length == 0) {\n throw \"Keine Netznutzungsfälle gefunden\";\n }\n return nnfs_berechnen;\n}\n","type":"text"}]},{"type":"orderedList","attrs":{"order":2},"content":[{"type":"listItem","content":[{"type":"paragraph"}]}]},{"type":"heading","attrs":{"level":2},"marks":[{"type":"alignment","attrs":{"align":"center"}}],"content":[{"text":"Durchführung von Netzberechnungen und Ergebnis-Auswertung","type":"text"}]},{"type":"paragraph","content":[{"text":"Beispielmakros zur Durchführung von Lastfluss- und Ausfallberechnungen","type":"text"}]},{"type":"codeBlock","content":[{"text":"function lastfluss()\n{\n // Besondere Werte zur Angabe, dass eine Variable (Netzdaten oder Ergebnisdaten) in INTEGRAL nicht belegt ist\n var dnix= Netz.gib_dnix();\n var inix = Netz.gib_inix();\n \n var returnvalue = Netz.lastfluss(false); //Parameter: Minimale Ausgabe?\n if (returnvalue == 0) {\n // Export von Ergebnistabellen\n Netz.exportiere_erg_tabelle(\"D:\\\\Users\\\\cremer\\\\Integral\\\\Schulung_Makros_Anwendertreffen_2024\\\\Bilanzen_kurz.csv\", \"Bilanzen (kurz)\");\n Netz.exportiere_erg_tabelle(\"D:/Users/cremer/Integral/Schulung_Makros_Anwendertreffen_2024/Bilanzen.csv\", \"Bilanzen\");\n \n \n // Ausgabe aller Leitungen, die zu mehr als 25% ausgelastet sind\n var bzw;\n for (var i1 = 0; bzw = Netz.gib_bzweig3p(i1); ++i1) {\n var ltg = bzw.wandle_in_leitung();\n if (ltg) {\n var i_per_ir = ltg.gib_i_per_ir();\n // Wenn Leitung spannungslos ist, dann wurde keine Auslastung berechnet\n // dann ist i_per_ir == dnix und dnix = 99999999 ist groesser als 25\n if (i_per_ir != dnix && i_per_ir > 25) {\n Log.error(ltg.gib_bezeichner()+\": Auslastung = \"+ i_per_ir +\"%\");\n }\n }\n }\n \n // Ausgabe der Spannung aller Knoten mit Nennspannung 380 kV in der Netzgruppe \"VERBUNDNETZ\"\n var Standort;\n for (var i2 = 0; Standort = Netz.gib_standort(i2); ++i2) {\n var KnotenSO;\n var i3 = 0;\n for (; KnotenSO = Standort.gib_knotenso(i3); ++i3) {\n if (KnotenSO.gib_un() == 380.) {\n var Netzgruppe = KnotenSO.gib_netzgruppe();\n if (Netzgruppe && Netzgruppe.gib_bezeichner() == \"VERBUNDNETZ\") {\n var uerg = KnotenSO.gib_u();\n if (uerg != dnix) {\n Log.error(KnotenSO.gib_schluessel()+\": Spannung = \"+ uerg +\"kV\");\n }\n }\n }\n }\n \n var Schaltanlage;\n for (i3 = 0; Schaltanlage = Standort.gib_schaltanlage(i3); ++i3) {\n var SAAbschnitt;\n for (var i4 = 0; SAAbschnitt = Schaltanlage.gib_saabschnitt(i4); ++i4) {\n var Sammelschiene;\n for (var i5 = 0; Sammelschiene = SAAbschnitt.gib_ssab(i5); ++i5) {\n if (Sammelschiene.gib_un() == 380.) {\n var Netzgruppe = Sammelschiene.gib_netzgruppe();\n if (Netzgruppe && Netzgruppe.gib_bezeichner() == \"VERBUNDNETZ\") {\n var uerg = Sammelschiene.gib_u();\n if (uerg != dnix) {\n Log.error(Sammelschiene.gib_schluessel()+\": Spannung = \"+ uerg +\"kV\");\n }\n }\n }\n }\n }\n }\n }\n } else {\n Log.error(\"Fehler im Grundlastfluss: \" + returnvalue);\n }\n}\n\n//-----------------------------------------------------------\n\nfunction ausfallsimulation()\n{\n Netz.undocmd_anlegen(\"Ausfallrechnung\"); // Warum ist hier UndoCmd notwendig?\n\n // Ausfallsimulation \n var returnvalue = Netz.ausfallsimulation(false);\n\n if (returnvalue == 2) {\n // Fehler im Grundlastfall\n Netz.loesche_ergebnis();\n Log.error(\"Fehler im Grundlastfluss\");\n } else if (returnvalue == 3) {\n // Fehler in einer der Situationen\n Netz.loesche_ergebnis();\n Netz.loesche_ergebnis();\n Log.error(\"Fehler in mindestens einer Ausfallsituation\");\n } else if (returnvalue == 0 || returnvalue == 1) {\n // Alles OK\n \n // Ausgabe der Leitungen, bei denen die max. Auslastung groesser als 60% ist\n var bzw;\n for( var i1 = 0; bzw = Netz.gib_bzweig3p(i1); i1++) {\n var ltg = bzw.wandle_in_leitung();\n if ((ltg) && (ltg.gib_i_per_ir_lfa() > 60)) {\n Log.error(ltg.gib_bezeichner()+\" Auslastung: \"+ltg.gib_i_per_ir_lfa()\n +\"% Teilerg.: \"+ltg.gib_idx_i_per_ir_lfa());\n }\n }\n Netz.loesche_ergebnis();\n Netz.loesche_ergebnis();\n }\n \n Netz.undocmd_abschliessen();\n}","type":"text"}]},{"type":"paragraph","marks":[{"type":"alignment","attrs":{"align":"center"}}]},{"type":"heading","attrs":{"level":2},"marks":[{"type":"alignment","attrs":{"align":"center"}}],"content":[{"text":"Lesen/Schreiben von Dateien","type":"text"}]},{"type":"orderedList","attrs":{"order":1},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Beispielmakros zum Export von Berechnungsergebnissen in Textdateien","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"/* -----------------------------------------------\n Beispielmakro zum Schreiben individuell zusammengesetzter Ergebnisdateien\n \n 1. Lastflussberechnung durchführen\n 2. Ergebnisgrößen im Netz zusammensuchen (über Besitzhierarchie) und in CSV-Datei schreiben\n 3. Ergebnis löschen (um Arbeitsspeicher frei zu geben)\n----------------------------------------------- */\n\nfunction ergebnisse_herausschreiben_1()\n{\n // Definition der Ausgabedatei\n var dateiname_auslastungen = \"D:\\\\Users\\\\cremer\\\\Integral\\\\Schulung_Makros_Anwendertreffen_2024\\\\Tabelle_Auslastungen_1.csv\";\n \n // Ausgabedatei öffnen\n var ausgabedatei = new File(dateiname_auslastungen);\n ausgabedatei.open(File.WriteOnly);\n // Spaltenkopf schreiben\n ausgabedatei.write(\"Objekttyp;Schlüssel;Auslastung\\n\");\n \n //Lastfluss-Berechnung; Parameter: minimale Ausgabe\n var status = Netz.lastfluss(false);\n \n if (status == 0 ) { // Berechnung war erfolgreich\n // Schleife über alle Trafos und Leitungen und deren Auslastungen in Ausgabedatei schreiben\n\n var i,j;\n var streckenzweig;\n // Schleife über alle Leitungen\n for (i = 0; streckenzweig = Netz.gib_streckenzweig(i); ++i) {\n var leitung = streckenzweig.wandle_in_leitung();\n if (leitung) {\n var auslastung = leitung.gib_i_per_imax();\n var schluessel = leitung.gib_schluessel();\n var text = \"CLeitung;\" + schluessel + \";\" + auslastung.toString();\n ausgabedatei.writeLine(text);\n }\n }\n \n var standort;\n // Schleife über alle Standorte\n for (i = 0; standort = Netz.gib_standort(i); ++i) {\n var ortszweig;\n // Schleife über alle 2W-Trafos\n for (j = 0; ortszweig = standort.gib_ortszweig(j); ++j) {\n var trafo2w = ortszweig.wandle_in_trafo2w();\n if (trafo2w) {\n var auslastung = trafo2w.gib_i_per_imax();\n var schluessel = trafo2w.gib_schluessel();\n var text = \"CTrafo2W;\" + schluessel + \";\" + auslastung.toFixed(2); // 2 Nachkommastellen\n ausgabedatei.writeLine(text);\n }\n }\n \n var trafo3w;\n // Schleife über alle 3W-Trafos\n for (j = 0; trafo3w = standort.gib_trafo3w(j); ++j) {\n var trafowicklung = trafo3w.gib_trafowicklung3w1();\n var auslastung = trafowicklung.gib_i_per_imax();\n var schluessel = trafowicklung.gib_schluessel();\n var text = \"CTrafoWicklung3W;\" + schluessel + \";\" + auslastung.toExponential(); // Exponential-Darstellung\n ausgabedatei.writeLine(text);\n\n trafowicklung = trafo3w.gib_trafowicklung3w2();\n auslastung = trafowicklung.gib_i_per_imax();\n schluessel = trafowicklung.gib_schluessel();\n text = \"CTrafoWicklung3W;\" + schluessel + \";\" + auslastung.toExponential(2); // Exponential-Darstellung mit 2 Nachkommastellen\n ausgabedatei.writeLine(text);\n\n trafowicklung = trafo3w.gib_trafowicklung3w3();\n auslastung = trafowicklung.gib_i_per_imax();\n schluessel = trafowicklung.gib_schluessel();\n text = \"CTrafoWicklung3W;\" + schluessel + \";\" + auslastung.toExponential(5); // Exponential-Darstellung mit 5 Nachkommastellen\n ausgabedatei.writeLine(text);\n }\n }\n }\n \n // Ausgabedatei schließen\n ausgabedatei.close();\n \n // Ergebnis löschen\n Netz.loesche_ergebnis();\n}\n\n/* -----------------------------------------------\n Beispielmakro zum Schreiben individuell zusammengesetzter Ergebnisdateien\n \n 1. Lastflussberechnung durchführen\n 2. Ergebnisgrößen im Netz zusammensuchen (über Suche) und in CSV-Datei schreiben\n 3. Ergebnis löschen (um Arbeitsspeicher frei zu geben)\n----------------------------------------------- */\n\nfunction ergebnisse_herausschreiben_2()\n{\n // Definition der Ausgabedatei\n var dateiname_auslastungen = \"D:/Users/cremer/Integral/Schulung_Makros_Anwendertreffen_2024/Tabelle_Auslastungen_2.csv\";\n \n // Ausgabedatei öffnen\n var ausgabedatei = new File(dateiname_auslastungen);\n ausgabedatei.open(File.WriteOnly);\n // Spaltenkopf schreiben\n ausgabedatei.write(\"Objekttyp;Schlüssel;Auslastung\\n\");\n \n //Lastfluss-Berechnung; Parameter: minimale Ausgabe\n var status = Netz.lastfluss(false);\n \n if (status == 0 ) { // Berechnung war erfolgreich\n // Schleife über alle Trafos und Leitungen und deren Auslastungen in Ausgabedatei schreiben\n\n // Schleife über alle Leitungen\n var suche = Netz.gib_neue_suche(\"CLeitung\");\n var nobjekt = 0;\n while(nobjekt = suche.finde_naechstes()) {\n var leitung = nobjekt.wandle_in_leitung();\n if (leitung) {\n var auslastung = leitung.gib_i_per_imax();\n var schluessel = leitung.gib_schluessel();\n var text = \"CLeitung;\" + schluessel + \";\" + auslastung.toFixed(3); // 3 Nachkommastellen\n ausgabedatei.writeLine(text);\n }\n }\n Netz.loesche_suche(suche);\n \n // Schleife über alle 2W-Trafos\n suche = Netz.gib_neue_suche(\"CTrafo2W\");\n nobjekt = 0;\n while(nobjekt = suche.finde_naechstes()) {\n var trafo2w = nobjekt.wandle_in_trafo2w();\n if (trafo2w) {\n var auslastung = trafo2w.gib_i_per_imax();\n var schluessel = trafo2w.gib_schluessel();\n var text = \"CTrafo2W;\" + schluessel + \";\" + auslastung.toFixed(3); // 3 Nachkommastellen\n ausgabedatei.writeLine(text);\n }\n } \n Netz.loesche_suche(suche);\n \n // Schleife über alle Trafowicklungen\n suche = Netz.gib_neue_suche(\"CTrafoWicklung3W\");\n nobjekt = 0;\n while(nobjekt = suche.finde_naechstes()) {\n var trafowicklung = nobjekt.wandle_in_trafowicklung3w();\n if (trafowicklung) {\n var auslastung = trafowicklung.gib_i_per_imax();\n var schluessel = trafowicklung.gib_schluessel();\n var text = \"CTrafoWicklung3W;\" + schluessel + \";\" + auslastung.toFixed(3); // 3 Nachkommastellen\n ausgabedatei.writeLine(text);\n }\n } \n Netz.loesche_suche(suche);\n }\n \n // Ausgabedatei schließen\n ausgabedatei.close();\n \n // Ergebnis löschen\n Netz.loesche_ergebnis();\n}\n","type":"text"}]},{"type":"orderedList","attrs":{"order":2},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Beispielmakros zus zum Import von Betriebsmitteldaten aus einer CSV-Datei","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"/* -----------------------------------------------\n Beispielmakro zum Einlesen von Dateien\n \n 1. Datei öffnen\n 2. Alle Zeilen gleichzeitig einlesen\n 3. Datei schließen\n 4. Zeilen verarbeiten\n----------------------------------------------- */\n\nfunction daten_einlesen_1()\n{\n // Definition der Importdatei\n var dateiname_import = \"D:\\\\Users\\\\cremer\\\\Integral\\\\Schulung_Makros_Anwendertreffen_2024\\\\Tabelle_Igrenz.csv\";\n \n // Importdatei öffnen\n var importdatei = new File(dateiname_import);\n importdatei.open(File.ReadOnly);\n \n // Zeilen einlesen\n var zeilen = importdatei.readLines();\n \n // Ausgabedatei schließen\n importdatei.close();\n \n // Undo-Command anlegen\n Netz.undocmd_anlegen(\"Importiere Igrenz\");\n \n var i;\n // Schleife ueber alle Zeilen\n for (i = 0; i < zeilen.length; ++i) {\n var zeile = FghSystem.string_stripWhiteSpace(zeilen[i]); // Zeilenende abschneiden\n\n // Zeile in einzelne Zellen auftrennen\n var spalten = zeile.split(\";\");\n \n if (i == 0) {\n // Spaltenkopf ueberlesen\n }\n \n if (spalten.length < 3) {\n continue; // Zeile hat zu wenige Einträge\n }\n\n // Inhalt der Zeile auslesen\n var objekttyp = FghSystem.string_stripWhiteSpace(spalten[0]);\n var schluessel = FghSystem.string_stripWhiteSpace(spalten[1]);\n var igrenz = parseFloat(spalten[2]);\n \n // Objekt suchen und Igrenz eintragen, falls es eine Leitung ist\n var suche = Netz.gib_neue_suche(objekttyp);\n suche.setze_attribut_name(\"Schlüssel\");\n suche.setze_attribut_wert(schluessel, false);\n var nobjekt = 0;\n while(nobjekt = suche.finde_naechstes()) {\n var leitung = nobjekt.wandle_in_leitung();\n if (leitung) {\n leitung.setze_igrenz(igrenz);\n }\n } \n Netz.loesche_suche(suche);\n }\n \n // Undo-Command abchließen\n Netz.undocmd_abschliessen();\n}\n\n/* -----------------------------------------------\n Beispielmakro zum Einlesen von Dateien\n \n 1. Datei öffnen\n 2. Zeilen nacheinander einlesen und verarbeiten\n 3. Datei schließen\n----------------------------------------------- */\n\nfunction daten_einlesen_2()\n{\n // Definition der Importdatei\n var dateiname_import = \"D:/Users/cremer/Integral/Schulung_Makros_Anwendertreffen_2024/Tabelle_Igrenz.csv\";\n \n // Importdatei öffnen\n var importdatei = new File(dateiname_import);\n importdatei.open(File.ReadOnly);\n \n // Undo-Command anlegen\n Netz.undocmd_anlegen(\"Importiere Igrenz\");\n \n var i = 0;\n // Schleife ueber alle Zeilen\n while (!importdatei.eof) {\n var zeile = FghSystem.string_stripWhiteSpace(importdatei.readLine()); // Zeilenende abschneiden\n\n // Zeile in einzelne Zellen auftrennen\n var spalten = zeile.split(\";\");\n \n if (i == 0) {\n // Spaltenkopf ueberlesen\n }\n \n if (spalten.length < 3) {\n continue; // Zeile hat zu wenige Einträge\n }\n\n // Inhalt der Zeile auslesen\n var objekttyp = FghSystem.string_stripWhiteSpace(spalten[0]);\n var schluessel = FghSystem.string_stripWhiteSpace(spalten[1]);\n var igrenz = parseFloat(spalten[2]);\n \n // Objekt suchen und Igrenz eintragen, falls es eine Leitung ist\n var suche = Netz.gib_neue_suche(objekttyp);\n suche.setze_attribut_name(\"Schlüssel\");\n suche.setze_attribut_wert(schluessel, false);\n var nobjekt = 0;\n while(nobjekt = suche.finde_naechstes()) {\n var leitung = nobjekt.wandle_in_leitung();\n if (leitung) {\n leitung.setze_igrenz(igrenz);\n }\n } \n Netz.loesche_suche(suche);\n \n ++i; // Zähler hochzählen\n }\n \n // Undo-Command abchließen\n Netz.undocmd_abschliessen();\n\n // Ausgabedatei schließen\n importdatei.close(); \n}\n","type":"text"}]},{"type":"paragraph","content":[{"text":"Importierte CSV-Datei","type":"text"}]},{"type":"codeBlock","content":[{"text":"Objekttyp;Schlüssel;Igrenz\nCLeitung;L-·VL-1·B32 FG1·VL-10001;1001\nCLeitung;L-·VL-2·B32 FG2·VL-20001;1002\nCLeitung;L-·EL000001·GM1 MS1· 0001;1003\nCLeitung;L-·EL000006·GM1 MS5· 0001;1004\nCLeitung;L-·EL000002·MS1 MS2· 0001;1005\nCLeitung;L-·EL000003·MS2 MS3· 0001;1006\nCLeitung;L-·EL000004·MS3 MS4· 0001;1007\nCLeitung;L-·EL000005·MS4 MS5· 0001;1008\n","type":"text"}]},{"type":"paragraph","marks":[{"type":"alignment","attrs":{"align":"center"}}]},{"type":"heading","attrs":{"level":2},"marks":[{"type":"alignment","attrs":{"align":"center"}}],"content":[{"text":"Einführung zur Programmierung einer Grafischen Benutzerschnittstelle","type":"text"}]},{"type":"paragraph","content":[{"text":"Allgemeine Information zur Programmierung einer Grafischen Benutzerschnittstelle finden Sie unter dem Kapitel: ","type":"text"},{"text":"17.12 Extensions","type":"text","marks":[{"type":"strong"}]}]},{"type":"orderedList","attrs":{"order":1},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Beispielmakros zur Erstellung einer Benutzerdefinierten GUI oder ein Dialog","type":"text"}]}]}]},{"type":"codeBlock","content":[{"text":"include.paths.push(\"../global\");\n\n/*vorhandenen wichtige Widgets/Werkzeuge:\n1. Button\n2. CheckBox\n3. ComboBox\n4. DateEdit\n5. Dialog\n6. Dir\n7. FileDialog\n8. GroupBox\n9. LineEdit\n10. MessageBox\n11. NumberEdit\n12. RadioButtom\n13. SpinBox\n14. TextEdit\n15. TimeEdit ....\n*/\n\n//zusätzliche Datei&Ordner Dialoge\n/*\nvar dirname = FileDialog.getExistingDirectory(\"C:\\\\userss\\\\no_save\\\\testnetz\",\"Arbeitsverzeichnis ausw?hlen\");\nif (dirname != \"undefined\") {\n Log.message(\"Dir: \"+dirname);\n}\nvar filename = FileDialog.getOpenFileName(\"Netze (*.xml;*.dtf;*.uct)\",\"Eingabe-File ausw?hlen\");\nif (filename != \"undefined\") {\n Log.message(\"File: \"+filename);\n}\n \nvar savename = FileDialog.getSaveFileName(\"Netze (*.xml;*.dtf;*.uct)\",\"Ausgabe-File angeben\");\nif (savename != \"undefined\") {\n Log.message(\"File: \"+savename);\n}\n \nvar filenames = FileDialog.getOpenFileNames(\"C:\\\\userss\\\\no_save\\\\testnetz\",\"Netze (*.xml;*.dtf;*.uct)\",\"Netze ausw?hlen\");\nif (filenames != \"undefined\") {\n Log.message(\"File: \"+filenames[0]);\n}\n*/\n\nfunction dialoge() {\n Log.clear();\n Log.message(\"Work\");\n\n var dialog = new Dialog;\n dialog.okButtonText = \"OK\";\n dialog.cancelButtonText = \"Abbruch\";\n\n var dateedit = new DateEdit;\n\n var heute = new Date();\n Log.message(\"Heute: \" + heute);\n var morgen = new Date(\"06/11/2022\"); //mm/dd/yyyy Format\n Log.message(\"Morgen: \" + morgen);\n dateedit.date = new Date(morgen);\n dateedit.order = 0; // 0,1,2 oder 3 (0 -> locale)\n dialog.add(dateedit);\n\n var gruppe = new GroupBox;\n gruppe.title = \"Gruppe\";\n dialog.add(gruppe);\n\n var r1 = new RadioButton;\n r1.text = \"1\";\n gruppe.add(r1);\n\n var r2 = new RadioButton;\n r2.text = \"2\";\n gruppe.add(r2);\n\n gruppe.newColumn();\n\n var r3 = new RadioButton;\n r3.text = \"3\";\n gruppe.add(r3);\n\n var r4 = new RadioButton;\n r4.text = \"4\";\n gruppe.add(r4);\n\n var timeedit = new TimeEdit;\n timeedit.showSeconds = false;\n timeedit.showAMPM = false;\n timeedit.label = \"Startzeit\";\n timeedit.time = \"10:30\";\n dialog.add(timeedit);\n\n\n var nume = new NumberEdit();\n nume.decimals = 1;\n nume.value = 10.9;\n nume.label = \"NumberEdit\";\n nume.toolTip = \"min max\";\n dialog.add(nume);\n debugger;\n\n if (dialog.exec()) {\n // .toString() Converts the date into a string on the ISO 8601 extended format: YYYY-MM-DDTHH:MM:SS.\n Log.message(\"Datum: \" + dateedit.date.toString());\n Log.message(\"Order: \" + dateedit.order);\n }\n Log.message(\"Work - Ende\");\n}\n\n/*Ausgabe einer Warnmeldung oder einer Frage */\nfunction warnmeldung_ausgabe() {\n var antwort = MessageBox.critical(\"Beispiel um eine Fehlermeldung auszugeben\", Button.Ignore, Button.Retry, Button.Abort, \"Fehler\");\n if (antwort == Button.Retry) {\n fertig = false;\n speichern = false;\n Log.message(\"nochmal versuchen\");\n } else if (antwort == Button.Abort) {\n speichern = false;\n Log.message(\"abbrechen\");\n } else {\n Log.message(\"ignorieren\");\n }\n}\n\n","type":"text"}]},{"type":"orderedList","attrs":{"order":2},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Auswahl von beliebige NetzObjekte","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"/***************************************************************************************\n Beispiel: Integral NetzObjekte Auswahl von Typ Netzgruppe\n***************************************************************************************/\nfunction auswahl_bsp() {\n Log.clear();\n var el = new Objektliste;\n el.ergaenze_objekte(\"CNetzgruppe\");\n /** öffnet eine Auswahltabelle und liefert das erste ausgewählte Objekt zurück\n wurde mehr als ein Objekt ausgewählt, so können die anderen Objekte\n mit gib_objekt(anr) geholt werden anr = 0,1,2,... \n (bei anr==0 wird das bereits mit dem oeffne_tabelle-Aufruf gelieferte Objekt geholt)\n */\n var netzgruppen = Auswahltabelle.oeffne_tabelle(el);\n if (!netzgruppen)\n return false;\n Log.message(\"Anzahl der ausgewählten Objekte:\" + netzgruppen.gib_anzahl_elemente());\n var ngIt = 0;\n var ng = Auswahltabelle.gib_netzobjektbasis(ngIt);\n while (ng != null) {\n var ngruppe = ng.wandle_in_netzgruppe();\n if (ngruppe) {\n print(ngruppe.gib_schluessel() + \" gewahlt!\");\n }\n else {\n print('Netzgruppe nicht gefunden');\n }\n ngIt = ngIt + 1;\n ng = Auswahltabelle.gib_netzobjektbasis(ngIt);\n }\n}","type":"text"}]},{"type":"orderedList","attrs":{"order":3},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Arbeiten mit Grafiken (Kapitel ","type":"text"},{"text":"17.3.5 Makroumgebung und die grafische Oberfläche, 17.13.70 CGrafiken, 17.13.69 CGrafik","type":"text","marks":[{"type":"strong"}]},{"text":")","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"/* ============================= Arbeiten auf dem Variantenbaum ==================================*/\n/* ----------- Grafik aktivieren -----------------------------------------------------------------*/\n\n/** Voraussetzung: Es ist ein Netz aktiv.\nEs wird die Grafik mit dem Namen \"Netzschemagrafik\" derjenigen Netzvariante, die dem aktiven Netz zugeordnet ist, aktiviert\n*/\nfunction aktiviere_grafik() {\nGrafiken.aktiviere_grafik(\"Netzschemagrafik\");\n}\n\n/* ----------- Grafik löschen --------------------------------------------------------------------*/\n\n/** Voraussetzung: \nEs ist ein Netz aktiv.\nEs ist eine Grafik mit dem Namen \"Netzschemagrafik\", die zu dem aktiven Netz geh?rt, ge?ffnet.\n\nDie Grafik mit diesem Namen wird geschlossen und aus derjenigen Netzvariante, die dem aktiven Netz zugeordnet ist, entfernt (inkl. abgeleiteten NetzVarianten)\n*/\n\nfunction loesche_grafik() {\nGrafiken.loesche_grafik(\"Netzschemagrafik\");\n}\n/* ----------- Grafik exportieren ----------------------------------------------------------------*/\n\n/** Voraussetzung: \nEs ist ein Netz aktiv.\nEs ist eine Grafik mit dem Namen \"Netzschemagrafik\", die zu dem aktiven Netz geh?rt, ge?ffnet.\n\nDie Grafik mit diesem Namen wird in eine xml-Datei mit dem angegebenen Namen exportiert. \nWichtig ist, dass der Dateiname die korrekte File-Extension besitzt, da bei einem evtl. Import der Datei anhand der Extension entschieden wird, ob eine Grafik eingelesen wird.\n*/\nfunction exportiere_grafik() {\nGrafiken.exportiere_grafik(\"Netzschemagrafik\",\"Netzschemagrafik.nsg\");\n}\n/* ----------- Grafik importieren ----------------------------------------------------------------*/\n\n/** Voraussetzung:\nEs ist ein Netz aktiv.\n\nDie angegebene Datei wird gelesen und es wird eine neue Grafik angelegt, die mit dem Inhalt der Datei initialisiert wird.\nWichtig: Wenn das aktive Netz Urnetz ist, wird die Grafik in jede Netzvariante des Variantenbaums importiert, sonst nur in die Netzvariante, die dem aktiven Netz zugeordnet ist.\n*/ \n\nfunction importiere_grafik() {\nGrafiken.importiere_grafik(\"Netzschemagrafik.nsg\");\n}\n/* ----------- Zugriff auf bereits vergebne Namen f?r Grafiken -----------------------------------*/\n\n/** Voraussetzung:\nEs ist ein Netz aktiv.\n\nDie Funktion liefert eine Liste von Strings, die die Namen aller Grafiken der angegebenen Art (1=GEO-Grafik, 2=NetzschemaGrafik) beinhaltet, die in derjenigen Netzvariante, die dem aktiven Netz zugeordnet ist,\nvorhanden sind.\n*/\n\nfunction echo_grafik_namen() {\nvar namen = Grafiken.gib_grafik_namen(1);\n Log.message(namen);\n}\n/* ==================================================== Arbeiten auf einer einzelnen Grafik ======================= */\n/* --------------- markierte Netzobjekte ermitteln ---------------------------------------------------------------- */\n\n/** Voraussetzung:\nEine ge?ffnete Grafik ist aktiv.\n\ngrafik enth?lt diese Grafik, netzobjekte die ObjektList aller NetzObjekte, deren Visualisierung in grafik selektiert ist.\n*/\n\nfunction maske_markierung() {\nvar grafik = Grafiken.gib_akt_grafik();\nvar netzobjekte = grafik.gib_markierte_netzobjekte();\n Maske.oeffne_maske(netzobjekte);\n}\n/* --------------- Netzobjekte einblenden ----------------------------------------------------------------------- */\n\n/** Voraussetzung:\nEs ist ein Netz aktiv.\nDie Grafik \"Netzschemagrafik\" ist ge?ffnet in derjenigen Netzvariante, die dem aktiven Netz zugeordnet ist.\n\nsuccess gibt an, ob das NetzObjekt an den angegebenen Koordinaten eingeblendet werden konnte.\n*/\n\nfunction netzobjekt_einblenden() {\n var grafik = Grafiken.gib_grafik(\"Netzschemagrafik\", true);\n Netz.undocmd_anlegen(\"netzobjekt_einblenden\",1);\n if(grafik) {\n var netzobjekt = Netz.gib_standort(\"A3\");\n var success = grafik.einblenden(45, 33, netzobjekt);\n Log.message(\"NetzObjekt eingeblendet \"+ success);\n }\n else {\n Log.message( \"Grafik Netzschemagrafik ist nicht aktiviert\");\n }\n Netz.undocmd_abschliessen();\n}\n/* --------------- Zugriff auf einzelne Grafikobjekte ---------------------------------------------------------- */\n\n/** Voraussetzung: \nEine ge?ffnete Grafik ist aktiv.\n\nBemerkung: einblenden/ausblenden/ist_sichtbar sind f?r alle grafikobjekte verf?gbar sowie f?r Beschrifter.\n\n*/\n\nfunction beschrifter_ein_ausblenden() {\n Netz.undocmd_anlegen(\"beschrifter_ein_ausblenden\",1);\n var grafik = Grafiken.gib_akt_grafik();\n var netzobjekte = grafik.gib_markierte_netzobjekte();\n var netzobjekt = netzobjekte.gib_netzobjektbasis(0);\n var ngo = grafik.gib_ngobjekt(netzobjekt);\n if(ngo) {\n var netzobjekt_cmp = ngo.gib_netzobjekt();\n var beschrifter = ngo.gib_beschrifter(0);\n if(beschrifter) {\n var isterg = beschrifter.istErgebnisBeschrifter();\n var sichtbar = beschrifter.ist_sichtbar();\n if(sichtbar) {\n beschrifter.ausblenden();\n Log.message(\"wird ausgeblendet\");\n }\n else {\n beschrifter.einblenden();\n Log.message(\"wird eingeblendet\");\n }\n }\n else {\n Log.message(\"Beschrifter nicht vorhanden\");\n }\n }\n else {\n Log.message(\"NetzObjekt wird nicht dargestellt\");\n }\n Netz.undocmd_abschliessen();\n}\n/** Voraussetzung: \nEine ge?ffnete Grafik ist aktiv.\n\nBemerkung: einblenden/ausblenden/ist_sichtbar sind f?r alle grafikobjekte verf?gbar sowie f?r Beschrifter.\nBemerkung: gib_objekt ist speziell f?r FNGTextObjekt implementiert. Die Funktion gib_netzobjekt der Basisklasse kann nicht verwendet werden.\n*/\nfunction fngtextobjekt_ein_ausblenden() {\n Netz.undocmd_anlegen(\"fngtextobjekt_ein_ausblenden\",1);\n var grafik = Grafiken.gib_akt_grafik();\n var grafikobjekt = grafik.gib_grafikobjekt(0);\n if(grafikobjekt) {\n var fngtext = grafikobjekt.wandle_in_fngtextobjekt();\n if(fngtext) {\n var sichtbar = fngtext.ist_sichtbar();\n if(sichtbar) {\n fngtext.ausblenden();\n Log.message(\"wird ausgeblendet\");\n }\n else {\n fngtext.einblenden();\n Log.message(\"wird eingeblendet\");\n }\n var netzobjekt = fngtext.gib_objekt();\n }\n else {\n Log.message(\"GrafikObjekt ist kein Text mit ObjektBezug\");\n }\n}\n Netz.undocmd_abschliessen();\n}","type":"text"}]},{"type":"orderedList","attrs":{"order":4},"content":[{"type":"listItem","content":[{"type":"paragraph","content":[{"text":"Arbeiten mit Netzvarianten (Kapitel ","type":"text"},{"text":"17.13.179 CProjekt","type":"text","marks":[{"type":"strong"}]},{"text":")","type":"text"}]}]}]},{"type":"codeBlock","attrs":{"language":"javascript"},"content":[{"text":"function variante_ops_init() {\n Log.clear();\n Netz.setze_steuerdatum(\"/Logfenster/AutoSchliessen\",\"Ja\");\n var varianten = ['VarQuelle', 'VarZiel', 'VarA', 'VarB', 'VarC'];\n var projekt = gib_projekt();\n if (projekt) {\n /*wenn bereits existieren->loeschen*/\n for (var iVar = 0; iVar < varianten.length; iVar++) {\n if (var_ops_loeschen(projekt, varianten[iVar]))\n print('Variante ' + varianten[iVar] + ' wurde geloescht');\n else {\n print('WARN: Variante ' + varianten[iVar] + ' wurde nicht geloescht');\n }\n }\n var erfolg = true;\n for (var iVar = 0; iVar < varianten.length; iVar++) {\n var variantenr = var_ops_erzeugen(projekt, varianten[iVar]);\n if (variantenr > 0)\n print('Variante ' + varianten[iVar] + ' wurde erzeugt (Variantennummer: ' + variantenr + ')');\n else {\n print('WARN: Variante ' + varianten[iVar] + ' wurde nicht erzeugt');\n }\n }\n\n if (erfolg) {\n var varquelle = varianten[0];\n var varziel = varianten[1];\n var geaendert = var_ops_inhalt_modifizieren(projekt, varquelle);\n geaendert = geaendert & var_ops_inhalt_modifizieren(projekt, varziel);\n if (geaendert) {\n print('Varianten-Inhalt geändert');\n }\n\n var inhaltgeloescht = var_ops_inhalt_loeschen(projekt, varziel);\n if (inhaltgeloescht) {\n print('Inhalt der Variante ' + varziel + ' geloescht');\n }\n else {\n print('Inhalt der Variante ' + varziel + ' NICHT geloescht');\n }\n\n var inhaltkopiert = var_ops_inhalt_kopieren(projekt, varquelle, varziel);\n if (inhaltkopiert) {\n print('Inhalt der Variante ' + varquelle + ' in der Variante ' + varziel + ' kopiert');\n } else {\n print('Inhalt der Variante ' + varquelle + ' in der Variante ' + varziel + ' NICHT kopiert');\n }\n\n var inhaltgeloescht = var_ops_inhalt_loeschen(projekt, varquelle);\n if (inhaltgeloescht) {\n print('Inhalt der Variante ' + varquelle + ' geloescht');\n } else {\n print('Inhalt der Variante ' + varquelle + ' NICHT geloescht');\n }\n }\n\n var verschoben = var_ops_verschieben(projekt, 'VarB', 'VarA');\n verschoben = verschoben && var_ops_verschieben(projekt, 'VarC', 'VarB');\n if (verschoben) {\n print('Verschieben erfolgreich');\n }\n }\n Netz.setze_steuerdatum(\"/Logfenster/AutoSchliessen\",\"Nein\");\n}\n\nfunction var_ops_inhalt_modifizieren(projekt, variante) {\n var ret = projekt.lade_variante(variante);\n var wurdegeaendert = false;\n if (ret) {\n //Grundlastfluss ausfuehren\n Netz.lastfluss(false);\n projekt.hole_schreibberechtigung_projekt();\n Netz.undocmd_anlegen(\"Leitungsdaten aendern\");\n //Starte neue Suche über alle Leitungen und setze_ir wenn Auslastung größer als 75% ist\n var suche = Netz.gib_neue_suche(\"CLeitung\");\n while (nobjekt = suche.finde_naechstes()) {\n var leitung = nobjekt.wandle_in_leitung();\n if (leitung) {\n //Pruefe ob die Auslastung einer Leitung groesser als der zuvor parametierte Wert ist\n var x = leitung.gib_max_auslastung_lfa();\n if (x >= 75) {\n //Wenn die Auslastung groesser als der Schwellwert ist mache eine Ausgabe\n var y = leitung.gib_bezeichner();\n Log.message(\"Leitung \" + y + \" Auslastung:\" + x);\n leitung.setze_ir(leitung.gib_ir() + Math.floor(Math.random() * 100));\n wurdegeaendert = true;\n }\n }\n }\n Netz.undocmd_abschliessen();\n Netz.projekt_speichern();\n ret = projekt.entlade_variante(variante);\n }\n return ret && wurdegeaendert;\n}\n\nfunction var_ops_verschieben(projekt, variante, varvater) {\n return projekt.variante_verschieben(variante, varvater);\n}\n\nfunction var_ops_loeschen(projekt, variante) {\n return projekt.variante_loeschen(variante);\n}\n\nfunction var_ops_erzeugen(projekt, variante) {\n return projekt.variante_erzeugen(variante);\n}\n\nfunction var_ops_inhalt_loeschen(projekt, varname) {\n if (projekt) {\n var ret = projekt.variante_inhalt_loeschen(varname);\n if (ret) {\n return true;\n }\n }\n return false;\n}\n\nfunction var_ops_inhalt_kopieren(projekt, vquelle, vziel) {\n if (projekt) {\n var ret = projekt.variante_inhalt_kopieren(vquelle, vziel);\n if (ret) {\n return true;\n }\n }\n return false;\n}\n\n\n/*Vorischt: alle Varianten werden endgültig gelöscht*/\nfunction alle_varianten_loeschen() {\n var proj = gib_projekt();\n if (proj) {\n var varianten = proj.gib_varianten_namen();\n for (var i = 1; i < varianten.length; i++) {\n proj.variante_loeschen(varianten[i]);\n }\n }\n}\n\n/*Prüft ob ein Datenbank-Projekt bereits aus dem Db-Manager ausgewaehlt wurde ist, wird versucht zu laden\nAnsonsten, wird der Nutzer die Möglichkeit gegebn ein Projekt auszuwählen und zu laden*/\nfunction gib_projekt() {\n debugger;\n var projekt = Projekte.gib_akt_projekt();\n if (!projekt) {\n var lproname = Projekte.gib_projekt_namen();\n if (lproname.length != 0) {\n if (Projekte.aktiviere_projekt(lproname)) {\n projekt = Projekte.gib_akt_projekt();\n }\n }\n else {\n projekt = Projekte.db_projekt_auswahl();\n }\n }\n return projekt;\n}\n","type":"text"}]},{"type":"paragraph"}],"version":1}

Browser not supported