topic Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil in Visual LISP, AutoLISP and General Customization Forum

AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

adonispaz3G2GB — Tue, 23 Jul 2024 23:19:36 GMT

Im trying to set up Design Automation for AutoCAD. After submitting the work item I get a response saying it was successful. But when I look at the logs it seems to have trouble running the script

AutoCAD menu utilities loaded. [07/23/2024 23:02:54] Command: [07/23/2024 23:02:54] Command: Enter BACKSPACE to interrupt script. [07/23/2024 23:02:54] Command: [07/23/2024 23:02:54] Command: (load "DWGToPDF.lsp") [07/23/2024 23:02:54] C:DWGTOPDF [07/23/2024 23:02:54] Command: (c:DWGToPDF) [07/23/2024 23:02:54] ; error: bad argument type: VLA-OBJECT nil [07/23/2024 23:02:55] End AutoCAD Core Engine standard output dump. [07/23/2024 23:02:55] Error: AutoCAD Core Console output contains error(s). [07/23/2024 23:02:55] End script phase.

Am I doing something wrong in my script?

(defun c:DWGToPDF() (vl-load-com) ; Suppress file dialog boxes (setq originalFileDia (getvar "FILEDIA")) (setvar "FILEDIA" 0) ; Get the active document in AutoCAD (setq doc (vla-get-ActiveDocument (vlax-get-acad-object))) ; Check if the document is valid (if (null doc) (progn (princ "\nError: No active document found.") (exit) ) ) ; Get the full path of the active document (setq docPath (vlax-get-property doc 'FullName)) ; Extract the directory path from the full path (setq outputDir (vl-filename-directory docPath)) ; Get the Layouts collection (setq layouts (vla-get-Layouts doc)) ; List to store output PDF file paths (setq outputFiles '()) ; Iterate through all layouts (vlax-for layout layouts (setq layoutName (vla-get-Name layout)) ; Skip the "Model" layout (if (/= layoutName "Model") (progn ; Print the name of the current layout for debugging (princ (strcat "\nProcessing layout: " layoutName "\n")) ; Generate the output file path (setq sanitizedLayoutName (vl-string-translate "/\\:*?\"<>|" "_" layoutName)) (setq outputFile (strcat outputDir "\\" sanitizedLayoutName ".pdf")) (princ (strcat "\nOutput file path: " outputFile "\n")) ; Add to output files list (setq outputFiles (cons outputFile outputFiles)) ; Start the plot command (command "-plot" ; Start the plot command "Yes" ; Detailed plot configuration layoutName ; Layout name "DWG To PDF.pc3" ; Output device name "ARCH full bleed E1 (30.00 x 42.00 Inches)"; Paper size "inches" ; Paper units (default) "Landscape" ; Drawing orientation "No" ; Plot upside down? "Extents" ; Plot area "Fit" ; Plot scale "0,0" ; Plot offset (centered) "Yes" ; Plot with plot styles? "" ; Plot style table name "Yes" ; Plot with lineweights? "Yes" ; Scale lineweights with plot scale? "No" ; Plot paper space last "No" ; Hide plot outputFile ; Output file name "No" ; Prompt for plot details "No" ; Save changes to layout ) ) ) ) ; Reset FILEDIA variable to original state (setvar "FILEDIA" originalFileDia) ; Print completion message (princ "\nPlotting complete.\n") ; Print output files for Design Automation to recognize (foreach file outputFiles (princ (strcat "\nOutput file: " file "\n")) ) (princ) )

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

pbejse — Wed, 24 Jul 2024 10:49:19 GMT

Has the script worked in the past?

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

marko_ribar — Wed, 24 Jul 2024 11:39:22 GMT

Maybe you need to run script through ACAD session and not through CoreConsole... And BTW, can we see script file (*.scr)...

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

paullimapa — Wed, 24 Jul 2024 12:37:00 GMT

The vla functions most likely are not supported with accoreconsole. Even (layoutlist) function is not supported. This the workaround to cycle through layouts in accoreconsolle

(defun GetLayoutListACoreConsole () (defun massoc (key alist / x nlist) (foreach x alist (if (eq key (car x)) (setq nlist (cons (cdr x) nlist)) ) ) (reverse nlist) ) (massoc 3 (dictsearch(namedobjdict)"acad_layout")) )

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

pbejse — Wed, 24 Jul 2024 12:56:57 GMT

@paullimapa wrote:

The vla functions most likely are not supported with accoreconsole. Even (layoutlist) function is not supported.

@marko_ribar wrote:

Maybe you need to run script through ACAD session and not through CoreConsole... And BTW, can we see script file (*.scr)...

I did not even consider that Design Automation use accoreconsole

Good one @paullimapa @marko_ribar

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

paullimapa — Wed, 24 Jul 2024 13:10:12 GMT

@pbejse Just reading the output from OP:

[07/23/2024 23:02:55] Error: AutoCAD Core Console output contains error(s).

[07/23/2024 23:02:55] End AutoCAD Core Engine standard output dump.

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

CLL_PBE — Wed, 24 Jul 2024 13:14:09 GMT

@paullimapa wrote:
@pbejse Just reading the output from OP:

You are right, I've been away too long 😀

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

adonispaz3G2GB — Wed, 24 Jul 2024 18:35:05 GMT

Yes this script has always worked locally. But now im trying to get it to work on Design Automation which has yet to work.

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

adonispaz3G2GB — Wed, 24 Jul 2024 19:14:23 GMT

This was it right here. I had to re-write my entire AutoLISP script to not use VLA functions and replaced layoutlist with the workaround @paullimapa provided. Thank you very much!

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

paullimapa — Wed, 24 Jul 2024 19:33:32 GMT

glad to have helped...cheers!!!

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

Sea-Haven — Thu, 25 Jul 2024 04:56:23 GMT

Just tried it is there a problem that the list includes "Model" ? It just requires a workaround checking layout name or if Model is always last, just use (repeat (- (length nlist) 1) so does not call "Model". Or just remove "Model" from nlist as part of defun.

Re: AutoLISP DWGToPDF: bad argument type: VLA-OBJECT nil

paullimapa — Thu, 25 Jul 2024 05:18:55 GMT

exactly