Farley, Peter x23353
2017-09-10 14:19:54 UTC
I found the following link courtesy of google with a COBOL-calling-Java example for COBOL V4.2 calling Java 6.0:
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.
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 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 ***@listserv.ua.edu with the message: INFO IBM-MAIN