I found the following link courtesy of google with a COBOL-calling-Java example for COBOL V4.2 calling Java 6.0:
http://www-01.ibm.com/support/docview.wss?uid=swg27020750 The JCL/Source and listing texts were pretty self-explanatory, though the COBOL source in the example failed to include the required SET statements using JNIEnvPtr: Set address of JNIEnv to JNIEnvPtr Set address of JNINativeInterface to JNIEnv Which I added. I updated the ENV6 environment settings (and renamed it to ENV7) to use J7.0 instead of J6.0 and added a setting for JAVA_HOME to the J7.0 directory. We are at z/OS V2.1, and as far as I can tell we have Java SDK7.0 installed, though the default paths are set to J7.0_64 not J7.0. Telnet shell invocation of "java -version" after setting JAVA_HOME and paths to J7.0 instead of J7.0_64 returns the following: java version "1.7.0" Java(TM) SE Runtime Environment (build pmz3170sr10fp5-20170421_01(SR10 FP5)) IBM J9 VM (build 2.6, JRE 1.7.0 z/OS s390-31 20170407_343227 (JIT enabled, AOT enabled) J9VM - R26_Java726_SR10_20170407_0035_B343227 JIT - r11_20170407_343227 GC - R26_Java726_SR10_20170407_0035_B343227 J9CL - 20170407_343227) JCL - 20170420_01 based on Oracle jdk7u141-b11 I compiled the two Java example programs with J7.0 and not J7.0_64. When the GO step in the example tries to run, I get a S922 abend for "SYSTEM ERROR IN INITIATOR". Error messages from the log are pasted below. No CEE output at all except the LE U4083 abend in the log. Did anyone else ever get this COBOL-calling-Java example to run using J7.0? If so, what else did you have to change to make it work? TIA for any help or pointers you can provide. Peter Abend S922 error messages: 587 USER COMPLETION CODE=4083 REASON CODE=00000015 587 TIME=14.18.39 SEQ=32502 CPU=0000 ASID=03B4 587 PSW AT TIME OF ERROR 078D1F00 B6A2E1FC ILC 2 INTC 0D 587 ACTIVE LOAD MODULE ADDRESS=36816500 OFFSET=00217CFC 587 NAME=CEEPLPKA 587 DATA AT PSW 36A2E1F6 - 00181610 0A0D9602 E01A58B0 587 GR 0: 84000000 1: 84000FF3 587 2: 379656D8 3: 378A5FA8 587 4: 3680B7E8 5: 00003500 587 6: 00000000 7: 0000F39C 587 8: 3680B7C4 9: 3680B7AC 587 A: 368138B0 B: 368E81F0 587 C: 36815188 D: 3680B6C8 587 E: 3680AFC8 F: 00000015 587 END OF SYMPTOM DUMP 14.18.39 JOB64693 BPXP018I THREAD 37008E0000000000, IN PROCESS 83889710, ENDED 588 588 WITHOUT BEING UNDUBBED WITH COMPLETION CODE 84000FF3 588 , AND REASON CODE 00000015. 14.18.39 JOB64693 IEC999I IGG0201W,TSOUSERZ,GO 14.18.40 JOB64693 IEA794I SVC DUMP HAS CAPTURED: 624 624 DUMPID=028 REQUESTED BY JOB (TSOUSERZ) 624 DUMP TITLE=IEC999I IFG0RR0A, ,TSOUSERZ,GO ,WORKAREA 14.18.40 JOB64693 IEF187I TSOUSERZ FAILED - SYSTEM ERROR IN INITIATOR 624 = 9AD900 14.18.40 JOB64693 IEF450I TSOUSERZ GO - ABEND=S922 U0000 REASON=00000000 626 -- This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
