为把数据从大型机迁移到AIX平台上的DB2 UDB , 其过程通常事实这样的:登录到大型机,提取数据到一个文件中,ftp文件到AIX机器上, 然后将数据装载到DB2 UDB。 这需要两个不同的工作环境。
替代方案是:通过只使用一个脚本,在DB2 UDB的AIX环境下我可以完成整个过程。这个过程非常快, 不会加重大型机或AIX环境的负担。
你所需要做的是使用大型机连接,再用EXPORT命令来听取数据。 例如:
db2 connect to DB2S390 USER xxxxxx USING yyyy
db2 "export to exportfile.ixf of IXF select * from SYSIBM.SAMPLE"
你可以再将输出的文件导入装有AIX系统的DB2 UDB中。我已经写了一个在AIX上的Korn shell脚本, 只需给出图表名称,用户名和密码,就可用一个命令从大型机上提取和加载数据。同时值得提出的是使用db2look命令,你可以用大型机的DB2 Connect连接作为数据提取DDL。
#!/bin/ksh
# Extract data from Mainframe and Load into the
# Specified Table in the DDHAP00 Database
#
export LOADFILE="/udb/db2aix01/file/file1/$1"
export USERID=$2
export PSWD=$3
export CurrentPWD=$PWD # Save current directory
echo 'date'
# Connect to mainframe
db2 CONNECT TO DB2S390 USER $USERID using $PSWD
echo "Extracting data from mainframe..."
# Extract data from mainframe
db2 "export to $LOADFILE.ixf of IXF select * from DBDEV.$1"
echo 'date'
echo "Extract completed"
# Disconnect from mainframe
db2 DISCONNECT DB2S390;
# Connect to database on AIX
db2 CONNECT TO DDHAP00 USER xxxxx USING xxxxxx;
# Clear load messages file
cp /dev/nul /udb/db2aix01/file/file1/Load_$1.msg
echo 'date'
echo "Loading data..."
# Load data from flat file
db2 "LOAD FROM $LOADFILE.ixf OF IXF MODIFIED BY pagefreespace=0
totalfreespace=0 ROWCOUNT 999999999 WARNINGCOUNT 9 MESSAGES Load_$1.msg
REPLACE INTO DBO.$1 STATISTICS NO INDEXING MODE AUTOSELECT"
echo 'date'
echo "End of Load"
db2 DISCONNECT DDHAP00;
# Reset to previous directory
cd $PWD