Topic: Import Layer States from DWG

[cescalante73]

I am having trouble importing Layers States from a DWG file. We use AutoCAD 2009
I have a DWG files that has all our CAD standards and 8 layer states.
I get this message when I try to import & restore existing from the DWG file.

"Layer States - Cannot Restore Layer State"
"The selected layer states could not be restored".


Any advice on how to solve this?

Thanks

[Krushert]

Don't use Layer states is what it is telling you.  Seriously I don't know! I am just running off at the fingers.   I just wanted to let you know you were not being ignored and wanted to welcome you TheSwamp. 

Have you tried importing them into a brand new drawing?
Resaving your layer States?
 

[CAB]

Yes, Welcome to the Swamp.
After 26 views like me no one has shared your misfortune or maybe not found a suitable answer.
Hang in there and some one will give it a go.

You posted in the LISP forum, are you importing the layers via a lisp routine?
And the layer states?

[cescalante73]

I found this lisp that worked for the old .LAY files from LMAN legacy
How can this be modified for LAS files?


(vl-load-com)
;;; Restore Layer State without adding new layers
(defun SetLayerState (name / lst lay todel layers-collection)
  ;; Get a list of current layers
  (while (setq lay (tblnext "LAYER" (not lay))) (setq lst (cons (cdr (assoc 2 lay)) lst)))

  ;; Run the command to import & set layer state
  (command ".-LAYER"
           "_stAte"
           "_Import"
           (findfile (strcat name ".LAY"))
           "_Restore"
           name
           ""
           ""
  ) ;_ end of command

  ;; Get new layers to delete
  (setq lay nil
        layers-collection
         (vla-get-Layers (vla-get-ActiveDocument (vlax-get-acad-object)))
  ) ;_ end of setq
  (while (setq lay (tblnext "LAYER" (not lay)))
    ;; Check if not a member of the old layer list
    (if (not (member (cdr (assoc 2 lay)) lst))
      (setq todel (cons (vla-Item layers-collection (cdr (assoc 2 lay))) todel))
    ) ;_ end of if
  ) ;_ end of while

  ;; Delete these layers if they're not used
  (foreach lay todel
    (if (= (vla-get-Used lay) :vlax-false)
      (vla-Delete lay)
    ) ;_ end of if
  ) ;_ end of foreach

  (princ)
) ;_ end of defun

[mjfarrell]

how about using the create new drawing function, instead of using a DWT, change the file type to DWG, and use the file with the layerstates you want in it, save this as your new working template...

[jbuzbee]

I use ObjectDBX - but I don't import the layer state: I look at it.

OK, let me explain.  We have all our standard layers and layers states saved in a single "standard" drawing.  I use ObjectDBX to import layers, but when it comes to layer states if you import them who also import ALL the layers: and we have over 400 standard layers (multiple disciplines).  So what I do is open the "standards" drawing via ObjectDBX, change to the desired layer state, then compare the individual layer properties in the current drawing to mach the "standards" drawing.  It works great.  Let's say in the middle of a project one of a layers properties changes; linetype, plotstyle, etc.  With my method the layer states are dynamic. 

Now this is a real big mess of a program, but if you search here I know I've shared it.  Search for "jbLayerStates" or "jbWorkingStates".  My personal version is hooked into AutoCAD Architectures Project Navigator module but I'm sure I posted a simple AutoCAD version.

I'm not around here alot lately, but I'm sure there are others on here that use it.  I hope this helps.

jb