Parameterübergabe über QSH mit SH möglich?

[kuempi von stein]

Na ja, warum?
Weil ichs nicht besser weiss...

Mir ist schon klar, dass ich im CLP auch direkt:

QSH  CMD 'java -cp ELLENLANGEBEFEHLSZEILEMITLIBUNDJARZEUCHS Meinjava dummy dummy dummy' 

oder so ähnlich zusammenbasteln könnte...
Aber dann fehlt mir ja der CD Befehl davor.
Der Umweg uber die .SH-Datei war ganz nett um eine Kette von Befehlen abzuarbeiten...

Wie müsste denn dafür die CLP-Lösung aussehen?

Wäre ich durchaus mit eiverstanden, das auch so zu lösen, wenn ich wüsste wie.
Diese .SH-Geschichte stört mich eh schon lange...

kuempi

[Fuerchau]

An QSH kann eine ganze Reihe von Befehlen übergeben werden (wie ein Script:

CMD('Befehl1;Befehl2;...')

Das Semikolon gilt als Befehlstrenner, für dich also:

cmd('cd /MyPath;java ....')

Ansonsten empfängt ein Script seine Parameter in $1, $2, ... $9 als Pseudovariablen.

[KM]

Ich glaube jetzt hab ich's verstanden. Dadurch, dass Du QSH benutzt und dabei für die QSH-Sitzung ein neuer Job gestartet wird, funktioniert das mit einem vorher abgesetzten CD im CLP nicht, da sich der ja nur auf den Job bezieht.

Hast Du's schon mal mit der Shell von PASE versucht ? Der Aufruf startet glaube ich keinen neuen Job und somit könntest Du im CLP vorher einfach einen CD ausführen. Dann würdest Du nicht QSH aufrufen, sondern QP2SHELL.

Das müsste eigentlich so ähnlich funktionieren.

Gruß,
KM

DCL        VAR(&CMD) TYPE(*CHAR) LEN(30)                
DCL        VAR(&PARM1)   TYPE(*CHAR) LEN(30)            
DCL        VAR(&PARM2)   TYPE(*CHAR) LEN(300)           
DCL        VAR(&PARM3)   TYPE(*CHAR) LEN(30)            
DCL        VAR(&PARM4)   TYPE(*CHAR) LEN(5)             
DCL        VAR(&PARM5)   TYPE(*CHAR) LEN(5)       
DCL        VAR(&PARM6)   TYPE(*CHAR) LEN(5)         
DCL        VAR(&NULL)    TYPE(*CHAR) LEN(1) VALUE(X'00')

CHGVAR     VAR(&CMD) VALUE('/QOpenSys/usr/bin/java')     
CHGVAR     VAR(&CMD) VALUE(&CMD *TCAT &NULL)             
                                                         
CHGVAR     VAR(&PARM1) VALUE('-classpath')               
CHGVAR     VAR(&PARM1) VALUE(&PARM1 *TCAT &NULL)         
                                                         
CHGVAR     VAR(&PARM2) +                                 
             VALUE('/DeinClasspath/')                    
CHGVAR     VAR(&PARM2) VALUE(&PARM2 *TCAT &NULL) 

CHGVAR     VAR(&PARM3) VALUE('DeinJavaProgramm')
CHGVAR     VAR(&PARM3) VALUE(&PARM3 *TCAT &NULL) 
                                                 
CHGVAR     VAR(&PARM4) VALUE(&Parameter1)             
CHGVAR     VAR(&PARM4) VALUE(&PARM4 *TCAT &NULL) 
                                                 
CHGVAR     VAR(&PARM5) VALUE(&Parameter2)           
CHGVAR     VAR(&PARM5) VALUE(&PARM5 *TCAT &NULL)   

CHGVAR     VAR(&PARM6) VALUE(&Parameter3)           
CHGVAR     VAR(&PARM6) VALUE(&PARM5 *TCAT &NULL)   

CALL       PGM(QP2SHELL) PARM(&CMD &PARM1 &PARM2 +
             &PARM3 &PARM4 &PARM5 &PARM6)