Small question about select blocks within LISP

[K Baden]

I am trying to select all blocks with the suffix "_PLAN". For some reason this command sucessfully loads but isnt recognized.

I'm also not sure if the way i search for blocks with that suffix is correct.

Any tips?

 

(defun c:LAYERUPDATE ()

 (setq sset1 (ssget "x" '((0 . "INSERT") (2 . "*_PLAN"))))
  (command ".chprop" sset1 "" "la" "ANTENNA" "")
(princ)

)

[Aftertouch]

Command seems to work fine for me,

Just make sure layer ANTENNA exists.

[David Bethel]

It works on my setup. Can you post a sample dwg ?

 

-David

[ronjonp]

Should probably check that there is a selection set too...

(defun c:layerupdate (/ sset1)		; < -- Locali(sz)e variables
 (if (setq sset1 (ssget "x" '((0 . "INSERT") (2 . "*_PLAN"))))
   (command ".chprop" sset1 "" "la" "ANTENNA" "")
 )
 (princ)
)