We use a layer creation lisp, this allows us to purge regularly but still have all of our layers available to us. It's got a button, it's in the right click menu, or it can be typed. This ensures that no matter how a user prefers to work that they have easy access to the command.
I also load our custom linetype file at the start of the lisp.
Code:
(DEFUN C:CEILAYER ()
(setq oldlayer (getvar "CLAYER"));get current layer
(setq oldcmdecho (getvar "cmdecho"))
(setvar "cmdecho" 0)
;;set linetype scale
(COMMAND "LTSCALE" ".15")
;;;load CEI linetypes
(setvar "Expert" 3)
(command "._linetype" "_load" "*" "..../CEI.lin" "")
(setvar "Expert" 0)
;;;ONE LINE LAYERS
(COMMAND "LAYER" "MAKE" "E-1LIN" "C" "134" "" "")
(COMMAND "LAYER" "MAKE" "E-1LIN-DEMO" "C" "40" "" "LT" "DASHED" "" "")
(COMMAND "LAYER" "MAKE" "E-1LIN-EXST" "C" "84" "" "")
(COMMAND "LAYER" "MAKE" "E-1LIN-IDEN" "C" "14" "" "")
(COMMAND "LAYER" "MAKE" "E-1LIN-DEMO-IDEN" "C" "14" "" "")
(COMMAND "LAYER" "MAKE" "E-1LIN-EXST-IDEN" "C" "14" "" "")
(COMMAND "LAYER" "MAKE" "E-1LIN-IDEN-NPLT" "C" "5" "" "P" "N" "" "")
;;;; other layers here
;;reset existing layer
(setvar "CLAYER" oldlayer)
(setvar "cmdecho" oldcmdecho)
(PRINC)
)