---

PDF_Drucker.jpg

Hallo zusammen!

Ich habe unter CATIA einen PDF-Drucker installiert, der auch soweit funktioniert.
Meine Frage:
Kann das Uebergabe-Skript (siehe Bild) so angepasst werden, dass der Name der Ausgabedatei dem Namen der jeweiligen CATIA-Drawing entspricht, und nicht jedes mal als drawing.pdf abgespeichert wird.

Meine Programmierkenntnisse halten sich stark in Grenzen 

------------------
--
Gruss

Stefan R.

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

---

Hallo stefan_r,

die Zeile müßte für Dein Vorhaben:

set CATOUT=C:\Temp\%CATPRT_DOC_NAME%.pdf

heißen oder so erweitert, wie es CATIA standardmäßig vorgibt:

if %CATPRT_DOC_SHEETS_COUNT%==1 goto OneSheet
set CATOUT=C:\Temp\%CATPRT_DOC_NAME%_%CATPRT_DOC_SHEETS_NUM%.pdf
goto End
:OneSheet
set CATOUT=C:\Temp\%CATPRT_DOC_NAME%.pdf
:End

[Edit]
Allerdings bekommst Du hier den Dokumentnamen (*.CATDrawing, *.CATPart,...) als Name: "Beispiel.CATPart.pdf"
[/Edit]

mfg,
Lusilnie

[Diese Nachricht wurde von Lusilnie am 25. Nov. 2005 editiert.]

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

---

Hallo Lusilnie,

funktioniert super!!

Danke! Unities sind Unterwegs.

------------------
Gruss

Stefan R.

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

---

Hallo,

ich weiss das Thema ist schon ziemlich alt, bin aber zufällig beim Suchen drauf gestoßen.

Gibt es denn eine Möglichkeit den Dokumentnamen so anzupassen das kein ".CATDrawing" angehängt wird??

mit Left(...,10)

habe ich es versucht klappt aber nicht, bin mir aber nicht sicher ob die Funktion hier funktioniert oder ob ich sie falsch Aufrufe.

Vielleicht hat ja jemand eine Idee.

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

---

Hallo joerneman,

du kannst auch direkt über "Save as" als "PDF" speichern.

------------------
Gruß Uwe

Auch Catia ist nur ein Mensch!    

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

---

Hallo!

Ja, das geht:
Ersetze %CATPRT_DOC_NAME% durch %CATPRT_DOC_NAME:.CATDrawing=%
Dann wird das ".CATDrawing" weggelassen.
(siehe SET der normalen "DOS"-cmd)

salu'
tobul

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

---

Hallo Uwe,

ich würde gerne diese Möglichkeit nutzen um Drawings als .jpg abzuspeichern.

Das klappt auch wunderbar nur das .CATDrawing im Dokumentname bekomme ich nicht weg. Und will es ungerne jedesmal von Hand entfernen.

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

---

Schau mal hier

------------------
Gruß Uwe

Auch Catia ist nur ein Mensch!    

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

---

Servus
Dann schreib dir kurz ein Makro, dass dir den Dateinamen wie gewünscht zusammensetzt.

Gruß
Bernd

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

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

---

Vielen Dank an tobul und uwe.

So funktioniert es. Perfekt. Danke.

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

---

Zitat:

---

Original erstellt von bgrittmann:
Servus
Dann schreib dir kurz ein Makro, dass dir den Dateinamen wie gewünscht zusammensetzt.

Gruß
Bernd

---

Hallo Bernd,

und wie könnte ich das Makro mit dem Laufzeitscripts des Drucker verknüpfen.
Bzw. wie kann ich die Variablen übergeben?
Muss ich den Drucker im Makro aufrufen?

Das wäre nämlich meine nächste Baustelle, damit ich den Speicherort vorgeben kann.

[Diese Nachricht wurde von joerneman am 13. Okt. 2016 editiert.]

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

---

Servus
Was hast nun genau vor?
Ein jpg könntest du auch ohne Drucker erstellen (siehe Uwes Beitrag)
Dazu könntest du ein Makro von der Catia.cad.de modifizieren.

Gruß
Bernd

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

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

---

Servus,

Mein Ziel ist es:

Aus einem Verzeichnes alle CATDrawings als .jpeg umzuwandeln/abzuspeichern.
Größe der .jpeg A1
Auflösung 300dpi
Name jpeg gleich dem Name des Drawings.

Bin jetzt hier auf die Variante mit dem Drucker gestoßen, da ich hier das Format A1 vorgeben kann.

Wenn ich ein jpg mit Save As abspeicher habe ich keine weiteren Einstellmöglichkeiten.

Wenn ich irgendwo falsch liege oder ihr Vorschläge für die Herangehensweise habt her damit
Würde mich freuen.

Danke

Gruß Jörn

[Diese Nachricht wurde von joerneman am 13. Okt. 2016 editiert.]

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

---

Servus
Wenn du die DPI einstellen willst geht das wohl nur über einen Drucker.
Hier ein Beispiel:

Code:

---

Sub CATMain()

dim i as integer
dim MyPageSetup as PageSetup
dim sOutputDirectory as String
dim sFileName as String
Dim oDoc as Document
Dim oSheets as Sheets
dim oSheet as Sheet

sOutputDirectory = "C:\temp\"

Set oDoc = CATIA.ActiveDocument
Set oSheets = oDoc.Sheets

For i = 1 to oSheets.Count
  If Not oSheets.Item(i).isDetail  then
    Set oSheet = oSheets.Item(i)
    Set MyPageSetup = oSheet.PageSetup
    MyPageSetup.PaperSize = catPaperA1
    MyPageSetup.Orientation = catPaperLandscape
    MyPageSetup.LeftMargin = 0
    MyPageSetup.TopMargin = 0
    MyPageSetup.BottomMargin = 0
    MyPageSetup.Dpi = 300
    sFileName = sOutputDirectory & Left(oDoc.Name, Len(oDoc.Name) - 11) & "_" & i & ".jpg"
    oSheet.PrintToFile sFileName
  End If
Next
End Sub

---

Den Code kannst du dann noch erweitern, dass de richtige Drucker ausgewählt wird und jeder Zeichnung aus einem Verzeichnis abgearbeitet wird.

Gruß
Bernd

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

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

---

Besten Dank 

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

---

Drucker.JPG

Zitat:

---

Original erstellt von bgrittmann:

...
    sFileName = sOutputDirectory & Left(oDoc.Name, Len(oDoc.Name) - 11) & "_" & i & ".jpg"
    oSheet.PrintToFile sFileName
...

---

Kann ich den hiermit auf das CATOUT zugreifen? siehe Bild.
Oder kann ich das CATOUT weglassen?

Habe den Code noch nicht getestet

[Diese Nachricht wurde von joerneman am 13. Okt. 2016 editiert.]

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

---

Servus
Das CATOUT kannst du weglassen.

Gruß
Bernd

PS: Ich frage mich gerade was schneller wäre: Frage stellen oder Code zumindest mal ausführen

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

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

---

Getestet. Funktioniert. Genau das was ich gesucht habe. Besten dank. Top

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