JVM RunUnit - Call (String, Object []) Problem
Hello out there ...
I have the following JVM Cobol Programm "XUSERVG" (compiled with ILSMARTLINKAGE) ... stub below :
LINKAGE SECTION. *---------------- 01 SL-EXT-UEBERGABE PIC 9(7). 01 S-EXT-UEBERGABE. 02 SHARK-LEN PIC X(2). 02 EXT-UEBERGABE PIC X(50). 01 SL-USERVG-IO PIC 9(7). 01 S-USERVG-IO. 02 SHARK-LEN PIC X(2). 02 USERVG-IO PIC X(4085). PROCEDURE DIVISION USING BY VALUE SL-EXT-UEBERGABE BY REFERENCE S-EXT-UEBERGABE BY VALUE SL-USERVG-IO BY REFERENCE S-USERVG-IO.
The Call in Java looks like :
int SExtUebergabeLen = 815; SExtUebergabe sExtUebergabe = new SExtUebergabe(); int SUservgIoLen = 4711; SUservgIo sUservgIo = new SUservgIo();
XUSERVG xuservg = new XUSERVG (); RunUnit runUnit = new RunUnit(); runUnit.Add((IObjectControl) xuservg); // retValue = xuservg.XUSERVG(SExtUebergabeLen, sExtUebergabe, SUservgIoLen, sUservgIo); Object params [] = {SExtUebergabeLen, sExtUebergabe, SUservgIoLen, sUservgIo}; retValue = runUnit.Call("de.lv1871.cobol.XUSERVG"