RUNRMTCMD die ...

[Andreas Herzfeldt]

Hallo Dieter,

ich habe einen CMD der mit F4 gepromptet wird, dann habe ich die Möglichkeit die Bibliothek einzugeben.
Das vom CMD aufgerufende Programm läuft interaktiv und soll per RUNRMTCMD einen SBMJOB auf System B ausführen und die Bibliothek per SAVRSTLIB auf System A übertragen. Auf System A soll dann der Inhalt der übertragenen Bibliothek installiert werden. Daher bin ich etwas verwundert, daß ich den Befehl interaktiv ausführen kann, wenn er aber in das CL gepackt wird- läuft er auf einen Fehler !

Andreas

[Andreas Herzfeldt]

Hallo Dieter,

ich habe das ganze jetzt per CALL nicht per SBMJOB gelöst - scheinbar ist hier die Erstellung des ÜBergangebefehls wesentlich einfacher zu gestalten.

Trotzdem vielen Dank für Deine Hilfe.

Schönes Wochenende.

Andreas

[Fuerchau]

Dein 1. Beitrag zeigt doch den Fehler bereits !
Nach dem Schlüsselwort "CMD(" darf das Kommando nicht mit Hochkomma anfangen, da es sonst (wie der Fehler schon sagt) nicht als Command erkannt wird.
Und zusätzlich solltest du sämtliche Hochkommas weglassen, da die Lib nicht in Hochkomma angegeben werden muss (nicht casesensitive, keine Leerzeichen) !!!!

Ausserdem kannst du das Kommando insgesamt direkt angeben:

RUNRMTCMD CMD(SBMJOB CMD(CALL PGM(ACTSYSPGM/INSTPGMCL3) PARM(&INSTLIB))) RMTLOCNAME(AS400.AS400) RMTUSER(USER) RMTPWD(pwd)

Warum also so komliziert ?

[Pikachu]

Hallo!

Der Vorschlag von Fuerchau geht so leider nicht ganz, da der RUNRMTCMD keinen OS/400-Befehl als Parameter annimmt sondern nur eine normale Zeichenkette, zumindest unter V4R5.

Aber wie wär's damit:

DCL VAR(&INSTLIB) TYPE(*CHAR) LEN(10)
DCL VAR(&CMD) TYPE(*CHAR) LEN(200)
CHGVAR VAR(&CMD) VALUE('SBMJOB CMD(CALL PGM(ACTSYSPGM/INSTPGMCL3) PARM(' *CAT &INSTLIB *TCAT '))')
RUNRMTCMD CMD(&CMD) RMTLOCNAME(AS400.AS400) RMTUSER(USER) RMTPWD(pwd)

Viele Grüße
Jürgen