Get Open File's Name

See this macro by @ccstone:

MACRO: Finding the File Path for the Front Document in the Front Application