CoCreate Modeling code examples: Automatically saving the current model before OSDM terminates

topic end

<!--
   * Set TOPICTITLE = <nop>CoCreate Modeling code examples: Automatically saving the current model before OSDM terminates
-->

<style type="text/css">
pre { background-color:#FFEECC; }
</style>

#TerminateEvent
---++ Automatically saving the current model before <nop>CoCreate Modeling terminates

You can subscribe to the =*SD-TERMINATE-EVENT*= and execute a function
which saves all currently loaded assemblies and parts. Here's a very simple
example.

<pre>
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Description:  Saves model before <nop>CoCreate Modeling terminates
;; Author:       Claus Brod
;; Created:      1/14/2005 19:20    
;; Language:     Lisp
;;
;; (C) Copyright 2005 Claus Brod, all rights reserved
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
(defun exit-fun(arg &rest args)
  (save_package :recursive :all_at_top 
                :FILENAME (format nil "~A/exitsave.pkg" (oli:sd-inq-temp-dir)) :overwrite))

(oli:sd-subscribe-event oli:*SD-TERMINATE-EVENT* 'exit-fun)
</pre>

Note that it is not clearly defined which parts of the termination <nop>CoCreate Modeling has already
performed when it processes the =*SD-TERMINATE-EVENT*=, so try to do as
little as possible.

-- Main.ClausBrod - 14 Jan 2005

%COMMENT{type="below" nonotify="on"}%

to top

End of topic
Skip to action links | Back to top

You are here: CoCreateModeling > MacroTerminateEvent

r1.5 - 24 Jul 2009 - 20:00 - ClausBrod to top

CoCreateModeling

Welcome