grip: attribut kopieren? (Siemens Digital Industries Software/NX Programmierung)

Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für NX

Productronica 2025 - Weltleitmesse für Elektronikfertigung, eine Veranstaltung am 18.11.2025

Events abonnieren

Autor

Thema: grip: attribut kopieren? (818 mal gelesen)

Sirus
Ehrenmitglied
CAD Applikationsentwickler

Senden Sie eine Private Message an Sirus

Schreiben Sie einen Gästebucheintrag für Sirus

Beiträge: 1577
Registriert: 03.06.2004

SolidWorks2024

erstellt am: 24. Sep. 2008 09:35

Editieren oder löschen Sie diesen Beitrag!

<-- editieren / zitieren -->

Unities abgeben:

hallo zusammen

von ugs-samples habe ich nachfolgendes grip-prog.
ich möchte aber nur ein bestimmtes attribut (zb. DB_PART_REV)
vom master auf das part kopieren nicht alle, kann mir jemand helfen?

mit grip möchte ich es machen,
da ich kein vb-code gefunden habe....

----------------------------
ENTITY/ child, parent
STRING/ att_title(50), att_value(132)

$$ Find the first component in the part
MASK/ 63
INEXTE/ ALL
A10: child = NEXTE/ IFEND, A90:
parent = &MEMCMP(child, IFERR, A15
JUMP/ A10:

$$ found the component - now transfer all the attributes
A15: n_atts = &NATTR(child, 5)
DO/ A20:, ii, 1, n_atts
att_title = &ATTTL(child, ii, 5)
att_value = &ATTVL(child, att_title)

ASATT/PART, att_title, att_value
A20: $$ End do ii

A90: HALT
----------------------------

------------------
gruss urs

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

älg
Mitglied
CADmin

Schreiben Sie einen Gästebucheintrag für älg

Beiträge: 403
Registriert: 17.06.2003

erstellt am: 24. Sep. 2008 09:42

<-- editieren / zitieren -->

Unities abgeben:

Nur für Sirus

Dann bau noch eine Schleife ein:

Code:
ENTITY/ child, parent
STRING/ att_title(50), att_value(132)
$$ Find the first component in the part
MASK/ 63
INEXTE/ ALL
A10: child = NEXTE/ IFEND, A90:
parent = &MEMCMP(child, IFERR, A15
JUMP/ A10:
$$ found the component - now transfer all the attributes
A15: n_atts = &NATTR(child, 5)
DO/ A20:, ii, 1, n_atts
att_title = &ATTTL(child, ii, 5)

IFTHEN/ att_title == 'DB_PART_REV'
att_value = &ATTVL(child, att_title)
ASATT/PART, att_title, att_value
$$ hier kann noch ein Sprung nach A20: rein, um die Sache abzukürzen
ENDIF
A20: $$ End do ii
A90: HALT

Beachte, daß nur die ersten 6 Zeichen einer Variable relevant sind, der Rest wird ignoriert. Das kann Fehler zur Folge haben, wenn sich Variablen erst ab dem 7. Zeichen unterscheiden.

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

Sirus
Ehrenmitglied
CAD Applikationsentwickler

Beiträge: 1577
Registriert: 03.06.2004

SolidWorks2024

erstellt am: 24. Sep. 2008 11:31

<-- editieren / zitieren -->

Unities abgeben:

hallo älg

vielen dank, funktioniert perfekt!
(...grip ist also doch noch cool..)

------------------
gruss urs

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

Facility Manager - Schwerpunkt Brandschutz und Energie (m/w/d)
Die börsennotierte Rheinmetall AG mit Sitz in Düsseldorf steht als integrierter Technologiekonzern für ein substanzstarkes, international erfolgreiches Unternehmen, das mit einem innovativen Produkt- und Leistungsspektrum auf unterschiedlichen Märkten aktiv ist. Rheinmetall ist ein führendes internationales Systemhaus der Verteidigungsindustrie und zugleich Treiber zukunftsweisender technologischer und industrieller Innovationen auf den zivilen Märkten....
*Anzeige ansehen*	Gebäude-, Versorgungs-, Sicherheitstechnik

älg
Mitglied
CADmin

Beiträge: 403
Registriert: 17.06.2003

erstellt am: 24. Sep. 2008 11:33

<-- editieren / zitieren -->

Unities abgeben:

Nur für Sirus

quod erat demonstrandum

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

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)