;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
;
; Beschreibung: Spalte für eingeblendete Teile/Baugruppen in einfügen
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(in-package  :brwsr-tools)
(use-package :oli)

(defun browser-display-visible-parts-fnc (node)
  (let (ret_val)
    (setf ret_val "")
    (if (sd-query-browser "parcel-gbrowser" :IS-OBJECT-SELECTED node)
      (setf ret_val "JA")
    )
    ret_val
  );let
)

(sd-create-column-definition 
  :visible-part-asm
  :title "Teile/Baugpuppe eingeblendet"
  :display-fnc 'browser-display-visible-parts-fnc
  :applicable-fnc nil
  :edit-fnc nil
)