Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  Teilereferenzlink bei Erstellung einer Zeichnung umbiegen

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
Autor Thema:  Teilereferenzlink bei Erstellung einer Zeichnung umbiegen (1503 mal gelesen)
ser4
Mitglied


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

Beiträge: 5
Registriert: 30.11.2011

V5 R19 SP1
T9300(2x2,6GHz), 2GB RAM
NVidia Quadro FX360M(512M GRAM)

erstellt am: 30. Nov. 2011 15:39    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 Forum,

habe schon Suchfunktion bemüht, bin anscheinend zu dumm um "richtige" Posts zu finden ggf. gefundene richtig interpretieren.
Ich habe folgende Frage: es ist ein Verzeichnis mit 3d-Teilen(vorerst CATParts) vorhanden. Ein angedachtes Macro soll Part aufrufen, eine Zeichnung vom Template(NewFrom) erstellen und vom geöffnetem Part ein Zeichnungsansicht erstellen. Danach wird die Zeichnung aktualisiert, und mit SaveAs abgespeichert.
Zeichnungstemplate beinhaltet externe Referenzen, die auf ein Parttemplate zeigen. Diese will ich "umbiegen" auf durch ein bereits vom Macro geöffnetes und verwendetes CatPart.
Mit Clicks sähe es so aus: Bearbeiten(Edit)-> Verknüpfungen(Links)->Reiter"Dokumente, auf die verwiesen wird"(Ref. Documents)->Template CatPart aktivieren-> Ersetzen(Replace)-> Browser schlißen-> Im Auswahl-Fenster icon "Geladenes Dokument" anklicken-> im Fenster "SitzungsDokument" des einzig vorhandene anklicken-> Bestätigen. Also diese "Clickfolge" lässt sich nicht mit Macrorecorder aufzeichnen! Und ich weiß nicht wie ich es an Macro weitergeben kann.
Nachfolgend

Code:

Sub CATMain()

    CATIA.DisplayFileAlerts = False

    Dim oFileSys As FileSystem
    Set oFileSys = CATIA.FileSystem


    Dim sFolderPath As String
    sFolderPath = InputBox( "Enter a folder path:", "Create Drawings", _
                            sDocPath & "input Folder Path")
    If (Not oFileSys.FolderExists(sFolderPath)) Then
      Err.Raise 9999,,sFolderPath & ": This Folder does not exist"
    End If

    Dim oFolder As Folder
    Set oFolder = oFileSys.GetFolder(sFolderPath)

    Dim iI
    For iI = 1 To oFolder.Files.Count
Dim oFile As Object
        Set oPartToDraw = oFolder.Files.Item(iI)

        If InStr(oPartToDraw.Name, ".CATPart") <> 0 Then

           
            Dim oDoc As Document
            Set oDoc = CATIA.Documents.Open(oPartToDraw.Path)
           
End If


    Dim oDrawing As DrawingDocument
   
Set oDrawing = CATIA.Documents.NewFrom("C:\...\test_3d\vorlage_drw.CATDrawing")

   
    Dim oSheet As DrawingSheet
    Set oSheet = oDrawing.Sheets.ActiveSheet


    Dim oFrontView As DrawingView
    Set oFrontView = oSheet.Views.Add("Front View")


    Dim oFrontViewGB As DrawingViewGenerativeBehavior
    Set oFrontViewGB = oFrontView.GenerativeBehavior


    oFrontViewGB.Document = oDoc

    oFrontViewGB.DefineFrontView 1, 0, 0, 0, 1, 0


    oFrontView.x = 300
    oFrontView.y = 150
    oFrontViewGB.Update
'save as
Dim generativDoc As Document
Set generativDoc = oFrontView.GenerativeBehavior.Document
oName = oPartToDraw.Name & I & ".CATDrawing"
msgbox oName
CATIA.ActiveDocument.SaveAs (oName)
    'CATIA.ActiveDocument.Close

   
    Next

End Sub


Danke und Gruß

p.s. Sorry, V5R19SP1-9HF6

------------------
...Mäuse weinten, stachen sich blutig, frassen der Kaktus aber weiter...

[Diese Nachricht wurde von ser4 am 30. Nov. 2011 editiert.]

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

bgrittmann
Moderator
Konstrukteur


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

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 30. Nov. 2011 15:44    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 ser4 10 Unities + Antwort hilfreich

Servus
Willkommen im Forum.
Dein Makro sieht auf den ersten Blick doch vielversprechende aus.
Wo liegen deine Problemen? Was funktioniert nicht?

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

ser4
Mitglied


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

Beiträge: 5
Registriert: 30.11.2011

V5 R19 SP1
T9300(2x2,6GHz), 2GB RAM
NVidia Quadro FX360M(512M GRAM)

erstellt am: 30. Nov. 2011 16: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


cad_de.jpg

 
Hallo Bernd,
danke für schnelle Reaktion.
Sorgen bereitet mir die bleibende Verlinkungen, die auf ein ursprünglich mit Templatedrawing verknüpftes Catpart zeigen.
Diese will ich durch auf ein in Sitzung vorhandenes Catpart umbiegen.
Wie im Bild zu sehen wäre, bleiben nach der Erstellung beide Refenzlinks.
Wie kann man Zuweisung c:\5_tage\temp\vorlage.CATPart durch eine belibige(in meinem Fall C:\5_tage\20048.Catpart) ersetzen?

------------------
...Mäuse weinten, stachen sich blutig, frassen der Kaktus aber weiter...

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

bgrittmann
Moderator
Konstrukteur


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

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 30. Nov. 2011 16: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 Nur für ser4 10 Unities + Antwort hilfreich

Servus
Hast du mehrere Ansichten in der Zeichnung?
Ich vermute, dass du für jede Ansicht den Link einzeln umhängen musst.

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

ser4
Mitglied


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

Beiträge: 5
Registriert: 30.11.2011

V5 R19 SP1
T9300(2x2,6GHz), 2GB RAM
NVidia Quadro FX360M(512M GRAM)

erstellt am: 30. Nov. 2011 16:35    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

Nein, es gibt nur 1 Ansicht,
aber mehrere Externe Parameter, die vom CatPart-Template kommen.

------------------
...Mäuse weinten, stachen sich blutig, frassen der Kaktus aber weiter...

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



Entwicklungsingenieur / Berechnungsingenieur (m/w/d)

Digitale Trans­formation. Nach­haltig­keit. Friedens­sicherung. Spannende Aufgaben, an denen auch wir bei Diehl in unseren fünf Teil­konzernen Metall, Controls, Defence, Aviation und Metering und unsere über 16.000 Mit­arbeiter­innen und Mit­arbeiter mit Hochdruck arbeiten. Entdecken Sie faszinierende Techno­logien und bewerben Sie sich. In einem von Vertrauen und Mut geprägten Familien­unter­nehmen, das beständig und stabil ist ? aus Tradition....

Anzeige ansehenEntwicklung
bgrittmann
Moderator
Konstrukteur


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

Beiträge: 11780
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 30. Nov. 2011 16:43    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 ser4 10 Unities + Antwort hilfreich

Servus
Da hilft vielleicht nur die "Holzhammer-Methode".

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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)2023 CAD.de | Impressum | Datenschutz