Hallo Alle,
in unserer orthopädischen Praxis nutzen wir seit kurzem intensiv die Trainingsapp Mawendo, damit wir einerseits Heilmittelbudget sparen, andererseits unsere Patienten zum fast immer vernachlässigten Training anleiten. Ich habe ein Skript gebaut, dass die Daten automatisch in das Formular zur Neuanlage eines Trainingsplans einträgt, das liegt bei uns direkt in der Patientenakte in der Toolbar.
Voraussetzung ist, dass der Arbeitsplatz, an dem das Skript startet, grundsätzlich am Mawendo angemeldet ist, und die Benutzernummer bekannt ist, die muss noch ins Skript (unten markiert in rot) eingetragen werden. (Zu finden, wenn man in Mawendo einen neuen Plan anlegt und in der URL nachsieht, erklärt sich ansich von selbst).
Vielleicht kann das jemand brauchen, ist auch im Tauschcenter eingestellt!
Gruß
Dirk Schemmann
on page_loaded(timeout_value) -- in seconds
delay 1
repeat with i from 1 to timeout_value
tell application "Safari"
if name of current tab of window 1 is not "Loading" then exit repeat
end tell
--delay 1
delay 2
end repeat
if i is timeout_value then return false
tell application "Safari"
repeat until (do JavaScript "document.readyState" in document 1) is "complete"
delay 0.5
end repeat
end tell
return true
end page_loaded
tell application "Safari" to open location "https://app.mawendo.com/o/BENUTZER/plan"
tell application "Safari" to activate
set GebDat to "$[pg2]$"
set TagGebDat to text 1 through 2 of GebDat
set MonGebDat to text 3 through 4 of GebDat
set JahrGebDat to text 5 through 8 of GebDat
if page_loaded(20) then
tell application "System Events"
if "$[pMW]$" is "W" then
key code {48, 49, 48}
else
key code {48, 124, 49, 48}
end if
keystroke "$[pt]$"
key code 48
keystroke "$[patient_name]$"
key code 48
keystroke "$[patient_vorname]$"
key code 48
keystroke TagGebDat
key code 48
keystroke MonGebDAt
key code 48
keystroke JahrGebDat
key code 48
keystroke "$[pemail]$"
end tell
else
say "Mawendo lädt nicht"
end if
