Dialog Generator - User Interface for Examples

Note: This is an example file showing concepts of the Integration Kit. The code itself is not supported and will never be supported.
|#

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; condition: Online Help for Integration Kit should be installed
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(in-package :dg-examples)
(use-package :oli)


;; Note: This is an example file. Usually, available commands are created in the available commands file.

;;;;;;;;;;;;;;;;;;;;; "Introduction Examples" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Quick Extrude"
 :action        "quick_extrude :distance"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Full Extrude"
 :action        "full_extrude :distance"
 )
 
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Enable 1"
 :action        "dependent_enable_demo"
 :description "Dependent enable demo."
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Enable 2"
 :action        "dependent_check_demo2"
 :description "Dependent check demo."
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Title On"
 :action      "my_shared :a :on"
 :description "Changes Dialog title."
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Title Off"
 :action      "my_shared :a :off"
 :description "Changes Dialog title."
 ) 
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; "Accept-abort" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Accept 1"
 :action        "accepted1"
 :description "Accept dialog after entering a value of 'NUM' when 'A' is on."
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Abort"
 :action        "canceled"
 :description "Abort Dialog"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Accept 2"
 :action        "accepted2"
 :description "Accept dialog after pressing push-button 'Do' when 'A' is on."
 )
 
;;;;;;;;;;;;;;;;;;;;;;;;;; "Input Support" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Scale"
 :action        "my_scale"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Measuring"
 :action        "my_measure_dialog"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Display Only"
 :action        "display_only"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Ranges"
 :action        "range_demo"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Filename"
 :action        "filename_demo"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Check Func"
 :action        "check_func"
 ) 
 
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Dynamic Scale"
 :action        "multiple_drags"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Call Measure"
 :action        "calling_measure_dialog"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Image"
 :action        "black_box"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Proposals"
 :action        "attach_country"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Add. Token"
 :action        "token_string"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Check Confirm"
 :action        "confirmed_number"
 )

;;;;;;;;;;;;;;;;;;; "Side Affects" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Next Button"
 :action        "next_demo"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Conf.in AI"
 :action        "confirm_in_after_input"
 :description "Confirm in After Input"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Conf.in Exit"
 :action        "confirm_in_exit"
 :description "Confirm in Exit"
 )
 
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Conf.bef.Exit"
 :action        "confirm_before_exit"
 :description "Confirm before Exit"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Pos Part"
 :action        "position_part_demo"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Next Demo"
 :action        "next2_demo"
 ) 
 
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Conf.on AI"
 :action        "confirm_on_after_input"
 :description "Confirm on After Input"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Conf.on Exit"
 :action        "confirm_on_exit"
 :description "Confirm on Exit"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Pos WP"
 :action        "position_wp_demo"
 )  

;;;;;;;;;;;;;;;;;;;;;;; "Representation" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Toggles"
 :action        "toggle_type_demo"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Minimal UI"
 :action        "present_minimized_ui_chances"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Expand Push"
 :action        "expand_push"
 )
 
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Expand Pair"
 :action        "expand_pair"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "External Push"
 :action        "external_expand_push"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "UICT"
 :action        "my_area"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Toggle Size"
 :action        "size_demo"
 )
 
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Expand Bool"
 :action        "expand_bool"
 ) 

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Expand range"
 :action        "expand_range"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "External Bool"
 :action        "external_expand_bool"
 ) 
 
;;;;;;;;;;;;;;;;;;;;;;; "Sequentialization" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Next Variable"
 :action        "do_with_item"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Ok Action Next"
 :action        "pick_several"
 )

;;;;;;;;;;;;;;;;;;;;;;; "Local Functions" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Local Func"
 :action        "interpolate_demo"
 )
 
;;;;;;;;;;;;;;;;;;;;;;; "Help Functions";;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Static"
 :action        "my_help"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Dynamic"
 :action        "my_dyn_help"
 )

;;;;;;;;;;;;;;;;;;;;;;; "Subactions" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Non Embedded"
 :action        "calling_dialog_nemb"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Call By Push"
 :action        "calling_push_dialog"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Visible ABC"
 :action        "caller_abc"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Embedded"
 :action        "a_calling_dialog"
 ) 
 
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Visible BCD"
 :action        "caller_bcd"
 )  

 
;;;;;;;;;;;;;;;;;;;;;;; "Pds-System" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Variant"
 :action        "pds_variant"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Sub Variant+"
 :action        "my_pds_with_sub_on"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Sub Variant-"
 :action        "my_pds_with_sub_off"
 )

;;;;;;;;;;;;;;;;;;;;;;; "3D Copilot" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Co View"
 :action        "co_view"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Co Parcels"
 :action        "co_parcels"
 )

(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Co Extrude"
 :action        "co_extrude"
 ) 
 
(oli::sd-define-available-command
 "SolidDesigner"
 "Ribbon UI Examples"
 "Co Cable"
 :action        "co_cable"
 ) 
 
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Creates Ribbon tab and adds all above commands in various groups.
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 

