;; | -----------------------------------------------------------------------------
;; | SS_SeleBlk
;; | -----------------------------------------------------------------------------
;; | Function : Returns a selection set based on a specified block 
;; |            name. 
;; | Argument : [name] - name of block, may take wild card.
;; | Returns  : Selection set of entities matching the blkname.
;; |            Returns nil if none is found.
;; | Updated  : October 28, 1992
;; | e-mail   : rakesh.rao@4d-technologies.com 
;; | Web      : www.4d-technologies.com
;; | -----------------------------------------------------------------------------


(defun SS_SeleBlk (name)

	(ssget "_X" (list (cons 0 "INSERT") (cons 2 name)))
)