Append Creation Date to Filename

Summary: Renames the selected records with the creation date at the end of the filename.
Requires: EagleFiler
Install Location: ~/Library/Scripts/Applications/EagleFiler/
Last Modified: 2019-10-02

Description

This adds the creation date (in the format yyyymmddhhmmss) to the end of the selected records’ filenames.

Installation Instructions · Download in Compiled Format · Download in Text Format

Script

tell application "EagleFiler"
    set
_records to selected records of browser window 1
    repeat with
_record in _records
        set
_dateString to my stringFromDate(_record's creation date)
        set
_record's basename to _record's basename & " " & _dateString
    end repeat
end tell

on
stringFromDate(_date)
    
-- yyyymmddhhmmss
    set
_string to ""
    set
_string to _string & my stringFromNumber(_date's year, 4)
    set
_string to _string & my stringFromNumber(_date's month as integer, 2)
    set
_string to _string & my stringFromNumber(_date's day, 2)
    set
_string to _string & my stringFromNumber(_date's hours, 2)
    set
_string to _string & my stringFromNumber(_date's minutes, 2)
    set
_string to _string & my stringFromNumber(_date's seconds, 2)
    return
_string
end
stringFromDate

on
stringFromNumber(_number, _digitsToPad)
    return
text -_digitsToPad through -1 of ("0000" & _number)
end
stringFromNumber