I've got a sample program from somewhere that I know does produce output on
SYSJAVA. It is called ACCOUNT and I *think* it is an IBM sample program but
I'm not sure. It begins

       cbl dll,thread,pgmname(longmixed),lib
       Identification Division.
       Class-id. Account inherits Base.
       Environment Division.
       Configuration section.
       Repository.
           Class Base is "java.lang.Object"
           Class Account is "Account".
       Identification division.
       Factory.
        Data division.
        Working-storage section.
        01 NumberOfAccounts pic 9(6) value zero.

There is a Linkage Section COPY statement for a member called JNI. It begins

      *****************************************************************
      * COBOL declarations for Java native method interoperation    *
      *                                                             *
      * To use the Java Native Interface callable services from a   *
      * COBOL program:                                              *
      * 1) Use a COPY statement to include this file into the       *
      *  the Linkage Section of the program, e.g.                   *
      *    Linkage Section.                                         *
      *    Copy JNI                                                 *
      * 2) Code the following statements at the beginning of the    *
      *  Procedure Division:                                        *
      *    Set address of JNIEnv to JNIEnvPtr                       *
      *    Set address of JNINativeInterface to JNIEnv              *
      *****************************************************************

Charles

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Steve Comstock
Sent: Monday, February 12, 2007 1:59 PM
To: [email protected]
Subject: Re: Any takers? COBOL copybook -> Java class defination.

But I'll wager that's if you compile a class definition,
that is your COBOL code has factory and methods and class, and
so on; not just a copy book.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to