ich suche eine Funktion mit der man z.B. einen bezahlt Vermerk auf Rechnungen machen kann.
Das ganze soll dann so aussehen wie ein manueller Stempel.
Also z.B. Bezahlt am 03.09.2015.
Hat DT so etwas drin?
Wenn ja, wo finde ich die Funktion?
Mit PDF Pen Pro geht das auch direkt aus DEVONthink heraus. Ansonsten schau mal im App Store mit dem Suchbegriff “Watermark” - da findest du einige Lösungen
ich möchte diesen Request gerne aufgreifen, da ich die Funktion ebenfalls benötige um bezahlte Belege zu kennzeichnen.
Vielleicht ist es aber möglich diesen Stempel in Form einer Anmerkung -> Notiz zu realisieren. Daher meine Frage, ob man per Script eine Notiz mit einem Text wie z. B. ‘Bezahlt 6.9.2015’ an eine PDF-Datei anfügen kann. Ich mache das bisher immer umständlich von Hand.
Hi,
das Skript verursachte bei mir ebenfalls ein Fehler, da eine geschweifte Klammer fehlte.
Hier hast Du meine angepasste Version, so wie ich sie jetzt nutze.
Dabei frage ich in einer Dialogbox das Datum ab an dem ich die Rechnung bezahlt habe. Dabei ist es egal ob das Datum in 2.1.15 oder 02.01.15 erfasst wird, denn immer gebe ich im Stempel dd.mm.yyyy aus.
Hoffe es hilft…
Gruß
Efty
set foregroundcolor to {65535, 65535, 65535}
set backgroundcolor to {65500, 0, 0}
set theDate to do shell script "date '+%d.%m.%Y'"
tell application id "DNtp"
set theSelection to the selection
if (count of theSelection) is 1 then
set dialog_reply to display dialog "Bezahlt am:" default answer theDate
set theDate to text returned of dialog_reply
set text item delimiters of AppleScript to "."
set myDay to texts -2 thru -1 of ("0" & text item 1 of theDate)
set myMonth to texts -2 thru -1 of ("0" & text item 2 of theDate)
set myYear to texts -4 thru -1 of ("20" & text item 3 of theDate)
set myDate to " € " & myDay & "." & myMonth & "." & myYear
set thePath to path of item 1 of theSelection
if thePath ends with ".pdf" then
tell application "PDFpenPro"
open (POSIX file thePath) as alias
set thePage to page 1 of document 1
set the_height to height of thePage
set the_width to width of thePage
set theImprint to (make new text imprint at end of imprints of thePage with properties {rich text:myDate, x position:(the_width - 113), y position:(the_height - 50), height:40, width:540, background color:backgroundcolor})
set font of attribute run 1 of rich text of theImprint to "Courier"
set size of attribute run 1 of rich text of theImprint to 12
set color of attribute run 1 of rich text of theImprint to foregroundcolor
delay 0.5
try
close document 1 saving yes
end try
quit
end tell
end if
end if
end tell
Ähnliches geht auch mit einem Automator-Workflow im Druckdialog. Der Workflow legt eine Bilddatei über oder hinter das PDF und speichert es dann z.B. in die Globale Inbox.
Leider habe ich es nicht hinbekommen, dass das PDF dann in der gleichen Gruppe abgelegt wird - viellicht weiß jemand was dazu