Example for User-Defined Attribute

#| Example for User-Defined Attribute - Column Type String 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 switch to browser view named "UDA String Column". Open the tool box menu to start the dialog.

|#
(oli:sd-defdialog 'add_uda_string
  :dialog-title "Add User-def. Attr"
  :variables
  '(
     (A_PART
       :value-type :part
       :title "Part:"
     )
     ("Add")
     (ADD_STRING
       :value-type :string
       :title "String:"
     )
     (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
         "STRING-COLUMN"
         :attachment :instance
         :values `( :string-value ,add_string)
       )
       (g-browser::rebuild-browser-tree "parcel-gbrowser")
     )
   )
)

(oli:sd-create-uda-string-column-definition
  :uda-string-column
  :attribute "STRING-COLUMN"
  :value-list-key :string-value
  :title "String Column"
  :mapping '( ("millimeter" "mm") )
  :attachment :instance
)

(oli:sd-create-browser-view
  "UDA-STRING-COLUMN"
  :title "UDA String Column"
  :tree-config '( :instance-name "[ " :uda-string-column " ]")
  :detail-config '( :uda-string-column )
)
#|