---

Hallo,

Das folgende Makro läuft mit ME10 8.7F einwandfrei.

DEFINE Cadanlage
  OPEN_INFILE 1 ('|hostname | cut -c 4,5')
  READ_FILE 1 Nummer_anlage
  LET sys_plot_id_name Nummer_anlage
  CLOSE_FILE 1
END_DEFINE
Cadanlage

Warum funktioniert das Makro unter ME10 10.50 nicht mehr?

Gruß
Edgar

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

---

hi edgar
läuft 10.50 immernoch auf ux ? das macro müsste laufen. häng doch mal eine trace-datei ins forum. da könnten wir sehen was nicht klappt.

gruss aus finsterhennen

------------------
awi
André Weidmann

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

---

Hallo André,

Hier das Tracefile:
Cadanlage
OPEN_INFILE 1 ( '|hostname | cut -c 4,5' ) '|hostname | cut -c 4,5'
READ_FILE 1 Nummer_anlage
LET Sys_plot_id_name Nummer_anlage ''
CLOSE_FILE 1
TRACE

Unter HP-UX erhalte ich die erwartete Ausgabe:

$ hostname | cut -c 4,5 
21
$

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

---

@edgar

Zitat:

---

Original erstellt von edgar:
Unter HP-UX erhalte ich die erwartete Ausgabe...

---

Wenn du das auf WINDOWS anwendest, dann geht das nicht !!

So muesste es fuer WINDOWS und HP-UX funktionieren:

{** Makro - Anfang **}

DEFINE Cadanlage
INQ_ENV 10
IF ((INQ 4) = 2)
OPEN_INFILE 1 ('|hostname | cut -c 4,5')
READ_FILE 1 Nummer_anlage
LET sys_plot_id_name Nummer_anlage
CLOSE_FILE 1
ELSE_IF ((INQ 4) >= 6)
LET Nummer_anlage (GETENV 'COMPUTERNAME')
LET Nummer_anlage (SUBSTR Nummer_anlage 4 2)
LET sys_plot_id_name Nummer_anlage
END_IF
END_DEFINE
Cadanlage

{** Makro - Ende **}

Hoffe es klappt nun...

Gruss
RainerH.

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

---

Hallo Rainer,
Das Problem ist, daß das Makro bei uns unter HP-UX 11i und ME10 10.50 nicht läuft, trotzdem Danke für das erweiterte Makro.

Gruß
Edgar

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

---

bekommst du überhaupt was zurück.

define pwd
open_infile 1 "|pwd" read_file 1 a display a
end_define

versuch mal ob das aktuelle verz. zurückgegeben wird

gruss andré

------------------
awi
André Weidmann

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

---

Hola Edgar.

Wir haben den Hostnamen als Umgebungsvariabele in unsere UX Umgebung. D.h. wir lesen mit

LET workstation (GETENV 'HOSTNAME')

den Namen der Workstation ein. Versuche dies mal anstatt mir den Pipes und nem OPEN_INFILE herumzuhantieren.
Und wenn du die Umgebungsvarialen HOSTNAME und COMPUTERNAME anpasst, dann kannst das Makro vom RainerH. kürzen und ohne OS-Abfrage in beiden Umgebungen nutzen. misap (make it simple as possible)

------------------
Viele Grüsse aus dem Schwabenländle

Massimo Castell

------------------
DIE inoffizielle Hilfeseite zum OneSpace Designer
http://osd.cad.de

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

---

@edgar

Probier mal, ob es so funktioniert:

DEFINE Cadanlage
RUN GRAPHIC 'hostname > /tmp/Rechnername.tmp'
OPEN_INFILE 1 '/tmp/Rechnername.tmp'
READ_FILE 1 Nummer_anlage
CLOSE_FILE 1
PURGE_FILE '/tmp/Rechnername.tmp' CONFIRM
LET Nummer_anlage (SUBSTR Nummer_anlage 4 2)
LET sys_plot_id_name Nummer_anlage
END_DEFINE
Cadanlage

Gruss und schoenen WE...
RainerH.

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

---

@Massimo
Bei Eingabe von: LET workstation (GETENV 'HOSTNAME')

erhalte ich bei DISPLAY workstation ''

@Rainer
Prima, klappt einwandfrei.

Komischerweise funktioniert folgendes Makro einwandfrei:
DEFINE Get_user
  OPEN_INFILE 2 ('|who')
  READ_FILE 2 Name_user
END_DEFINE
Get_user

Gruß
Edgar

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

---

@Edgar
Dann ist bei dir die Umgebungsvarabl nicht gesetzt. Das muß natürlich in deinem .profile gemacht werden.
Wir haben sowohl unter UX wie auch unter Win sehr viel Umgebungsvariablen die Identisch sind damit wir in allen Scripten (CAD CAM Softwareverteilung Batch) auf diese zurückgreifen können. Und nicht kompliziert uns um das OS Gedanken machen müssen.
Kann ich euch auch nur empfehlen.

------------------
Viele Grüsse aus dem Schwabenländle

Massimo Castell

------------------
DIE inoffizielle Hilfeseite zum OneSpace Designer
http://osd.cad.de

[Diese Nachricht wurde von Castell am 23. Jul. 2004 editiert.]

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