automate rename and printing 2 copies of same drawing 1 with client job No. 1 with in-house job no

[JADT]

I am trying to find a way of automating the renaming and publishing (PDF) 2 copies of same drawing with different names -

 

1 set that would go to a client that request a certain job no (which we have on the title block - as attribute=client_job_no)

 

and the same set but titled with our own job number (also shown on title block as a attribute=our_job_no) for our own files

 

I'm wondering where to start - we have a lisp routine that renames individual drawings tabs to one of the above attribute values but we have to run it on each drawing manually -  then we publish those. and then do the same again with the other lisp on all the drawing individually and publish those.

but would be looking to link something together that can automate more of the process - i suppose something along the lines

 

run the Client_rename lisp on all open drawings  - publish all to pdf in folder xzy:xzy/Client pdf

and in same routine then

run the OUR_rename lisp on all open drawings - publish all to pdf in folder xzy:xzy/our pdf.

 

very rusty on lispsso any help /direction would be appreciated.

 

[Cad64]

Since you're looking for a lisp routine, I've moved your question to the Autolisp section.

[BIGAL]

You could look at a script or using aeccorconsole or lee-Mac obdx program to change certain dwgs the run publish, there are various ways of making Dwg lists, you would have say 2 lisps to run the office or client number.

 

when getting Contractor dwgs we would insist they had our project number but they could reference their number as well would be an easier way to go just show both then 1 copy talk to client.

[maratovich]

15 hours ago, JADT said:

I am trying to find a way of automating the renaming and publishing (PDF) 2 copies of same drawing with different names -

 

Add an example of your file.
Indicate what will change. Indicate how the result should be.

[Cad64]

A pretty simple way to do this would be to have two layers in your title block. One for your internal project number and one for the client project number. Then have two lisp routines. One to  freeze your number and thaw the client number and publish, and the other to freeze the client number and thaw your number and publish.

 

Something like this:

Quote

(defun c:PUB1 ()
(command "-layer" "f" "XTITLEBLOCK|Layer-1" "t" "XTITLEBLOCK|Layer-2" "")
(command "publish")
(princ)
)