Knew y'all would get an easier select, so nice to that way! Thanks BIGAL
(defun c:bz (/ ss )
(princ "\n Select Object(s) for New Boundary..<pick inside selected>")
(princ "\n Select Objects: ")
(setq ss (ssget))
(command "-boundary" "a" "b" "n" ss "" "")
(princ)
)