Hot News:

Mit Unterstützung durch:

   Foren auf CAD.de
  PTC Creo Elements/Programmierung
  Datenausgabe Benutzerbezogen freigeben

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:
Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Creo
  
Besichtigung der MAIT.Cloud in Frankfurt | 17.09.2025, eine Veranstaltung am 17.09.2025
Autor Thema:  Datenausgabe Benutzerbezogen freigeben (1391 mal gelesen)
am
Mitglied
Ingenieur FH / Manager Development Tools


Sehen Sie sich das Profil von am an!   Senden Sie eine Private Message an am  Schreiben Sie einen Gästebucheintrag für am

Beiträge: 245
Registriert: 01.02.2003

 erstellt am: 24. Mai. 2019 11:14    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities
Guten Tag Miteinander

möchte in 3D-Access (20.2) die Datenausgabe als step nur dem Benutzer "Meier" zulassen.
Dazu möchte ich die Datei all_load_save_file_types.dat anpassen.

Folgendes habe ich probiert. Funktioniert leider nicht!
..
:step :enable-form
      (progn
  (setf *sd-username* (oli::sd-sys-getenv "USERNAME"))
  (if (string= *sd-username* "Meier") t )
  )

Hat mir da jemand einen Tipp? Ist die :enable-form die beste Variante?
Besten Dank im voraus.
Gruss am

------------------
am

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

Walter Geppert
Moderator
Frank und Frei




Sehen Sie sich das Profil von Walter Geppert an!   Senden Sie eine Private Message an Walter Geppert  Schreiben Sie einen Gästebucheintrag für Walter Geppert

Beiträge: 2166
Registriert: 12.12.2000

Konstruktion von Sondermaschinen, Montageautomaten, Meß- und Prüfeinrichtungen, Vorrichtungen und Produktentwicklung mit Creo Elements/Direct Modeling 20.6, AdvancedDesign, Surfacing, Simulate, SolidPower, ModelManager auf
HP ZBook Fury 16 G9, Windows 10 Pro 64

erstellt am: 24. Mai. 2019 11:41    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für am 10 Unities + Antwort hilfreich
..
:step :enable-form (string= (oli::sd-sys-getenv "USERNAME") "Meier")
 


------------------
meine LISP-Makros sind mit vielen anderen aus diesem Forum auf osd.cad.de Disclaimer
Grüße aus Wien

Walter

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

MiBr
Mitglied
Konstrukteur


Sehen Sie sich das Profil von MiBr an!   Senden Sie eine Private Message an MiBr  Schreiben Sie einen Gästebucheintrag für MiBr

Beiträge: 577
Registriert: 30.06.2015

HP Z440 Workstation 64GB
Modeling 20.1.2.0 (x64)
Drafting 20.1.2.0 (64x) klas. UI
Modell Manager 20.1.2.0
Ansys Workbeanch 22R2 Mechanicail Pro + FKM Inside

erstellt am: 24. Mai. 2019 11:45    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für am 10 Unities + Antwort hilfreich
Hallo,

ohne zu testen und mit Null Ahnung, würde ich dass so versuchen:

Code:
(when (string= (oli::sd-sys-getenv "USERNAME") "Maier") (:step))

Gruß Michael

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

MiBr
Mitglied
Konstrukteur


Sehen Sie sich das Profil von MiBr an!   Senden Sie eine Private Message an MiBr  Schreiben Sie einen Gästebucheintrag für MiBr

Beiträge: 577
Registriert: 30.06.2015

HP Z440 Workstation 64GB
Modeling 20.1.2.0 (x64)
Drafting 20.1.2.0 (64x) klas. UI
Modell Manager 20.1.2.0
Ansys Workbeanch 22R2 Mechanicail Pro + FKM Inside

erstellt am: 24. Mai. 2019 11:46    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für am 10 Unities + Antwort hilfreich
Ups, da war jemand schneller! 
Denke der Walter hat da mehr Ahnung!!! 

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

am
Mitglied
Ingenieur FH / Manager Development Tools


Sehen Sie sich das Profil von am an!   Senden Sie eine Private Message an am  Schreiben Sie einen Gästebucheintrag für am

