AS400==WINDOWS开发COBOL/安装DB2/连接DB2

安装GNUCOBOL环境

VSCODE安装COBOL插件

docker安装DB2

docker pull ibmcom/db2

docker run -d --name db2 --privileged -p 50000:50000 -e LICENSE=accept -e DB2INST1_PASSWORD=YourStrongPassword -e DBNAME=testdb -e DB2INSTANCE=db2inst1  -e BLUDB=YES  -v db2_data:/database ibmcom/db2
 

连接到 Db2 数据库：

• 你可以使用 Db2 的命令行工具或图形界面工具（如 IBM Data Studio）连接到 Db2 实例。
• 连接时使用以下信息：
  • 主机名：localhost
  • 端口：50000
  • 用户名：db2inst1（默认）
  • 密码：你在步骤 3 中设置的密码YourStrongPassword

CMD连接

docker exec -it db2 bash
su - db2inst1
db2 connect to testdb
db2 list db directory
db2 create database testdb
db2 connect to testdb
 

db2 "CREATE TABLE test (id INT NOT NULL PRIMARY KEY, name VARCHAR(50))"
 

db2 "DESCRIBE TABLE test"

db2 "INSERT INTO test (id, name) VALUES (1, 'DockerDB2')"
db2 "SELECT * FROM test"
 

获取环境变量配置

echo $PATH

[db2inst1@c573bc75ac6d ~]$ echo $PATH                                                                                   
/database/config/db2inst1/.local/bin:/database/config/db2inst1/bin:/usr/local/bin:/usr/bin:/usr/local/sbin:/usr/sbin:/database/config/db2inst1/sqllib/bin:/database/config/db2inst1/sqllib/adm:/database/config/db2inst1/sqllib/misc:/database/config/db2inst1/sqllib/pd:/database/config/db2inst1/sqllib/gskit/bin:/database/config/db2inst1/sqllib/db2tss/bin  

centos系统

切换到root用户，设置环境变量

docker exec -it --user root db2 bash

vi ~/.bashrc

export PATH=/database/config/db2inst1/.local/bin:/database/config/db2inst1/bin:/usr/local/bin:/usr/bin:/usr/local/sbin:/usr/sbin:/database/config/db2inst1/sqllib/bin:/database/config/db2inst1/sqllib/adm:/database/config/db2inst1/sqllib/misc:/database/config/db2inst1/sqllib/pd:/database/config/db2inst1/sqllib/gskit/bin:/database/config/db2inst1/sqllib/db2tss/bin

source ~/.bashrc

建库建表

db2 create database testdb
db2 connect to testdb
 

db2 "CREATE TABLE test (id INT NOT NULL PRIMARY KEY, name VARCHAR(50))"
 

db2 "DESCRIBE TABLE test2"

db2 "INSERT INTO test2 (id, name) VALUES (1, 'DockerDB2')"
db2 "SELECT * FROM test2"

下载gnucobol源码，上传到容器

./configure

缺少包就安装

make install

编写Cobol代码

       IDENTIFICATION DIVISION.PROGRAM-ID. HELLO-WORLD.PROCEDURE DIVISION.DISPLAY "Hello, World!".STOP RUN.

cobc -x -o hello hello.cob

./hello

IDEA插件连接

一定要指定数据库名字