---

Hallo

vielen Dank für die rasche Hilfe im vorherigen Beitrag.

Es soll nun ein PDF in ein best. Verzeichnis erzeugt werden.
Ziel-Dateiname wird generiert aus protoname, dies funktioniert.
Dann aber habe ich folg. Fehler:

- Makro bleibt beim Aufruf von pdf-proto hängen "ungültiger Datentyp ...

Ausserdem bleibt danach sicher wieder der Dateiname "stehen", man kann auf anderen Druckern z.B. GDI
nicht mehr plotten, ausser man setzt manuell einmal den Dateinamen zurücjk auf ''
(Diesen Fehler habe ich in einem anderen Makro, das hier verwendet wird im Grundsatz)

Ich wäre wieder für Tips dankbar, spez. das rücksetzen des Dateinamens auf ''
für alle Drucker. Reset_sys_plot_config.... leert alle Drucker kpl,
dies hilft nicht.

Vielen Dank an alle Fleissigen

Benno

DEFINE pdf_proto

    protoname
    LET Verzeichnis ('\\musterserver\musterverzeichnis\htdocs\pdf-daten\prototyp\out\')
    LET Dateiname (Verzeichnis+protoname+'.pdf')
    Set_sys_plot_filename_generate (FALSE)   
    Set_sys_plot_filename_prefix Dateiname
    Set_sys_plot_configuration 'PDF_GENERIC'
    Set_sys_plot_type 'PDF_GENERIC'
    Set_sys_plot_filename_delold (TRUE)
    Set_sys_plot_format 'A3'
    Set_sys_plot_rot 0
    Set_sys_plot_plotscale 0
END_DEFINE

DEFINE PDF-TIS

pdf_proto
plot_plot
 
END_DEFINE

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

---

Zitat:

---

Original erstellt von BennoR:
DEFINE pdf_proto
    protoname
    LET Verzeichnis ('\\musterserver\musterverzeichnis\htdocs\pdf-daten\prototyp\out\')
    LET Dateiname (Verzeichnis+protoname+'.pdf')

---

was soll denn bitte protoname darstellen?  Vielleicht einen PARAMETER?
 

Zitat:

---

DEFINE PDF-TIS

---

Bereits der 2. Ausdruck ist hier ein mehrfacher Syntaxfehler. Macronamen: GroesserAnfangsbuchstabe-restklein  "-" ist kein Bestandteil einer selbst deklarieten variable / eines Macronamens.

DEFINE Pdf_tis

--------------
ein

trace del_old 'c:/temp/schreibmalmit.txt'
Rufe_meine_Macros_auf
trace off

und studieren des Mitschriebs waere sehr hilfreich fuer Dich. Akutelle OSDraftings schreiben klartext fehler meldungen in den Mitschrieb.

------------------
Seamonkey Firefox Thunderbird  Seamonkey auf deutsch

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

---

Hallo

danke, mit ein wenig Probieren und Erweitern läuft nun alles planmäßig ab:

Ergebnis sieht dann so aus

{******************** PROTO PDF A3 **********************}

DEFINE Pdf_proto

  LOCAL Dateiname
  LOCAL Slashstelle
  LOCAL Verzeichnis
  LOCAL TisName 
 
  INQ_ENV 0
  LET Dateiname (INQ 304)
  LOOP
    LET Slashstelle (POS (STR Dateiname) '\')
  EXIT_IF (Slashstelle = 0)
    LET Dateiname (SUBSTR Dateiname (Slashstelle + 1) (LEN Dateiname))
    LET Dateiname (TRIM Dateiname)
  END_LOOP
  { .mi entfernen - falls vorhanden }
  IF ((POS Dateiname '.') <> 0 )
    LET Dateiname (SUBSTR Dateiname 1 ((POS Dateiname '.') - 1))
  END_IF

    LET Verzeichnis ('\\musterserver\pdf-daten\prototyp\out\')
    LET TisName (Verzeichnis+Dateiname+'.pdf')
   
    Set_sys_plot_filename_generate (FALSE)   
    Set_sys_plot_filename_prefix TisName
    Set_sys_plot_configuration 'PDF_GENERIC'
    Set_sys_plot_type 'PDF_GENERIC'
    Set_sys_plot_filename_delold (TRUE)
    Set_sys_plot_format 'A3'
    Set_sys_plot_rot 0
    Set_sys_plot_plotscale 0

END_DEFINE

DEFINE Pdf_tis
Pdf_proto
plot_plot
END_DEFINE

[Diese Nachricht wurde von BennoR am 30. Nov. 2007 editiert.]

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