#|
Load this file and switch to browser view named "UDA Float Column". Open the tool box menu to start the dialog.
|# (oli:sd-defdialog 'add_uda_float :dialog-title "Add User-def. Attr" :variables '( (A_PART :value-type :part :title "Part:" ) ("Add") (ADD_FLOAT :value-type :number :title "Float:" ) (ADD_ATTRIBUTE :title "Add Attribute" :toggle-type :wide-toggle :push-action (add-uda a_part) ) ) :local-functions '( (add-uda (part) (oli:sd-attach-item-attribute part "FLOAT-COLUMN" :attachment :instance :values `( :float-value ,add_float) ) (g-browser::rebuild-browser-tree "parcel-gbrowser") ) ) ) (oli:sd-create-uda-float-column-definition :uda-float-column :attribute "FLOAT-COLUMN" :value-list-key :float-value :title "Float Column" :mapping '( (3.14 "Pi") ) :attachment :instance ) (oli:sd-create-browser-view "UDA-FLOAT-COLUMN" :title "UDA Float Column" :tree-config '( :instance-name "[ " :uda-float-column " ]") :detail-config '( :uda-float-column ) ) #||#