Hi,
I had the same problem. This could be easily solved, by using a CEEUOPT
Module. But that means that the LE Runtime Options that should be used by the
module, have to be defined as being overridable by an CEEUOPT module. An
example is appended. In addition, this scenario is supported under IMS too, but
it is not required to run in anll IMS Java Region. Could be a normal COBOL,
PL/I program, IMS region requires more working storage and JVM can be reused
while being scheduled and looping reaching sub-second response time and zAAP
can be utilized.
If anyone is interested in a presentation covering this topic, drop me an
email and I'll send you a PDF document. Its about the IMS implementation, but
the Java Sample code used has nothing to do with IMS, you could easily leave
the IMS specifics out (In fact a simple caller COBOL transaction) and it still
does work. In fact, the sample is designed to be called not only from COBOL
also Assembler, PL/I and other languages could be Java caller.
Create a CEE Sample Member:
//HLASM EXEC PGM=ASMA90,PARM='LINECOUNT(0)'
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSLIN DD DSN=GAEBLER.LOAD(DENISCEE),DISP=SHR
//SYSLIB DD DSN=CEE.SCEEMAC,DISP=SHR
// DD DSN=SYS1.MACLIB,DISP=SHR
//SYSIN DD *
TITLE 'CEEUOPT'
CEEUOPT CSECT
CEEUOPT AMODE ANY
CEEUOPT RMODE ANY
CEEXOPT XPLINK=(ON), X
POSIX=(ON), X
STACK=(512K,512K,ANYWHERE,KEEP,512K,512K), X
ENVAR=('_CEE_ENVFILE=/u/gaebler/hello/ENV')
END
//*
-----Original Message-----
From: [EMAIL PROTECTED]
To: IBM-MAIN@BAMA.UA.EDU
Sent: Mon, 29 Jan 2007 8:01 PM
Subject: Re: setting LE runtime options programatically.
On 29 Jan 2007 08:14:32 -0800, in bit.listserv.ibm-main you wrote:
>We have just started down the road of trying to invoke java classes from
>batch COBOL but have hit a problem with the 100 character PARM field length
>because we need to specify several runtime options such as ENVAR=....,
>POSIX(ON) AND XPLINK(ON) on top of our own parameters. Is there a way to
>change the runtime options dynamically from a COBOL program which is already
>running in an LE environment.
Since I would think that the POSIX environment and use of XPLINK (new
world linkage conventions) determine how the COBOL program is compiled
and issues calls, I don't see how a run-time change of this option
could work.
>
>Jim McAlpine
>
>----------------------------------------------------------------------
>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
----------------------------------------------------------------------
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
________________________________________________________________________
Check Out the new free AIM(R) Mail -- 2 GB of storage and industry-leading spam
and email virus protection.
----------------------------------------------------------------------
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
