How do I transfer title info. form one drawing to another ???

[jtice]

I need a quick and easy way to copy all the title info from one drawing to another. (drawing name, date, titles, drawer, description, etc.)

We have alot of different drawings that goto the same job. And alot of the title info is the same. Like job title, job number, etc.

How can I quickly copy the info from one drawing to another, or make a file with that info in it, that can be used to auto fill in the title info on a new drawing?

Thanks alot.

 

[PLB]

Hi jtice,

I have a quick couple of thoughts for you...

First, you can create the title block with the information that you want in it and then "SAVEAS" the next drawing and so on...

Second, you can create a title block and border drawing that has the specific info. in it and save this into the directory where all of the projects drawings will be kept. Anyone that needs this border could copy your "standard" border to begin their work.

Third, you can create a separate drawing that contains just the information for the title block (without other drawing entities like buildings, parts, etc.) and have all the other users X-REF this info. into their drawings. This way, if information has to change later on in the project, you can quickly and easily change the original border drawing and all the others that X-REF this drawing will automatically be updated.

Just my quick thoughts,
hope this helps,
Paul

 

[smcadman]

If in layouts, choose text > right-click > "copy with base point" > 0,0 > go to other layout and paste to 0,0. You can make a template with the borders and text in it by saving it in the ".dwt" format.

Flores

 

[IFRs]

This is a job for XRef !!!

 

[jtice]

The X-REF thing sounds PERFECT.

Can you please give me some more information on it?
Where I can get it, how it work?

Thanks alot guys.

 

[Xan]

jtice:
maybe after copy title info from a drawing into another you may copy Dimstyles, fonts an/or lines.
To do this go to Tools>Autocad Design Center, or Ctrl+2, ignore the advert message, go to the second column of the just open left window, open the drawing that contains the things you want to copy, click on them to open to the last details and drag this icons to the new drawing (on the right side).
After doin this dont forget to CLOSE the Design Center, clicking on it (under tools).
Lucky.
Xan.

 

[PLB]

jtice,

The XREF thing is very easy.

Just make a new drawing and draw the border with all the information that you want in it and save it (with a name like BORDER.DWG). Next, open one of the different drawings that you have for this project. You can type in XREF on the command line or go to INSERT>External Reference and browse to your border drawing. Insert it at 0,0 and there it is. You may have to adjust other parts in your drawing to fit within the border but, you can easily do that once the border drawing is in place and you can see where the limits are. Now, you may have to take into account the difference between Model Space and Paper Space if your company uses those. Just XREF the border into the Model OR Paper Space that it was created in. No Problem.

Hope this help,
Paul

 

[usaidit]

wblock will also do the job. just type wblock then select the info you want, then a point of origan. it will save to a wblock directory.
when you need it just type insert, the wblock pull down appears, you select the one you want, place it where you need it, at this point you can resize, rotate, and place it.

 

[R12NV]

MATCH ATTRIBUTES copy and past this in to a .lsp file call it MATCH_ATTS

run the file, click the source title block and then click the new tileblock to copy the data into.

cheers,




;------------------------------------------------------------------------------
;MATCH_ATTS: From user selection, pick block with atts and all matching
; tags from target block will match its atts to the source
;Dependencies: ATT_READ
; ATT_UPD
;No error handling!
;------------------------------------------------------------------------------
(defun C:MATCH_ATTS (/ SRC_BLK TRGT_BLK)
(setq SRC_BLK (entsel "\nSelect Source Block.&quot)
(princ "\n&quot
(setq TRGT_BLK (entsel "\nSelect Target Block.&quot)
(setq ATT_LIST (ATT_READ (car SRC_BLK))
TRGT_ENT (car TRGT_BLK))
(setq SUCCESS (ATT_UPD TRGT_ENT ATT_LIST))
(princ)
)
;------------------------------------------------------------------------------

;------------------------------------------------------------------------------
; ATT_READ: given an eref to a block, return a dotted pair list of attr. tag
; names and attr. values.
;
; - syntax: (att_read <eref>) -> ((<att tag>.<att data>) (etc.)...)
;
; - no library dependencies
; - returns nil if an error condition is detected.
;------------------------------------------------------------------------------
(defun ATT_READ (EREF / ENT_DATA ATT_LIST)
(setq ENT_DATA (entget EREF)) ; passing a nil eref parameter will cause a crash
(cond
((/= &quot;INSERT&quot; (cdr (assoc 0 ENT_DATA))) NIL) ;not a block
((= NIL (entnext EREF)) NIL) ;no entities following
((/= 1 (cdr (assoc 66 ENT_DATA))) NIL) ;no attributes following
(t
(while ; step through all the attributes
(= &quot;ATTRIB&quot;
(cdr (assoc 0 (setq ENT_DATA (entget (entnext (cdr (assoc -1 ENT_DATA)))))))
)
(setq
ATT_LIST
(cons
(cons
(cdr (assoc 2 ENT_DATA)) ; att tag
(cdr (assoc 1 ENT_DATA)) ; att data
)
ATT_LIST
)
)
)
ATT_LIST ; return value
)
)
)
;------------------------------------------------------------------------------

;------------------------------------------------------------------------------
; ATT_UPD: Update the attributes of a block given by the eref according to the
; information in the <att_list>.
;
; - syntax: (att_upd <eref> <att_list>) -> T/nil
; - returns nil if an error is detected, T otherwise
; - <att_list> is a list with format: ( (<att tag>.<att data>) (etc.)...)
;
; Note: no error occurs if the block's attributes don't match those in the
; <att_list>. Data is transferred between all matching attribute
; tag names - if there's a mismatch the program doesn't mind at all,
; but no data transfer will occur for that particular item.
;
; - no library dependencies
;------------------------------------------------------------------------------
(defun ATT_UPD (BLOCK_REF ATT_LST / ENT_DATA)
; if the block_ref parameter is not an eref to a block insertion, the
; program will crash
(cond
((= NIL (entnext BLOCK_REF)) NIL) ;no entities following
((/= 1 (cdr (assoc 66 (setq ENT_DATA (entget BLOCK_REF))))) NIL) ; no attributes
(t
(while ; cycle through all attributes...
(= &quot;ATTRIB&quot;
(cdr (assoc 0 (setq ENT_DATA (entget (entnext (cdr (assoc -1 ENT_DATA)))))))
)
(setq ATT_TAG (cdr (assoc 2 ENT_DATA)))
(cond
((setq NEW_ATT (assoc ATT_TAG ATT_LST)) ;mismatch filtering...
(entmod
(subst
(cons 1 (cdr NEW_ATT))
(assoc 1 ENT_DATA)
ENT_DATA
)
)
)
)
)
(entupd BLOCK_REF) ; regen the block
t
)
)
)
;------------------------------------------------------------------------------
(princ)
(princ &quot;\nType Match_Atts to begin&quot