I want to display the JVM server status using a CICS - Cobol program.
I tried the following :
Code: Select all
EXEC CICS INQUIRE JVMSERVER('ABCJVM')
ENABLESTATUS (WS-STAT)
END-EXEC
IF WS-STAT=DFHVALUE(ENABLED)
DISPLAY 'ENABLED'
Though the jvm server is in enabled status in CICS, I am not able to get the display statement printed in spool.I have also added the DFHAID copybook in program.
Kindly let me know if I am missing something.