tcl script to modify origin of a region

Hi, I need a way of modifying the result of the following line using tcl scripting. set ORIGIN [get_logiclock -region $region -origin] The previous line gives the origin of a LogicLoc...