Example for User-Defined Attribute

#| Example for User-Defined Attribute - Column Type Boolean
Note: This is an example file showing concepts of the Integration Kit. The code itself is not supported and will never be supported.

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 )
)
#|