Jump to content

Converting All Fields To text (Dynamic Block Bursted error)


mbrandt5

Recommended Posts

(defun C:R-FIELDS ( / del-field ss1 index item)
 (defun del-field (ent / edic)
   (if (setq edic (cdr (assoc 360 (entget ent))))
      (dictremove edic "ACAD_FIELD")
   )
 )
 (if (= (getvar "TILEMODE") 0)
   (progn
    (setvar "TILEMODE" 1)
    (command "REGEN")
   )
 )
 (if
   (setq ss1
     (ssget "X"
       (list (cons 0 "TEXT,MTEXT,MULTILEADER")
             (cons 67 0)
       )
     )
   )
   (progn
    (setq index 0)
    (repeat (sslength ss1)
      (setq item (ssname ss1 index))
      (if (del-field item) (entupd item))
      (setq index (+ 1 index))
    )
   )
 )
 (if 
  (setq ss1
    (ssget "X"
      (list (cons 0 "INSERT")
            (cons 67 0)
            (cons 66 1)
      )
    )
  )
  (progn
    (setq index 0)
    (repeat (sslength ss1)
      (setq item (ssname ss1 index))
      (while (= (cdr (assoc 0 (entget (setq item (entnext item))))) "ATTRIB")
        (if (del-field item) (entupd item))
      )
      (setq index (+ 1 index))
    )
  )
 )
 (princ)
)

 

 

This code will replace all fields within all text, mtext, and dimensions

 

 

For some reason the fields within text/(old attributes) of a bursted dynamic block will not change for some reason?

 

 

Can anyone figure out why?

Link to comment
Share on other sites

That is actually the same code...Though I did notice that there was an update...

 

 

Still doesn't work though...

 

 

Anyone interested in helping it would be greatly appreciated

Link to comment
Share on other sites

I've learned the reasoning to why this occurs is because the Mtext is Dynamic in the column property after its bursted...

 

 

So if that can be altered with code I believe that would solve the issue

Link to comment
Share on other sites

  • 1 month later...
  • 2 weeks later...

I tried Iburst, as well as NBurst with no luck unfortunately...attached is the R-Field Lsp/problematic block with the attribute that converts but won't retain the fields last given value at the time of R-Field execution.

 

 

Sorry for such a late response I've had a lot going on

R-FIELDS.lsp

BurstRFieldError.dwg

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...