---

Hallo,

mit dem Macro sollen Teile und BG eigenstaendig gemacht werden die keine Exemplare sind, also neue Teile an der gleichen Stelle.

Ich möchte das der Dialog geöffnet bleibt und eine neue Eingabe erwartet. In der Beschreibung zu sd-defdialog habe ich nichts dazu gefunden.

Kann mir von Euch einer schreiben wie das geht ?

Tschuess
Martin

Code:

(in-package :EXAMPLES)
(use-package :OLI)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(sd-defdialog 'gr_eigenstaendig
:dialog-title "Eigenständig"
:variables
'((Teil :value-type :part-assembly
:modifies nil
:initial-value nil
:title "Teil/Baugruppe"
:prompt-text "Teil oder Baugruppe auswaehlen."
:after-input (after-bgr-action)
)
)

:local-functions
'((after-bgr-action ()

(if (not (SD-INQ-OBJ-PARENT-CONTENTS-READ-ONLY-P Teil))
(progn

(setf exemplar-name "Eigenstaendig.Teil.BG.11.11.2005")

(when (sd-pathname-to-obj (format NIL "/~A" exemplar-name))
(delete_3d (format NIL "/~A" exemplar-name)))

(create_multiple_pa :share :source Teil :name exemplar-name :owner "/")

(pa_unshare :source TEIL :onelevel :on)

(delete_3d (format NIL "/~A" exemplar-name))
)
(progn
(sd-display-message
"Die uebergeordnete Baugruppe ist schreibgeschuetzt."
:title "Schreibschutz auf Baugruppe"
:push "OK"
)
)

)
)
)
:ok-action
'(progn
)
)

------------------
OSDM - Die freie Wissensdatenbank
WorkManager Forum

[Diese Nachricht wurde von Martin.M am 11. Nov. 2005 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Mit

:next-variable 'Teil

innerhalb der Teil-Variable - also z.B. nach :after-input

------------------
Viele Gruesse,
Michael

--
Spam goes SPAM@CoCreate.com and spam@postini.com ;-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Micahel,

vielen Dank für Deine Antwort. Leider schließt sich der Dialog trotzdem.

Tschuess
Martin

------------------
OSDM - Die freie Wissensdatenbank
WorkManager Forum

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Martin,

Du musst den Aufruf von Kommandos (delete_3d, create_multiple_pa, pa_unshare) in Deiner lokalen Funktion mit sd-call-cmds umschliessen. Am besten Du schreibst ein sd-call-cmds um den gesamten Body von after-bgr-action.

Viele Gruesse,
Markus

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP