Public Access
Files auf Encoding UTF-8 geändert.
This commit is contained in:
+46
-46
@@ -2,18 +2,18 @@
|
||||
START.scpt - Version 1.4
|
||||
Rolle dieses Scripts
|
||||
--------------------
|
||||
Dieses Script ist der sichtbare Einstiegspunkt fŸr Anwender:innen.
|
||||
Es selbst verschickt keine Belege und fŸhrt auch keine Einrichtung durch,
|
||||
sondern Ÿbernimmt nur zwei Aufgaben:
|
||||
1. PrŸfen, ob relativ zur aktuellen DEVONthink-Auswahl eine Konfigurationsdatei
|
||||
fŸr den Belegversand existiert.
|
||||
Dieses Script ist der sichtbare Einstiegspunkt für Anwender:innen.
|
||||
Es selbst verschickt keine Belege und führt auch keine Einrichtung durch,
|
||||
sondern übernimmt nur zwei Aufgaben:
|
||||
1. Prüfen, ob relativ zur aktuellen DEVONthink-Auswahl eine Konfigurationsdatei
|
||||
für den Belegversand existiert.
|
||||
2. Falls in dieser Konfiguration SHOW_README=true gesetzt ist,
|
||||
einen kurzen Willkommen-/Hinweisdialog anzeigen.
|
||||
3. Danach das Setup-Script _belegversand_setup.scpt starten.
|
||||
Das Setup-Script entscheidet anschlie§end selbst:
|
||||
- ob bereits eine gŸltige Einrichtung vorliegt und direkt das Hauptscript
|
||||
Das Setup-Script entscheidet anschließend selbst:
|
||||
- ob bereits eine gültige Einrichtung vorliegt und direkt das Hauptscript
|
||||
gestartet werden kann,
|
||||
- oder ob zunŠchst die Konfiguration eingerichtet werden muss.
|
||||
- oder ob zunächst die Konfiguration eingerichtet werden muss.
|
||||
Wichtig:
|
||||
--------
|
||||
START.scpt ist bewusst klein gehalten.
|
||||
@@ -31,22 +31,22 @@ property configRecordName : "belegversand.conf"
|
||||
(*
|
||||
runSiblingScript(scriptFileName)
|
||||
--------------------------------
|
||||
LŠdt und startet ein weiteres AppleScript aus dem Unterordner "Helpers/scripts".
|
||||
Lädt und startet ein weiteres AppleScript aus dem Unterordner "Helpers/scripts".
|
||||
Parameter:
|
||||
- scriptFileName : Dateiname des aufzurufenden Scripts, z. B.
|
||||
"_belegversand_setup.scpt"
|
||||
Ablauf:
|
||||
- absolute Basis-Path setzen (Home + fest Pfad zu Belegversand_1-4)
|
||||
- daran den Unterordner "Helpers/scripts" und den Dateinamen anhŠngen
|
||||
- prŸfen, ob die Scriptdatei existiert
|
||||
- daran den Unterordner "Helpers/scripts" und den Dateinamen anhängen
|
||||
- prüfen, ob die Scriptdatei existiert
|
||||
- Script laden
|
||||
- Script ausfŸhren
|
||||
- Script ausführen
|
||||
Fehlerbehandlung:
|
||||
- wenn die Datei nicht gefunden wird -> Hinweisdialog
|
||||
- wenn das Laden oder Starten fehlschlŠgt -> Hinweisdialog mit Fehlermeldung
|
||||
- wenn das Laden oder Starten fehlschlägt -> Hinweisdialog mit Fehlermeldung
|
||||
Wichtig:
|
||||
--------
|
||||
Der absolute Pfad ist invariant und unabhŠngig vom Speicherort dieses Scripts.
|
||||
Der absolute Pfad ist invariant und unabhängig vom Speicherort dieses Scripts.
|
||||
*)
|
||||
on runSiblingScript(scriptFileName)
|
||||
-- Absolute Basis-Path (Home + fest Installation)
|
||||
@@ -76,14 +76,14 @@ Verwendung in START.scpt:
|
||||
Hier wird dieser Handler genutzt, um den Inhalt der Datei
|
||||
"_config/belegversand.conf" als Text einzulesen.
|
||||
Ablauf:
|
||||
- zunŠchst plain text versuchen
|
||||
- wenn das fehlschlŠgt, auf content ausweichen
|
||||
- wenn beides fehlschlŠgt, leeren String zurŸckgeben
|
||||
- zunächst plain text versuchen
|
||||
- wenn das fehlschlägt, auf content ausweichen
|
||||
- wenn beides fehlschlägt, leeren String zurückgeben
|
||||
Hinweis:
|
||||
--------
|
||||
Die Konvertierung erscheint hier als "rich text", weil AppleScript/Script Editor
|
||||
solche Stellen beim Kompilieren teilweise selbststŠndig umschreiben kann.
|
||||
Der funktionale Zweck ist hier aber: Textinhalt lesbar zurŸckgeben.
|
||||
solche Stellen beim Kompilieren teilweise selbstständig umschreiben kann.
|
||||
Der funktionale Zweck ist hier aber: Textinhalt lesbar zurückgeben.
|
||||
*)
|
||||
on recordText(theRecord)
|
||||
tell application id "DNtp"
|
||||
@@ -109,7 +109,7 @@ Sucht innerhalb einer DEVONthink-Gruppe ein direktes Kind mit bestimmtem Namen.
|
||||
Parameter:
|
||||
- parentRecord : die Gruppe, in der gesucht werden soll
|
||||
- childName : Name des gesuchten direkten Kinds
|
||||
RŸckgabe:
|
||||
Rückgabe:
|
||||
- den gefundenen DEVONthink-Record
|
||||
- oder missing value, wenn nichts passt
|
||||
Verwendung in START.scpt:
|
||||
@@ -134,15 +134,15 @@ getTopParentGroup(theRecord)
|
||||
----------------------------
|
||||
Ermittelt die oberste Gruppe einer DEVONthink-Hierarchie ausgehend von einem Record.
|
||||
Ablauf:
|
||||
- starte mit dem aktuell Ÿbergebenen Record
|
||||
- starte mit dem aktuell übergebenen Record
|
||||
- frage wiederholt nach dessen Eltern
|
||||
- solange es noch einen Parent gibt, gehe eine Ebene nach oben
|
||||
- sobald kein Parent mehr vorhanden ist, ist die Wurzel erreicht
|
||||
Verwendung in START.scpt:
|
||||
-------------------------
|
||||
START.scpt kennt die gewŸnschte Datenbank nicht direkt.
|
||||
Darum nimmt es irgendein ausgewŠhltes Objekt in DEVONthink
|
||||
und geht davon Ÿber die Parent-Kette bis zur obersten Gruppe hoch.
|
||||
START.scpt kennt die gewünschte Datenbank nicht direkt.
|
||||
Darum nimmt es irgendein ausgewähltes Objekt in DEVONthink
|
||||
und geht davon über die Parent-Kette bis zur obersten Gruppe hoch.
|
||||
Dort wird dann _config gesucht.
|
||||
Vorteil:
|
||||
--------
|
||||
@@ -167,18 +167,18 @@ end getTopParentGroup
|
||||
(*
|
||||
configValue(configText, keyName)
|
||||
--------------------------------
|
||||
Liest aus einem einfachen key=value-Konfigurationstext den Wert zu einem bestimmten SchlŸssel.
|
||||
Liest aus einem einfachen key=value-Konfigurationstext den Wert zu einem bestimmten Schlüssel.
|
||||
Parameter:
|
||||
- configText : kompletter Textinhalt der Konfigurationsdatei
|
||||
- keyName : gesuchter SchlŸssel, z. B. "SHOW_README"
|
||||
RŸckgabe:
|
||||
- Textwert des gefundenen SchlŸssels
|
||||
- keyName : gesuchter Schlüssel, z. B. "SHOW_README"
|
||||
Rückgabe:
|
||||
- Textwert des gefundenen Schlüssels
|
||||
- oder missing value, wenn kein passender Eintrag existiert
|
||||
Funktionsweise:
|
||||
---------------
|
||||
- zeilenweise durch die Konfiguration gehen
|
||||
- prŸfen, ob eine Zeile mit "KEY=" beginnt
|
||||
- den Teil rechts vom "=" zurŸckgeben
|
||||
- prüfen, ob eine Zeile mit "KEY=" beginnt
|
||||
- den Teil rechts vom "=" zurückgeben
|
||||
*)
|
||||
on configValue(configText, keyName)
|
||||
set keyPrefix to keyName & "="
|
||||
@@ -201,11 +201,11 @@ findConfigInCurrentDB()
|
||||
Sucht die Konfigurationsdatei belegversand.conf relativ zur aktuellen DEVONthink-Auswahl.
|
||||
Ablauf:
|
||||
1. aktuelle Auswahl holen
|
||||
2. falls nichts ausgewŠhlt ist -> missing value
|
||||
2. falls nichts ausgewählt ist -> missing value
|
||||
3. von der Auswahl zur DB-Wurzel hochgehen
|
||||
4. dort die Gruppe _config suchen
|
||||
5. darin die Datei belegversand.conf suchen
|
||||
RŸckgabe:
|
||||
Rückgabe:
|
||||
- den gefundenen Config-Record
|
||||
- oder missing value, wenn keine passende Konfiguration existiert
|
||||
Wichtig:
|
||||
@@ -231,25 +231,25 @@ end findConfigInCurrentDB
|
||||
(*
|
||||
showWelcomeDialogIfNeeded()
|
||||
---------------------------
|
||||
Zeigt den Start-/Willkommensdialog an, falls die Konfiguration dies wŸnscht.
|
||||
Zeigt den Start-/Willkommensdialog an, falls die Konfiguration dies wünscht.
|
||||
Ablauf:
|
||||
1. Config-Datei relativ zur aktuellen Auswahl suchen
|
||||
2. Config-Datei lesen
|
||||
3. Wert SHOW_README auslesen
|
||||
4. falls SHOW_README=true -> Hinweisdialog anzeigen
|
||||
5. falls User "Diesen Dialog nicht mehr anzeigen" wŠhlt:
|
||||
SHOW_README auf false in der Config zurŸckschreiben
|
||||
5. falls User "Diesen Dialog nicht mehr anzeigen" wählt:
|
||||
SHOW_README auf false in der Config zurückschreiben
|
||||
Hinweis:
|
||||
--------
|
||||
START.scpt fŸhrt selbst keine Einrichtung und keinen Versand durch.
|
||||
Der Dialog ist nur eine Hilfe fŸr Anwender:innen.
|
||||
START.scpt führt selbst keine Einrichtung und keinen Versand durch.
|
||||
Der Dialog ist nur eine Hilfe für Anwender:innen.
|
||||
Er verweist auf die interne README-Datei in _config.
|
||||
Bewusst einfach:
|
||||
----------------
|
||||
Es gibt hier nur zwei Buttons:
|
||||
- "Weiter"
|
||||
- "Diesen Dialog nicht mehr anzeigen"
|
||||
Die README wird nicht direkt aus dem Dialog gešffnet.
|
||||
Die README wird nicht direkt aus dem Dialog geöffnet.
|
||||
*)
|
||||
on showWelcomeDialogIfNeeded()
|
||||
set configRecord to my findConfigInCurrentDB()
|
||||
@@ -262,12 +262,12 @@ on showWelcomeDialogIfNeeded()
|
||||
set showReadmeLower to do shell script "printf %s " & quoted form of showReadmeVal & " | tr '[:upper:]' '[:lower:]'"
|
||||
if showReadmeLower is not "true" then return
|
||||
|
||||
set msgText to "Willkommen beim Belegversand, Version 1.4." & return & return & Â
|
||||
"Mit dieser Funktion kannst du Dokumente aus dieser DEVONthink-Datenbank auswŠhlen, in ein ZIP-Archiv packen und als Mail-Entwurf vorbereiten." & return & return & Â
|
||||
"Anschlie§end kšnnen die verarbeiteten Dokumente mit dem Tag 'gesendet' markiert werden. Der Versand wird zusŠtzlich in Protokolldateien dokumentiert." & return & return & Â
|
||||
"Hinweise zur Einrichtung und Benutzung findest du in der Datei:" & return & Â
|
||||
"README-Belegversand" & return & Â
|
||||
"im Ordner:" & return & Â
|
||||
set msgText to "Willkommen beim Belegversand, Version 1.4." & return & return & ¬
|
||||
"Mit dieser Funktion kannst du Dokumente aus dieser DEVONthink-Datenbank auswählen, in ein ZIP-Archiv packen und als Mail-Entwurf vorbereiten." & return & return & ¬
|
||||
"Anschließend können die verarbeiteten Dokumente mit dem Tag 'gesendet' markiert werden. Der Versand wird zusätzlich in Protokolldateien dokumentiert." & return & return & ¬
|
||||
"Hinweise zur Einrichtung und Benutzung findest du in der Datei:" & return & ¬
|
||||
"README-Belegversand" & return & ¬
|
||||
"im Ordner:" & return & ¬
|
||||
"_config"
|
||||
|
||||
set choice to button returned of (display dialog msgText buttons {"Diesen Dialog nicht mehr anzeigen", "Weiter"} default button "Weiter")
|
||||
@@ -302,8 +302,8 @@ Ablauf:
|
||||
Wichtig:
|
||||
--------
|
||||
START.scpt delegiert die eigentliche Entscheidung an das Setup-Script.
|
||||
Dort wird geprŸft:
|
||||
- existiert schon eine gŸltige Konfiguration?
|
||||
Dort wird geprüft:
|
||||
- existiert schon eine gültige Konfiguration?
|
||||
-> dann Hauptscript starten
|
||||
- oder muss erst eingerichtet werden?
|
||||
*)
|
||||
|
||||
Reference in New Issue
Block a user