I Get an Error 2012 with " CALL 'MQCONN' USING ISER-QM-NAME, HCONN, RETCODE, REASON"
Please Help Me
I googled MQCONN 2012 and got this link
Have a read of the info in there
It looks like something in your environment changed since the last run?
Or you are taking PROGA from ENVIRONA and trying to run it on ENVIRONB?
if the latter then did the preparation of the executable run without error or warning?
I have only used MQ on IBM mainframes but once you get the hang of it, including the trouble-shoooting, it is quite straight forward and works well
Bali - Indonesia
1) MQ RC 2012:
2012 (07DC) (RC2012): MQRC_ENVIRONMENT_ERROR
2) MQ libs
Preparing COBOL programs
3) MQRTS.cbl loads MQ libs with STDCALL ( call convention 74 )
call-convention 74 is STDCALL.
78 MQdll value "mqiccb".
*> install_location = IBM MQ install_location
*> install_location\Tools\Lib\mqmcb 32-bit server for Micro Focus COBOL
*> install_location\Tools\Lib\mqiccb 32-bit client for Micro Focus COBOL
*> install_location\Tools\Lib64\mqmcb 64-bit server for Micro Focus COBOL
*> install_location\Tools\Lib64\mqiccb 64-bit client for Micro Focus COBOL
01 pptr procedure-pointer.
procedure division STDCALL.
display "*--> MQrts " "load IBM MQ DLL "
MQdll " " with no advancing
set pptr to null
set pptr to entry MQdll
if pptr = null display "KO" else display "OK" end-if
I classically do use code snippet above to load "MQ RTS", the keyword being STDCALL ( call convention 74 is being used to load MQ DLL/library) ....
4) INITCALL"MQRTS" in COBOL code proceeding to MQ I-Os