| | |
 | BOM Assistant für Stücklistenerstellung , eine App
|
|
Autor
|
Thema: Model Manager Attribute auslesen (239 / mal gelesen)
|
sas-m2n Mitglied Mechanical Design Engineer

 Beiträge: 54 Registriert: 02.03.2011 @Work: HP Z4, NVIDIA Quadro P1000, 32 GB RAM, WIN11 X64 Creo Elements/Direct 20.6.3.0 Modelmanager 20.6.2 @home: DELL Precision M4500 PE8.0 auf Win11 pro X64
|
erstellt am: 24. Sep. 2026 17:47 <-- editieren / zitieren --> Unities abgeben:         
Guten Abend Zusammen, gibt es eine Möglichkeit Attribute von Teilen/Baugruppen und Zeichnungen per lisp auszulesen. Mein Gedanke Teil und Zeichnung laden und dann per Lisp auslesen. Danke im Voraus. Viele Grü0e Steffen [Diese Nachricht wurde von sas-m2n am 24. Sep. 2026 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
achim96 Mitglied Konstrukteur
 
 Beiträge: 146 Registriert: 08.07.2013 Creo Elements / Direct Modeling, V20.7.1.1 Model Manager V20.7.1.1 Part Library
|
erstellt am: 25. Sep. 2026 13:41 <-- editieren / zitieren --> Unities abgeben:          Nur für sas-m2n
Lade mal (load "inq_all_atts"). Dadurch gibt es einen Eintrag in der Werkzeugkiste. Damit kannst du alle Attribute eines Teils abfragen und bekommst sie in ein Textfenster geschrieben. ------------------ freundliche Grüße Achim Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
MiBr Mitglied Konstrukteur
  
 Beiträge: 604 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: 25. Sep. 2026 14:04 <-- editieren / zitieren --> Unities abgeben:          Nur für sas-m2n
|
der_Wolfgang Moderator Tastenhauer
     

 Beiträge: 2477 Registriert: 3.20. ● PE60+80+90@home ● W10 Pro Bld19045.6466 ● Drafting V17~V20.6@job ● Modeling V17~V20.7.2@job ● Windchill 12.1.2.8@job ● UWGM Client 13.1.0.1@job ● Taschenrechner ● brain 6.4 ● Stift+Zettel V8.42
|
erstellt am: 25. Sep. 2026 15:12 <-- editieren / zitieren --> Unities abgeben:          Nur für sas-m2n
|
sas-m2n Mitglied Mechanical Design Engineer

 Beiträge: 54 Registriert: 02.03.2011 @Work: HP Z4, NVIDIA Quadro P1000, 32 GB RAM, WIN11 X64 Creo Elements/Direct 20.6.3.0 Modelmanager 20.6.2 @home: DELL Precision M4500 PE8.0 auf Win11 pro X64
|
erstellt am: 28. Sep. 2026 14:40 <-- editieren / zitieren --> Unities abgeben:         
Guten Tag Zusammen, vielen Dank für Eure antworten. Gib es eine Möglichkeit per Lisp diese Daten auszulesen. (DB-DREF) :FILING = :FILING = :ON-COPY = :ON-XFORM = :ON-SYSID-CHANGE = :ON-MERGE = :ON-SPLIT = :VERSION = :MODEL_ID = :ELID = :UNIQUE_ID_STRING = :LASTUPDATE_DATE = :MODEL_ID_VERS = :CLASS_NAME = :NAME = :INSTANCE_NAME = :CLASS_TYPE = :CREATE_DATE = Viele Grüße Steffen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
der_Wolfgang Moderator Tastenhauer
     

 Beiträge: 2477 Registriert: 3.20. ● PE60+80+90@home ● W10 Pro Bld19045.6466 ● Drafting V17~V20.6@job ● Modeling V17~V20.7.2@job ● Windchill 12.1.2.8@job ● UWGM Client 13.1.0.1@job ● Taschenrechner ● brain 6.4 ● Stift+Zettel V8.42
|
erstellt am: 28. Sep. 2026 22:05 <-- editieren / zitieren --> Unities abgeben:          Nur für sas-m2n
Zitat: Original erstellt von sas-m2n: vielen Dank für Eure antworten. Gib es eine Möglichkeit per Lisp diese Daten auszulesen.
Das hatte dir Michael doch vor 3 Tagen schon beantwortet! -- was hast du denn probiert?? Hier noch mal (für copy'n paste in die Modeling command line, deswegen mit dem 'OLI:' prefix)
Code: (display (format nil "--- DB-DREF von ~S ---~%~{* ~20S ~S~%~}" (oli:sd-inq-obj-pathname (oli:sd-inq-curr-part)) (oli:sd-inq-item-attribute (oli:sd-inq-curr-part) "DB-DREF" :all :attachment :contents) ))
Beispiel: Code: --- DB-DREF von "/cadde-29-005017" --- * :FILING :SD-FILE * :ON-COPY :COPY * :ON-XFORM :MAINTAIN * :ON-SYSID-CHANGE :MAINTAIN * :ON-MERGE :MAINTAIN * :ON-SPLIT :COPY * :CREATE_DATE "vorgestern" * :LASTUPDATE_DATE "Gestern" * :MODEL_ID "42" * :NAME "Steffen"
:contents müsste für DB-DREF passen. Must'de probieren. Habe kein passendes Model hier. ------------------ ● 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 |
der_Wolfgang Moderator Tastenhauer
     

 Beiträge: 2477 Registriert: 3.20. ● PE60+80+90@home ● W10 Pro Bld19045.6466 ● Drafting V17~V20.6@job ● Modeling V17~V20.7.2@job ● Windchill 12.1.2.8@job ● UWGM Client 13.1.0.1@job ● Taschenrechner ● brain 6.4 ● Stift+Zettel V8.42
|
erstellt am: 30. Sep. 2026 10:30 <-- editieren / zitieren --> Unities abgeben:          Nur für sas-m2n
Und hier die Variante für MiBr, StephanW, Seele, vobu und wenige andere Code: (setq a-obj (oli::sd-inq-curr-part)) (display (format nil "--- attributes of ~S ---~{~{~%~%* attribute name ~S~%~{ * ~20S ~S~^~%~}~}~}~%~A~%" (oli:sd-inq-obj-pathname a-obj) (mapcar '(lambda (ia) (list ia (oli::sd-inq-item-attribute a-obj ia :all :attachment :contents))) (sort (oli::sd-inq-item-attributes a-obj :attachment :contents)'string<)) (make-string 42 :initial-element #\-)))
;Und hier im einfachen HTML
Code: (setq a-obj (oli::sd-inq-curr-part) a-name (oli:sd-inq-obj-pathname a-obj)) (with-open-file (fo (format nil "~acedm_obj_item_attributes.html" (oli:sd-inq-temp-dir)) :direction :output :if-exists :supersede :if-does-not-exist :create :external-format :utf-8-bom) (format fo "<!DOCTYPE html><head><title>Item Attributes of ~S</title></head><body><h2>Attributes of ~S</h2>~%<ul>~%~{~{<li>attribute name ~S~%<ul>~%~{<li>~20S ~S</li>~^~%~}</ul></li>~%~}~}</ul>~%<hr/>~A~%</body></html>" a-name a-name (mapcar '(lambda (ia) (list ia (oli::sd-inq-item-attribute a-obj ia :all :attachment :contents))) (sort (oli::sd-inq-item-attributes a-obj :attachment :contents)'string<)) "end of list"))
------------------ ● 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 |