grdraw issue

Here is a strange one, if I click on the Takeoff_Angle button on a tool palette, I get an error with grdraw:
BDuct/BDuct/Takeoff_Angle#OnClicked

If I enter the command: BDuct/BDuct/Takeoff_Angle#OnClicked it works fine, even if the tool palette is still showing.

Both the lisp and odcl file are attached to this post, any help would be appreciated.

Hallo, I just have no notebook here. Please make sure that EventInvoke is set to AllowCommand.
Fred