---

Hallo zusammen,
Bin ein Grip rookie! Kann CATIA VBA aber kein grip!
Darum meine Frage: Kann man wie in vaba einen ordner durchsuchen nach
einer bestimmten Fileendung z.b. ...???_dwg1.drw und diese über ein grip
nacheinander öffnen, updaten, speichern und wieder schließen lassen?
In Catia habe ich so was schon programmiert.
Geht so was über grip?
Danke für euer Feedback!
Greets Schmitty

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

---

grip nä lass uns übers Wetter reden.
Oder such mal nach Journal und schau im Nx programmier Forum in die Nx Hilfe und den nxopen ordner deiner Nx Installation

------------------
mfg
uwe.a

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

---

Hallo Schmitty,

endlich mal 'ne GRIP-Frage ;-)
Klar geht das, unten findest du ein Programm, das etwa deiner Frage entspricht.

Leider muss auch ich gestehen, dass GRIP etwas unmodern geworden ist. Aber GRIP ist extrem stabil, hat einen ganz klar definierten  Sprachwortschatz (der gegenüber NXOpen.NET jedoch ziemlich eingeschräkt ist) eine einfache Syntax ... und ist weitestgehend auf- UND abwärtskompatibel. Es gibt weltweit Millionen GRIP-Programme die im aktiven Einsatz sind (haben wir schon über 1.200), daher ist vorerst nicht zu befürchten, dass GRIP stirbt, auch wenn das seit 10 bis 15 Jahren behauptet wird.

Und auch für mich gibt's einen Lichtblick! Ab der NX8 (die Beta-Version ist vor wenigen Tagen eingetroffen) gibt es "SNAP".
Zitat aus der Online-Hile: "SNAP is similar to the GRIP language in its purpose, flexibility, and ease of use."

Na, da scheint ja dann die mühsame Einstiegsschwelle für NX-Programmierer etwas zu sinken ;-)

$$  del_attribute.grs
$$
$$  Alle Attribute loeschen, um die IGES-konvertierten-Parts
$$  kleiner zu machen.
$$
$$  Das Programm laeuft ueber alle *.prt-Dateien des angegebenen
$$  Directories.
$$
$$  Walter Hogger / 14.02.1996
$$

      ENTITY/elem
      STRING/dirnam(60), sub1(4)
      STRING/partna(120)

$$---  Directoryname erfragen
      TEXT/'Elementnamen loeschen im Directory: ',$
            dirnam, Antw1
      JUMP/ENDE:,ENDE:,,,Antw1

$$---  Directory oeffnen
      DOPEN/dirnam,IFERR,Fehl1:

$$--------- Schleife ueber alle PARTS -------------------------------
Nextp:
      DNEXT/IFEND,ok1:,IFERR,Fehl2:

$$---  nur Partfiles auswaehlen
      partna = dirnam + '/' + &FNAME

      len = LENF(partna)

      IFTHEN/ len <= 4
        JUMP/Nextp:
      ENDIF

      Sub1 = SUBSTR(partna,len-3,4)
      IFTHEN/ sub1 <> '.prt'
        JUMP/Nextp:
      ENDIF

$$---  PART-File aufrufen
      FETCH/PART,partna,IFERR,Fehl3:

$$---  Meldung, was gerade bearbeitet wird
      PRINT/'Bearbeite Datei: ' + partna

$$---    Alle ENTITY-Namen loeschen
        INEXTE/ALL
$$---    Schleife ueber alle Elemente
LOOP1:
        elem = NEXTE/IFEND,ok2:
          DELNAM/elem
        JUMP/LOOP1:

ok2:
$$---    PART wieder speichern und schliessen
        FILE/PART,partna,IFERR,Fehl4:
        FTERM/PART,partna,IFERR,Fehl5:

$$---  naechstes PART holen
      JUMP/Nextp:

$$--------- Ende der Schleife ueber alle PARTS ----------------------

$$-------- Fehlerbehandlung -----------------------------------------

Fehl1: PRINT/'Fehler beim Oeffnen des Directories '+dirnam
      JUMP/ENDE:

