verify if dwg was saved

Hello,

-I have a lisp that verifies whether a dwg was saved but it doesn't seem to
work quite right. When you save it should warn by a pop up dialogue box if
the dwg wasn't saved, see lisp below.

-When saving this is what happens with no errors, well there is an error but
not the way I expected.

----------------------cut---------------------cut---------------------cut---------------------
Command: SS
..save Save drawing as <G:\05148\A-ELEV1.dwg>: A drawing with this name
already
exists.
Do you want to replace it? <N> y Unable to save to drawing
G:\05148\A-ELEV1.dwg
as it is being accessed by another session.
Drawing saved to G:\05148\sav1BC.tmp
----------------------------------------------------------------------------------------------

lisp
----------------------------------------------------------------------------------------------
(DEFUN C:ss ()
(SETQ DN(GETVAR "DWGNAME"))
(SETQ DP(GETVAR "DWGPREFIX"))
(SETQ B(STRCAT Dp DN))
(command ".save" "" "y")
(SETQ SN(GETVAR"SAVENAME"))
(setq xc(WCMATCH B SN))
(IF(= xc nil)(blad)))

"blad" is just a dialogue box pop up that says not saved (eye catching)"
----------------------cut---------------------cut---------------------cut---------------------
Can someone offer some suggestions please.
Thank you,
Hunter

 

Use (command ".qsave")

 

Jim,

Well.....thank you!

Hunter

 

This points out a beef I have with AutoCAD over the various methods of
saving, that apparently a lot of people aren't aware of.

The toolbar and pull-down menu items that say "Save" are misleading, because
they are in fact NOT the actual SAVE command -- they're the QSAVE command.
That just updates the contents of the drawing file you're in, and you
wouldn't need the "yes" answer in there for that.

The SAVE command makes a drawing file SEPARATE from the one you're in, but
leaves you working in your original drawing, so if you use the same name and
choose to overwrite it, you're trying to overwrite the drawing you're in,
which of course it can't let you do.

The SAVEAS command (as in most other Windows programs) makes a drawing file
separate from the one you're in, AND leaves you working in that new drawing
instead of the one in which you invoked the command.
--
Kent Cooper

.....

 

Thank you Kent! Somehow SAVE had eluded me. And even when I had looked for
just that, for customization.

But this revives a question I've had; is there a SAVE (per Kent's
explanation) method available for programming (w/o command), anyone?

IOW:
command qsave = doc.save
command save = <what goes here?>
command saveas = doc.saveas

 

Look into the functions:

vla-save
vla-saveas

 

If you mean you want to use these AutoCAD commands without using the
(command) lisp function, there's always the plain old macro menu item
approach, or a script. [I don't still have the original post, or I'd offer
a macro or script equivalent to the lisp line there, if the rest of it can
also be done without the (command) function.]

 

Thank you Luis. Yes, those are what I mentioned (just stated in vba terms;
sorry).
But (referring back to Kent's description) neither of those ...

.... makes a drawing file SEPARATE from the one you're in, but
leaves you working in your original drawing...

AFAIK.

That's what I'm looking for, but without using any form of "command".
I don't *think* it's there, but I wouldn't mind being wrong.

James

 

No, I mean for direct use in lisp or vba.

Thanks,

James

 

Let me see if I understood now.... if not please ignore me...

When I want to have a separate file, I use vla-save to have the latest
changes made and vl-file-copy or just the later.

LE.

 

Yes, almost exactly. The only difference is whether the current file is
updated. Vla-save and then vl-file-copy saves the current file and makes a
new file. Command SAVE makes the new file without altering the current
file.

James