#|
Load this file and witch to browser view named "UDA Boolean Column". Open the tool box menu to start the dialog.
|# (oli:sd-defdialog 'add_uda_boolean :dialog-title "Add User-def. Attr" :variables '( (A_PART :value-type :part :title "Part:" ) ("Add") (ADD_BOOLEAN :value-type :boolean :title "Boolean:" ) (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 "BOOLEAN-COLUMN" :attachment :instance :values `( :boolean-value ,(if add_boolean "TRUE" "FALSE")) ) (g-browser::rebuild-browser-tree "parcel-gbrowser") ) ) ) (oli:sd-create-uda-boolean-column-definition :uda-boolean-column :attribute "BOOLEAN-COLUMN" :value-list-key :boolean-value :title "Boolean Column" :mapping '( ("True" "yes") ("False" "no") ) :attachment :instance ) (oli:sd-create-browser-view "UDA-BOOLEAN-COLUMN" :title "UDA Boolean Column" :tree-config '( :instance-name "[ " :uda-boolean-column " ]") :detail-config '( :uda-boolean-column ) ) #||#