;;;;;;;;;;;;;;;;;;;; "Dialog Generator Manual" Ribbon TAB ;;;;;;;;;;;;;;;;;;;;;; 

(oli::sd-fluentui-add-ribbon-tab "DIALOG_GENERATOR_MANUAL"
  :application "SolidDesigner"
  :title "Dialog Generator Manual"
  :appendUtilitiesGroup nil
)

;;;;;;;;;;;;;;;;;;;;;"Introduction Examples";;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 

(oli::sd-fluentui-add-ribbon-group "Examples"
  :parent "DIALOG_GENERATOR_MANUAL"
  :title "Introduction Examples"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Examples")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Quick Extrude")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Examples")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Full Extrude")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Examples")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Examples")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Enable 1")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Examples")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Enable 2")
)

(oli::sd-fluentui-add-ribbon-separator
  :parent '("DIALOG_GENERATOR_MANUAL" "Examples")
  )
  
(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Examples")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Title On")
)  
(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Examples")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Title Off")
)  

;;;;;;;;;;;;;;; Accept/Abort ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(oli::sd-fluentui-add-ribbon-group "Accept-Abort"
  :parent "DIALOG_GENERATOR_MANUAL"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Accept-Abort")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Accept 1")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Accept-Abort")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Accept 2")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Accept-Abort")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Abort")
)

;;;;;;;;;;;;;;;"Input Support" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(oli::sd-fluentui-add-ribbon-group "Input"
  :parent "DIALOG_GENERATOR_MANUAL"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Scale")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Measuring")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Check Func")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Dynamic Scale")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Call Measure")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Check Confirm")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Ranges")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Filename")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Display Only")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Image")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Proposals")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Input")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Add. Token")
)
 
;;;;;;;;;;;;;;;;;;; "Side Affects" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(oli::sd-fluentui-add-ribbon-group "Affects"
  :parent "DIALOG_GENERATOR_MANUAL"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Affects")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Next Button")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Affects")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Conf.in AI")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Affects")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Conf.in Exit")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Affects")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Next Demo")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Affects")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Conf.on AI")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Affects")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Conf.on Exit")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Affects")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Pos Part")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Affects")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Pos WP")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Affects")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Conf.bef.Exit")
)

;;;;;;;;;;;;;;;;;;;;;;; "Representation" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
 
(oli::sd-fluentui-add-ribbon-group "Represent"
  :parent "DIALOG_GENERATOR_MANUAL"
  :title "Screen Representation"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Expand Push")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Expand Pair")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "External Push")
)


(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Expand Bool")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Expand range")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "External Bool")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Toggles")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Minimal UI")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Toggle Size")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Represent")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "UICT")
)

;;;;;;;;;;;;;;;;;;;;;;; "Sequentialization" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-fluentui-add-ribbon-group "Sequentialization"
  :parent "DIALOG_GENERATOR_MANUAL"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Sequentialization")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Next Variable")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Sequentialization")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Ok Action Next")
)


;;;;;;;;;;;;;;;;;;;;;;; "Local Functions" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 

(oli::sd-fluentui-add-ribbon-group "Local Functions"
  :parent "DIALOG_GENERATOR_MANUAL"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Local Functions")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Local Func")
)

;;;;;;;;;;;;;;;;;;;;;;; "Help Functions";;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-fluentui-add-ribbon-group "Help"
  :parent "DIALOG_GENERATOR_MANUAL"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Help")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Static")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Help")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Dynamic")
)

;;;;;;;;;;;;;;;;;;;;;;; "Subactions" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-fluentui-add-ribbon-group "Subactions"
  :parent "DIALOG_GENERATOR_MANUAL"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Subactions")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Non Embedded")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Subactions")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Visible ABC")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Subactions")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Call By Push")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Subactions")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Embedded")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "Subactions")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Visible BCD")
)

;;;;;;;;;;;;;;;;;;;;;;; "PDS-System" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-fluentui-add-ribbon-group "PDS System"
  :parent "DIALOG_GENERATOR_MANUAL"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "PDS System")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Variant")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "PDS System")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Sub Variant+")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "PDS System")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Sub Variant-")
)

;;;;;;;;;;;;;;;;;;;;;;; "3D Copilot" ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;  

(oli::sd-fluentui-add-ribbon-group "3D Copilot"
  :parent "DIALOG_GENERATOR_MANUAL"
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "3D Copilot")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Co View")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "3D Copilot")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Co Parcels")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "3D Copilot")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "3D Copilot")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Co Extrude")
)

(oli::sd-fluentui-add-ribbon-button
  :parent '("DIALOG_GENERATOR_MANUAL" "3D Copilot")
  :availCmd '("SolidDesigner" "Ribbon UI Examples" "Co Cable")
)

(oli::sd-fluentui-recalc-ribbon-layout)

;  END of Example