[NEWSboard IBMi Forum]
Seite 1 von 2 1 2 Letzte

Hybrid View

  1. #1
    Registriert seit
    Jun 2004
    Beiträge
    46

    Parameter übergeben

    Hallo zusammen,

    ich habe folg. commando, das ein Java-Programm startet:
    XMLErstellerAS400 ist das java-Programm. Nun möchte ich aus der as400 2 parameter übergeben: liefscheinNr und dgtiNr.

    Weiß jemand wie man das macht??
    Vielen Dank im Voraus!
    Vicky

    QSH CMD('java -classpath /javatest:/QIBM/ProdData/HTTP/Public/jt400/lib/jt400.jar:/javatest/jdom.jar XMLErstellerAS400')

  2. #2
    Registriert seit
    Jun 2004
    Beiträge
    46
    so ich hab folg. rausgefunden. Mit dem u.s. befehl können die parameter direkt übergeben werden.

    QSH CMD('java -classpath /javatest:/QIBM/ProdData/HTTP/Public/jt400/lib/jt400.jar:/javatest/jdom.jar XMLErstellerAS400 036239487')
    Wobei 036239487' ist der übergebene Wert! Das war soweit für alle die es auch wissen wollten
    Nun hab ich folg. Frage:
    der angegebene Wert soll durch eine RPG-Variable ersetzt werden.
    Weiß jemand wie man das anstellen kann??
    DANKE

  3. #3
    Registriert seit
    Mar 2002
    Beiträge
    5.365
    Hallo Vicky,

    Zitat Zitat von Vicky-B
    so ich hab folg. rausgefunden. Mit dem u.s. befehl können die parameter direkt übergeben werden.

    QSH CMD('java -classpath /javatest:/QIBM/ProdData/HTTP/Public/jt400/lib/jt400.jar:/javatest/jdom.jar XMLErstellerAS400 036239487')
    Wobei 036239487' ist der übergebene Wert! Das war soweit für alle die es auch wissen wollten
    Nun hab ich folg. Frage:
    der angegebene Wert soll durch eine RPG-Variable ersetzt werden.
    Weiß jemand wie man das anstellen kann??
    DANKE
    einfach den String
    SBMJOB MYJAVA CMD(QSH CMD(java...)) im RPG zusammen basteln und an QCMDEXC oder system übergeben.
    SBMJOB ist hier von Vorteil, weil eh' nix zurück kommt und es keine Probleme mit dem Multithreading gibt.

    mfg

    Dieter Bender
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

  4. #4
    Registriert seit
    Jun 2004
    Beiträge
    46
    Hallo,

    ich glaub wir haben aneinander"geschrieben". Und zwar geht es darum dass
    anstatt von 036239487 in
    QSH CMD('java -classpath /javatest:/QIBM/ProdData/HTTP/Public/jt400/lib/jt400.jar:/javatest/jdom.jar XMLErstellerAS400 036239487')
    eine in rpg ermittelte variable übernommen wird, die dann an java-programm weitergeleitet wird.
    D.h. es muss dann so ähnlich aussehen:
    QSH CMD('java -classpath /javatest:/QIBM/ProdData/HTTP/Public/jt400/lib/jt400.jar:/javatest/jdom.jar XMLErstellerAS400 &Varibale)

  5. #5
    Registriert seit
    Mar 2002
    Beiträge
    5.365
    Hallo Vicky,

    Zitat Zitat von Vicky-B
    Hallo,

    ich glaub wir haben aneinander"geschrieben". Und zwar geht es darum dass
    anstatt von 036239487 in
    QSH CMD('java -classpath /javatest:/QIBM/ProdData/HTTP/Public/jt400/lib/jt400.jar:/javatest/jdom.jar XMLErstellerAS400 036239487')
    eine in rpg ermittelte variable übernommen wird, die dann an java-programm weitergeleitet wird.
    D.h. es muss dann so ähnlich aussehen:
    QSH CMD('java -classpath /javatest:/QIBM/ProdData/HTTP/Public/jt400/lib/jt400.jar:/javatest/jdom.jar XMLErstellerAS400 &Varibale)
    Durchaus nicht:
    irgendsowas:
    D cmd 512a
    D javaParm 123a hier steht der Parameter drin

    C eval cmd = "SBMJOB CMD ....... XMLErstellerAS400 "
    C + javaParm
    C callp system(cmd)

    Prototyp für system findest Du auf meiner Freeware Seite

    mfg

    Dieter Bender
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

  6. #6
    Registriert seit
    Jun 2004
    Beiträge
    46
    Hallo BenderB,

    ich hab das Beispiel auf Deiner Seite gefunden und ausprobiert.
    und zwar sieht der Quellcode so aus:
    Code:
       
    0214.00 CHGVAR VAR(&JAVA) VALUE('JAVA + 
    0215.00 -CLASSPATH/JAVATEST:QIBM/PRODDATA/HTTP/PUBLIC+ 
    0216.00 /JT400/LIB/JT400.JAR:/JAVATEST/JDOM.JAR + 
    0217.00 XMLERSTELLERAS400 &DNRI &PLIEF') 
    0218.00 SBMJOB CMD(QSH CMD(&JAVA))
    wobei die grün markierten Variablen davor mit Weten belegt werden. Beim Ausführen
    bekomme ich folg. Fehlermeldung:

    Code:
     qsh: 001-0019 Fehler gefunden beim Suchen des Befehls DNRI. Kein Pfad oder keine Bibliothek mit diesem Namen. 
    
    qsh: 001-0019 Fehler gefunden beim Suchen des Befehls PLIEF. Kein Pfad oder keine Bibliothek mit diesem Namen.
    In deinem Beispiel stand folgendes...

    Code:
     ...... 
       ' de.bender_dv.transfer.TransferData '			  !! +
    	 /* properties als Parameter							*/+
    	'ConnectFrom ConnectTo'
    'ConnectFrom ConnectTo' sind doch die Parameter die übergeben werden. Wie werden sie mit den Werten belegt?

    Ich danke vielmals!
    Vicky

  7. #7
    Registriert seit
    Mar 2002
    Beiträge
    5.365
    Hallo Vicky-B,

    wenn Du lieber CL magst, auch das geht:

    [QUOTE=Vicky-B]Hallo BenderB,

    ich hab das Beispiel auf Deiner Seite gefunden und ausprobiert.
    und zwar sieht der Quellcode so aus:
    Code:
       
    0214.00 CHGVAR VAR(&JAVA) VALUE('JAVA + 
    0215.00 -CLASSPATH/JAVATEST:QIBM/PRODDATA/HTTP/PUBLIC+ 
    0216.00 /JT400/LIB/JT400.JAR:/JAVATEST/JDOM.JAR + 
    0217.00 XMLERSTELLERAS400 &DNRI &PLIEF') 
    0218.00 SBMJOB CMD(QSH CMD(&JAVA))
    ändere Dein CL mal wie folgt:

    CHGVAR VAR(&JAVA) VALUE('JAVA +
    -CLASSPATH/JAVATEST:QIBM/PRODDATA/HTTP/PUBLIC+
    /JT400/LIB/JT400.JAR:/JAVATEST/JDOM.JAR +
    XMLERSTELLERAS400 ' !! &DNRI !! ' ' !! &PLIEF)

    SBMJOB CMD(QSH CMD(&JAVA))

    mfg

    Dieter Bender
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

  8. #8
    Registriert seit
    Jun 2004
    Beiträge
    46
    Hallo Dieter,


    auch diese Schreibweise hab ich ausprobiert. Dabei bekomme ich folg.
    Fehlermeldung:

    ungültiger Operand bzw. fehlender Operator in Value

    Kannst Du was damit anfangen??
    DANke nochmal :-)
    Vicky

  9. #9
    Registriert seit
    Mar 2002
    Beiträge
    5.365
    Hallo Vicky,

    Zitat Zitat von Vicky-B
    Hallo Dieter,


    auch diese Schreibweise hab ich ausprobiert. Dabei bekomme ich folg.
    Fehlermeldung:

    ungültiger Operand bzw. fehlender Operator in Value

    Kannst Du was damit anfangen??
    DANke nochmal :-)
    Vicky
    das ist das !! als Verketter, versuchs mal mit || (AltGriechisch und <)

    Dieter Bender
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

  10. #10
    Registriert seit
    Mar 2002
    Beiträge
    5.365
    [QUOTE=BenderD]Hallo Vicky-B,

    wenn Du lieber CL magst, auch das geht:

    Zitat Zitat von Vicky-B
    Hallo BenderB,

    ich hab das Beispiel auf Deiner Seite gefunden und ausprobiert.
    und zwar sieht der Quellcode so aus:
    Code:
       
    0214.00 CHGVAR VAR(&JAVA) VALUE('JAVA + 
    0215.00 -CLASSPATH/JAVATEST:QIBM/PRODDATA/HTTP/PUBLIC+ 
    0216.00 /JT400/LIB/JT400.JAR:/JAVATEST/JDOM.JAR + 
    0217.00 XMLERSTELLERAS400 &DNRI &PLIEF') 
    0218.00 SBMJOB CMD(QSH CMD(&JAVA))
    ändere Dein CL mal wie folgt:

    CHGVAR VAR(&JAVA) VALUE('JAVA +
    -CLASSPATH/JAVATEST:QIBM/PRODDATA/HTTP/PUBLIC+
    /JT400/LIB/JT400.JAR:/JAVATEST/JDOM.JAR +
    XMLERSTELLERAS400 ' !! &DNRI !! ' ' !! &PLIEF)

    SBMJOB CMD(QSH CMD(&JAVA))

    mfg

    Dieter Bender
    PS: der Verketter !! erwartet freilich char Variablen, d.h. &DINR und &PLIEF müssen alfa sein!!!
    Und die Schreibweise muss exakt stimmen; diese Wandlungsliste bitte komplett posten.

    mfg

    Dieter Bender
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

  11. #11
    Registriert seit
    Feb 2001
    Beiträge
    20.695
    In CLP gibt es immer noch die Funktionen:
    *CAT
    *BCAT
    *TCAT
    wenn die !! oder || nicht funktionieren (Quell-CCSID ggf. auf 037 setzen).
    Dienstleistungen? Die gibt es hier: http://www.fuerchau.de
    Das Excel-AddIn: https://www.ftsolutions.de/index.php/downloads
    BI? Da war doch noch was: http://www.ftsolutions.de

  12. #12
    Registriert seit
    Jun 2004
    Beiträge
    46
    Hallo nochaml,

    so sieht der Quellcode aus:

    Code:
     
    0018.00 DCL VAR(&DNRI) TYPE(*CHAR) LEN(3)
    0021.00 DCL VAR(&PLIEF) TYPE(*CHAR) LEN(8) 
    0043.00 DCL VAR(&JAVA) TYPE(*CHAR) LEN(256) VALUE(' ')
    
    0215.00 CHGVAR VAR(&JAVA) VALUE('JAVA + 
    0216.00 -CLASSPATH /JAVATEST:QIBM/PRODDATA/HTTP/PUBLIC+ 
    0217.00 /JT400/LIB/JT400.JAR :/JAVATEST/JDOM.JAR + 
    0218.00 XMLERSTELLERAS400' *CAT &DNRI *BCAT &PLIEF) 
    0219.00 SBMJOB CMD(QSH CMD(&JAVA))
    Dabei bekomme ich folg. Fehlermeldung:
    Code:
     -CLASSPATH/JAVATEST:QIBM/PRODDATA/HTTP/PUBLIC/JT400/LIB/JT400.JAR:/JAVATEST/JDOM.JAR: Argument nicht gültig

    Ich hab auch schon mit ! und | probiert. Die Zeichen werden gar nicht angenommen (Syntaxfehler)!

    Ich bitte um Hilfe :-(

    Danke
    Vicky

Similar Threads

  1. SNDDST Parameter für Dateianhänge
    By Luebbert in forum IBM i Hauptforum
    Antworten: 4
    Letzter Beitrag: 23-11-06, 13:22
  2. sbmjob und ' im Parameter
    By muadeep in forum NEWSboard Programmierung
    Antworten: 1
    Letzter Beitrag: 27-06-06, 11:31
  3. BNDDIR Parameter direkt in CBLLE-Quelle?
    By rebe in forum NEWSboard Programmierung
    Antworten: 2
    Letzter Beitrag: 24-05-06, 19:37
  4. externe DS als Parameter übergeben
    By psd-400 in forum IBM i Hauptforum
    Antworten: 8
    Letzter Beitrag: 07-10-04, 12:06
  5. Anfänger, cwbtf.exe parameter übergeben?
    By thoughtless in forum IBM i Hauptforum
    Antworten: 6
    Letzter Beitrag: 03-06-04, 15:26

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •