Hi,
I have a Cobol program that connects to Oracle tables, fetch some values and then write those values to MQ.
Related to MQ, I have two steps, OPEN and PUT.
OPEN step works well with return code of zero.
But the PUT step (CALL "MQPUT1") fails with following error:
CASKC0027E Error executing service 'PGM#MQTEST' Execution error : file 'DFH0MQIS' error code: 114, pc=0, call=1, seg=0 114 Attempt to access item beyond bounds of memory (Signal 11)
I am using following directives.
ASSIGN (EXTERNAL) PROTECT-LINKAGE FCDCAT INDD(SYSIN 80 R) OUTDD(SYSOUT 121 R) INITCALL"ORASQL11" p(cobsql) CSQLT=ORACLE8 MAKESYN VERBOSE KEEPCBL END-C VARCHAR=YES MODE=ANSI DECLARE_SECTION=NO p(cp) ENDP ENDP
Strange is that if I remove p(cp) ENDP the programs works well and MQ PUT step works fine.
But due to my project requirement I need to have p(cp) ENDP in directives.
Any idea why this p(cp) ENDP cause to failuar of file 'DFH0MQIS'?
Regards
Dheeraj