Skill code to change Metal width

Hi All, 

I am trying to write a skill code to change the metal width bindkey. without opening its query form. 

Here is my skill code

hiSetBindKey("Layout" "Ctrl<key>q" "change_metal_width()")
procedure(change_metal_width()
selected=geGetSelSet()
hiFocusToCIW( )
float_num=enterNumber()
selected~>width=float_num
)

This code works perfectly but I need to focus into CIW then I enter number the it changes width, If I comment hiFocusCIW() then run the script, view get stuck. Then I press ESC it comes back to normal without changing metal width. Please let me know what other commands I can use it.

Thank you in advance.