AppleScript: assign stylespec to text in quarkxpress document

(*
qxp_assign_stylespec_01.applescript

Assign stylespec to an paragraph in a text box
*)

tell application "QuarkXPress Passport"
    tell document 1
        set style sheet of paragraph 1 of text box 1 to style spec "THE_STYLESPEC_NAME"
    end tell
end tell