﻿; -*-Lisp-*-
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; Description:  customization for Mold Base catalogs
; Language:     Lisp
; Package:      MOLDBASE-UI
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(in-package :moldbase-ui)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;;   SET-MOLD-BASE-VISIBLE-CATALOG-LIST
;;
;; With an additional license for the Mold Base module the user can get all
;; available catalogs.
;; The specified catalogs will be displayed in the mold and component
;; creation and modification dialogs. The user can specify which of the
;; available catalogs and in what order the catalogs should be displayed.
;; If there is no license available for all catalogs then only the first
;; entry will be displayed in the dialog.
;;
;; parameter:  :all
;;       or any number (at least one) of the following keywords:
;;             :DME-mm
;;             :DME-inch
;;             :EOC
;;             :HASCO-mm
;;             :HASCO-inch
;;             :MEUSBURGER
;;             :NATIONAL
;;             :PCSUSA
;;             :PEDROTTI
;;             :RABOURDIN
;;             :STRAK
;;             :SIDECO
;;             :PROGRESSIVE       - not yet supported
;;             :FUTABA
;;             :MISUMI
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; 
;; Example:
;;
;; (set-mold-base-visible-catalog-list :DME-mm :HASCO-mm :STRAK)
;; (set-mold-base-visible-catalog-list :FUTABA)
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(set-mold-base-visible-catalog-list :all)
