RPG aus Java aufrufen

[Vicky-B]

Hallo zusammen,

gibt es eine Möglichkeit aus Java ServiceProgramme bzw. Module aufzurufen??

Danke
LG
Vicky

[Frank Hildebrandt]

Über die Toolbox für Java. Hier der Link.

http://publib.boulder.ibm.com/infoce...hh/spgcall.htm

[Fuerchau]

Allerdings können nur Programme (OPM/ILE) und keine Service-Programme oder Module aufgerufen werden.

[Frank Hildebrandt]

Die Klasse bei meinem ersten Posting erlaubt auch den Zugriff auf Serviceprogramme. Alternativ kann man noch über PCML den Aufruf steuern. Die Klasse hierfür befindet sich auch in der Toolbox. Hier der Link. http://publib.boulder.ibm.com/infoce...rzahh/pcml.htm

[Frank Hildebrandt]

Noch ein kleiner Hinweis. Wenn man beim Befehl CRTBNDRPG bzw. CRTRPGMOD den Parameter PGMINFO(*PCML) angibt, dann kann man sich das PCML-Dokument generieren lassen, welches die Parameterliste des Programms/Serviceprograms beschreibt. Da spart man sich eine Menge Arbeit.

[Vicky-B]

Danke für die Tipps....

ich habe nun folgenes Problem:

 
....
ServiceProgramCall sPGMCall=
new ServiceProgramCall(system, "QSYS/BASOBJSTD/SPE01S", parameterList);

sPGMCall.setProcedureName("SPE01N02");
...

Wenn ich das Programm ausführe bekomme ich folgende Fehlermeldung:

 

com.ibm.as400.access.IllegalPathNameException: QSYS/BASOBJSTD/SPE01S: Object not in QSYS file system.

at com.ibm.as400.access.QSYSObjectPathName.parse(QSYSObjectPathName.java:879)

Serviceprogramm . . . . . . . . . . . . : SPE01S
Bibliothek . . . . . . . . . . . . . . : BASOBJSTD
Eigner . . . . . . . . . . . . . . . . . : BASPGMR
Serviceprogrammattribut . . . . . . . . : RPGLE
Detail . . . . . . . . . . . . . . . . . : *BASIC



Wo liegt mein Problem??

Danke Euch!

Vicky

[Frank Hildebrandt]

Der Pfadname ist falsch. Versuch den mal.
QSYS.LIB/BASOBJSTD.LIB/SPE01S.SRVPGM

[Vicky-B]

super danke für den Tip:

/QSYS.LIB/BASOBJSTD.LIB/SPE01S.SRVPGM

Hab noch ne Frage :-) Beim Ausführen bekomme ich ne fehlermeldung (Dezimalfehler). Gibts ne Möglichkeit dass man etwas mehr an Infos bekommt??

System.out.println(messageList[i].getText());

[Frank Hildebrandt]

Dann hast Du die auszutauschenden Parameter nicht richtig konvertiert. Unter dem folgenden Link befindet sich die Rubrik
"Data conversion and description". Da wird alles erklärt.

http://publib.boulder.ibm.com/infoce...hh/spgcall.htm

[Vicky-B]

hab was neues!!!

Zeiger für angegebene Position nicht gesetzt.

Wie komme ich an mehr Infos und etwas detaillierte Fehlermeldung

[Frank Hildebrandt]

Noch mehr Infos? Die Meldungen, die Du bis jetzt gepostet hast deuten klar auf Probleme bei der Übergabe der Parameter hin. Ich schlage vor, Du postest den Teil aus Deinem Java Programm, der für den Aufruf des Serviceprogramms zuständig ist, inklusive der Aufbereitung der Parameter und zusätzlich noch die Beschreibung der Prozedurenschnittstelle der Prozedur des Serviceprogramms, welche Du aufrufst. Dann kann man sicher mehr sagen.

[Vicky-B]

In RPG wird das Service-Programm folgendermassen aufgerufen:

SPE01N01(RC:SRDNR:SRNR)

RC=Rückcode (0 wenn alles OK is, 1 Fehler)
SRDNR und SRNR sind gepackte Zahlen

AS400Bin4 bin4Converter = new AS400Bin4();

        
        ProgramParameter[] parameterList=new ProgramParameter[3];
        parameterList[0]=new ProgramParameter(bin4Converter.toBytes(0));
        parameterList[1]=new ProgramParameter(bin4Converter.toBytes(400));
        parameterList[2]=new ProgramParameter(bin4Converter.toBytes(10002575));
        AS400 system=new AS400("xxx");
        system.setUserId("xxx");
        system.setPassword("xxx");
        ServiceProgramCall sPGMCall=new ServiceProgramCall(system, "/QSYS.LIB/BASOBJSTD.LIB/SPE01S.SRVPGM", parameterList);
        sPGMCall.setProcedureName("SPE01N01");
            
        
            if (sPGMCall.run() != true){
                AS400Message[] messageList = sPGMCall.getMessageList();
                for (int i = 0; i < messageList.length; ++i){    
                    System.out.println(messageList[i].getText());
                }
            }

Was ich noch nicht ganz verstehe ist folg:

sPGMCall.setReturnValueFormat(ServiceProgramCall.RETURN_INTEGER);

Es gibt nur Integer und void. Wie ist es wenn ich eine Zeichenkette, einen Datumswert oder eine Dezimalzahl zurückbekomemn soll??

LG
Vicky