開いてるドキュメントをiCalに登録

スクリプトを実行した時間でドキュメント名を登録します。
スケジュール管理に使えるかも。
スクリプトエディタで開く

global b1e1a1

tell application "iCal"

set {c1a1to {current datename of every calendar}

d1() of me

make new event at end of calendar (b1's item 1with properties {start date:c1summary:e1recurrence:""}

end tell

on d1()

tell document 1 of application "InDesign CS_Jto set {e1b1to {name as Unicode textchoose from list a1 with prompt "登録するカレンダーを選択"}

end d1