Beiträge: 245
Registriert: 01.02.2003

 erstellt am: 24. Mai. 2019 13:02    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities
Hallo Walter
besten Dank für Deine Antwort.
Funktioniert!

Gruss am

------------------
am

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

am
Mitglied
Ingenieur FH / Manager Development Tools


Sehen Sie sich das Profil von am an!   Senden Sie eine Private Message an am  Schreiben Sie einen Gästebucheintrag für am

Beiträge: 245
Registriert: 01.02.2003

zurzeit: ptc creo elements/direct modeling 20.0
mit ASCAD Schnittstelle ins SAP
vormals: SolidWorks
mit Direktschnittstelle CIDEON in SAP

erstellt am: 24. Mai. 2019 13:02    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities
Hallo MiBr
besten Dank für Deine Lösung.
Gruss am

------------------
am

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

am
Mitglied
Ingenieur FH / Manager Development Tools


Sehen Sie sich das Profil von am an!   Senden Sie eine Private Message an am  Schreiben Sie einen Gästebucheintrag für am

Beiträge: 245
Registriert: 01.02.2003

 erstellt am: 28. Mai. 2019 07:19    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities
Guten Tag Hr. Geppert
haben Sie mir noch die Lösung wenn es neben Meier auch noch der Schmid und der Egger sein soll.
Besten Dank für Ihre Hilfe.
Mit freundlichen Grüssen
am

------------------
am

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

Walter Geppert
Moderator
Frank und Frei




Sehen Sie sich das Profil von Walter Geppert an!   Senden Sie eine Private Message an Walter Geppert  Schreiben Sie einen Gästebucheintrag für Walter Geppert

Beiträge: 2166
Registriert: 12.12.2000

Konstruktion von Sondermaschinen, Montageautomaten, Meß- und Prüfeinrichtungen, Vorrichtungen und Produktentwicklung mit Creo Elements/Direct Modeling 20.6, AdvancedDesign, Surfacing, Simulate, SolidPower, ModelManager auf
HP ZBook Fury 16 G9, Windows 10 Pro 64

erstellt am: 28. Mai. 2019 09:10    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für am 10 Unities + Antwort hilfreich
Code:
...
:step :enable-form (or (string= (oli::sd-sys-getenv "USERNAME") "Meier")
(string= (oli::sd-sys-getenv "USERNAME") "Müller") 
...
...
(string= (oli::sd-sys-getenv "USERNAME") "Derauch"))
...

Die Zeilenumbrüche sind nur wegen der Lesbarkeit, kann auch alles in einer einzigen Zeile stehen. Wichtig ist die letzte Klammer nicht vergessen


------------------
meine LISP-Makros sind mit vielen anderen aus diesem Forum auf osd.cad.de Disclaimer
Grüße aus Wien

Walter

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

der_Wolfgang
Moderator
Tastenhauer


Sehen Sie sich das Profil von der_Wolfgang an!   Senden Sie eine Private Message an der_Wolfgang  Schreiben Sie einen Gästebucheintrag für der_Wolfgang

Beiträge: 2296
Registriert: 3.20.

● PE60+80@home
● W10 Pro Build10.0.19045.5737
● Drafting V17~V20.7@job
● Modeling V17~V20.7@job
● Windchill 12.1.2.6@job
● UWGM Client 13.0.0.1@job
● Taschenrechner
● Stift+Zettel V8.42

erstellt am: 28. Mai. 2019 23:23    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für am 10 Unities + Antwort hilfreich
Folgendes läßt sich einfacher pflegen und ist vielleicht auch lesbarer:
Code:
:enable-form (find (oli::sd-sys-getenv "USERNAME") '("Meier" "Müller" "Schmidt") :test #'equal)

Member würde auch gehen:

Schlussendlich würde ich es so schreiben

Code:
:enable-form (find (sd-string-downcase (sd-sys-getenv "USERNAME")) '("meier" "müller" "schmidt") :test #'equal)

------------------
● Firefox ESR ● Java Forum Stuttgart JUGS ● OSD Hilfeseite (de) / help page (en) ● NotePad++ ● BuFDi ●

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!
Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2025 CAD.de | Impressum | Datenschutz