Fehl2: PRINT/'Fehler beim Oeffnen einer Datei'
      JUMP/ENDE:

Fehl3: PRINT/'Fehler beim Oeffnen der Datei '+ partna
      JUMP/ENDE:

Fehl4: PRINT/'Fehler beim Speichern der Datei ' + partna
      JUMP/ENDE:

Fehl5: PRINT/'Fehler beim Schliessen der Datei ' + partna
      JUMP/ENDE:

ok1:  PRINT/' '
      PRINT/'_____ Die Directory ist fertig bearbeitet ! ___________'

ENDE: 
      HALT

------------------
Walter Hogger

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

---

UUUUps!

Ich habe das Programm eben nochmal überflogen. Es scheint sich um eine nicht fertige Version zu handeln.

Die Schleife LOOP1: würde so nicht klappen, man darf in der Schleife nicht einfach Elemente löschen ... übrigens auch nicht unter NXOpen.NET.

Gruß

------------------
Walter Hogger

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

---

Hallo Herr Hogger,
Sie haben mir schon sehr geholfen!
Dafür erstmal vielen Dank!
Mein Grip läuft bereits, jedoch noch nicht ganz so wie es soll.
Das Grip öffnet die gewünschten Drawings, speichert diese und schließt sie wieder.
Sie sollen jedoch vor dem speichern upgedatet werden.
Ich kenne auch den passenden Grip Befehl dafür nicht.

Vielen Dank im Vorhinein für die Hilfe!

Gruß nach Anger
Schmitty

P.S. Ein Kollege von mir ist nächte Woche bei Euch auf Schulung.
    Der freut sich schon auf NX!

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

---

NX-Start_mit_Macro.pdf

Hallo Schmitty,

das war ein Treffer!

Ein "Update Drawing" gibt es in GRIP leider nicht, obwohl die Funktion oft gefragt wird, da man teilweise Stunden warten muss, bis große Zusammenbauzeichnungen Upgedatet sind und dieser Update nicht in der normalen Arbeitszeit passieren sollte.

Wir haben hier Lösungen, mussten aber auch auf andere Möglichkeiten ausweichen.

Tipp 1) Man kann ein Macro erstellen das die Aufgabe erledigt. Klappt aber eher nur für den Zeichnungsupdate für ein Part bzw. eine Baugruppenzeichnung (nativ versteht sich ohne TC), (siehe Anlage).

Tipp 2) Du wühlst dich in die Möglichkeiten der NXOpen.NET-Programmierung ein oder es gibt dir hier jemand entscheidende Tipps.

Tipp 3) Du schickst mir eine PM und ich kann versuchen, dir über den "kurzen Dienstweg" zu helfen. Leider bin ich aber nächste Woche nicht im Lande. Alternativ kannst Du meine Firma kontaktieren ... das soll aber keine Werbung sein, die sieht man hier - zu Recht - nicht so gerne.

Gruß

------------------
Walter Hogger

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

---

Hallo Herr Hogger,

Habe jetzt eine Routine in VB, die das ausgewählte verzeichnis nach meinen gesuchten drawings durchwühlt und auch findet.
Jetzt fehlen mir jedoch die entprechenden codes, wie ich die Objects in NX anspreche um diese Zeichnungen zu öffnen,
upzudaten, zu speichern und zu schließen.
Die Drawings sind vom Prinzip her immer gleich: der sheet heisst immer sht1 mit einer verschiedenen Anzahl an Views.
Kann ich diesen sht1 ansprechen?
Ich hoffe ihr könnt mir helfen

Vielen Dank Schmitty

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

---

Hi Schmitty,

du kannst doch jetzt einfach ein BasePart laden also...:
Dim blub as BasePart = sess.Parts.OpenBaseDisplay(.....)

also jetzt hast du das teil geladen nun nur noch alle sheets holen und updaten...

BTW unter support.ugs.com gibt es sehr sehr viele Beispiele aus denen man sich dies locker zusammenbasteln kann...

------------------
Gruß

Michael

have you tried turning it off and on again

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

---

Danke Michael,

hab es jetzt geschafft!

Super Tip mit dem Support!

Danke

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