在 AIX 中准备 COBOL 程序

在 AIX® 中使用 IBM® COBOL Set 和 Micro Focus COBOL 来准备 COBOL 程序时，请使用此信息。

MQ_INSTALLATION_PATH 表示安装了 IBM MQ 的高级目录。

  • 32 位 COBOL 副本安装在以下目录中：
    MQ_INSTALLATION_PATH/inc/cobcpy32
    并在以下位置创建符号链接：
    MQ_INSTALLATION_PATH/inc
  • 64 位 COBOL 副本安装在以下目录中：
    MQ_INSTALLATION_PATH/inc/cobcpy64
在以下示例中，将 COBCPY 环境变量设置为：
MQ_INSTALLATION_PATH/inc/cobcpy32
（对于 32 位应用程序）以及：
MQ_INSTALLATION_PATH/inc/cobcpy64
（对于 64 位应用程序）。

您需要将程序与以下某个库文件链接起来：

库文件 程序/出口类型
libmqmcb.a 针对 COBOL 的服务器（非线程应用程序）
libmqmcb_r.a 针对 COBOL 的服务器（线程应用程序）
libmqicb.a 针对 COBOL 的客户机（非线程应用程序）
libmqicb_r.a 针对 COBOL 的客户机（线程应用程序）
您可以使用 IBM COBOL Set 编译器或 Micro Focus COBOL 编译器，具体取决于程序:
  • 以 amqm 开头的程序适合于 Micro Focus COBOL 编译器，并且
  • 以 amq0 开头的程序适合于任一编译器。

使用 IBM COBOL Set for AIX 来准备 COBOL 程序

样本 COBOL 程序随 IBM MQ一起提供。 要编译这样的程序，请输入以下列表中相应的命令：
32 位非线程服务器应用程序
$ cob2 -o amq0put0 amq0put0.cbl -L MQ_INSTALLATION_PATH/lib -lmqmcb -qLIB \
-I<COBCPY>
32 位非线程客户机应用程序
$ cob2 -o amq0put0 amq0put0.cbl -L MQ_INSTALLATION_PATH/lib -lmqicb -qLIB \
-I<COBCPY>
32 位线程服务器应用程序
$ cob2_r -o amq0put0 amq0put0.cbl -qTHREAD -L MQ_INSTALLATION_PATH/lib \
-lmqmcb_r -qLIB -I<COBCPY>
32 位线程客户机应用程序
$ cob2_r -o amq0put0 amq0put0.cbl -qTHREAD -L MQ_INSTALLATION_PATH/lib \
-lmqicb_r -qLIB -I<COBCPY>
64 位非线程服务器应用程序
$ cob2 -o amq0put0 amq0put0.cbl -q64 -L MQ_INSTALLATION_PATH/lib - lmqmcb \
-qLIB -I<COBCPY>
64 位非线程客户机应用程序
$ cob2 -o amq0put0 amq0put0.cbl -q64 -L MQ_INSTALLATION_PATH/lib - lmqicb \
-qLIB -I<COBCPY>
64 位线程服务器应用程序
$ cob2_r -o amq0put0 amq0put0.cbl -q64 -qTHREAD -L MQ_INSTALLATION_PATH/lib \
-lmqmcb_r -qLIB -I<COBCPY>
64 位线程客户机应用程序
$ cob2_r -o amq0put0 amq0put0.cbl -q64 -qTHREAD -L MQ_INSTALLATION_PATH/lib \
-lmqicb_r -qLIB -I<COBCPY>

使用 Micro Focus COBOL 准备 COBOL 程序

在编译程序之前，如下所示设置环境变量：

export COBCPY=<COBCPY>
export LIBPATH=MQ_INSTALLATION_PATH/lib:$LIBPATH
要使用 Micro Focus COBOL 编译 32 位 COBOL 程序，请输入：
  • 针对 COBOL 的服务器
    
$ cob32 -xvP amqminqx.cbl -L MQ_INSTALLATION_PATH/lib -lmqmcb
  • 针对 COBOL 的客户机
    
$ cob32 -xvP amqminqx.cbl -L MQ_INSTALLATION_PATH/lib -lmqicb
  • COBOL 的线程服务器
    
$ cob32 -xtvP amqminqx.cbl -L MQ_INSTALLATION_PATH/lib -lmqmcb_r
  • COBOL 的线程客户机
    $ cob32 -xtvP amqminqx.cbl -L MQ_INSTALLATION_PATH/lib -lmqicb_r
要使用 Micro Focus COBOL 编译 64 位 COBOL 程序，请输入：
  • 针对 COBOL 的服务器
    
$ cob64 -xvP amqminqx.cbl -L MQ_INSTALLATION_PATH/lib64 -lmqmcb
  • 针对 COBOL 的客户机
    
$ cob64 -xvP amqminqx.cbl -L MQ_INSTALLATION_PATH/lib64 -lmqicb
  • COBOL 的线程服务器
    
$ cob64 -xtvP amqminqx.cbl -L MQ_INSTALLATION_PATH/lib64 -lmqmcb_r
  • COBOL 的线程客户机
    
$ cob64 -xtvP amqminqx.cbl -L MQ_INSTALLATION_PATH/lib64 -lmqicb_r

其中 amqminqx 是样本程序

有关需要设置的环境变量的说明，请参阅 Micro Focus COBOL 文档。