1) MQ RC 2012:
www-01.ibm.com/.../fm12190_.htm
2012 (07DC) (RC2012): MQRC_ENVIRONMENT_ERROR
2) MQ libs
www-01.ibm.com/.../fg16690_.htm
Preparing COBOL programs
3) MQRTS.cbl loads MQ libs with STDCALL ( call convention 74 )
special-names.
call-convention 74 is STDCALL.
working-storage section.
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
exit program.
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
Regards
Yvon