AutoCad - FILTRO

Hola. necesito ayuda: quiero usar la funcion de filtro(ssget "x") en todo el formato de dibujo a partir de la seleccion de un objeto cualquiera. Lo que tengo hasta ahora es lo siguiente:(setq selec(ssget));Selecciono el objeto...es un block que se llama "posalt"
(setq name(ssname selec 0));
(setq intro(entget name)); entrega esto ((-1 . <Entity name: 40958b58>) (0 . "INSERT") (330 . <Entity name: 407e2cf8>) (5 . "773") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "POST-EXIST")
(100 . "AcDbBlockReference") (66 . 1) (2 . "posalt") (10 205.469 158.234 0.0) (41 . 1.0) (42 . 1.0) (43 . 1.0) (50 . 0.0) (70 . 0) (71 . 0) (44 . 0.0) (45 . 0.0) (210 0.0 0.0 1.0))
(setq Nameblock(STRCASE(cdr(assoc 2 intro)))); y aca me entrega lo que necesito "posalt" y lo que necesito viene ahora

(setq TIPOSTE(ssget "x" (list '(2 . "nameblock")))); lo que sucede aca es que yo quiero que la variable que esta dentro de "nameblock" la reconozca la funcion, pero esta asume que el valor que se pide es "nameblock" cuando yo quiero que sea "posalt" QUE ES LO QUE QUIERO EN GENERAL;FILTRAR EN EL DIBUJO TODO LO QUE SE LLAME "POSALT" Y NO ME RESULTA...

Hola,

yo probe tu rutina y en vez de usar (setq TIPOSTE(ssget "x" (list '(2 . "nameblock")))), use lo sgte.: (setq TIPOSTE(ssget "x" (list (cons 2 nameblock)))) en vez de hacer un par con la funcion ', lo hice con la funcion cons, y tambien la variable no la coloque entre comillas; y funciono.

Saludos

Andres