application name

hi,

any samples of how to add an application
name to a block?
i am trying to mark all the blocks created
by my application, is there a way to add
it to the header of the block definition?
(tblsearch "BLOCK" blockname), in
other words, how to modify the group code 4
in the block definition.

TIA

 

(setq ss (ssget "_x" '((0 . "INSERT") (2 . "YOURBLOCKNAME")))
to get all your created blocks, then you will have to use entmod entupd
to modify group codes...

hope it helps you

mfg
gert

 

sorry, that does not help at all,
i am talking about blocks, not inserts,
(tblsearch "block" "xx") will return something like
((0 . "BLOCK") (2 . "XX") (70 . 0) (4 . "") (10 0.0 0.0 0.0)
i am trying to populate the group code 4, which is the description

thanks

 

Mark,

I think that you can add the description by redefing the block definition with entmake -

(entmake '((0 . "BLOCK") (2 . "YOURBLOCKNAME") (70 . 2) (4 . "Your application info") (10 0.0 0.0 0.0))) - (note- this is for a block def with attributes)
(entmake ... - iterate through each block entitiy)
(entmake '((0 . "ENDBLK")))

Peter

Peter

 

peter,
i thought there should have been a simpler entmod approach,
but your approach makes sense,
i will give it a shot
thanks
mark

application info") (10 0.0 0.0 0.0))) - (note- this is for a block def with
attributes)

 

thanks again, works as expected

application info") (10 0.0 0.0 0.0))) - (note- this is for a block def with
attributes)