Oracle E-Business Suite中的开放接口

4. 开发主机并发程序（ARIMPORT.prog）

主机并发程序使用操作系统的 Script 程序进行编写。主要目的是用来调用“数据导入程序”。“数据导入程序”的目的是将外部数据源数据（如：csv文档、txt文档）自动导入的接口表（RA_INTERFACE_LINES_ALL）中。

图4 Oracle中的主机程序

//主机程序代码
###################################################################################
#Filename:ARIMPORT.prog
###################################################################################
PROGRAM_NAME=`basename$0`
PROGRAM_NAME=`basename$PROGRAM_NAME.prog`
START_TIME=`date+%d-%b-%Y""%H:%M`
echo$PROGRAM_NAME"begin...."$START_TIME
DATENOW=`date+%Y%m%d`
USER_PASSWD=$1
VAR_USER_ID=$2
VAR_USER_NAME=$3
VAR_REQUEST_ID=$4
OUT_FILE=`echo$APPLCSF/$APPLOUT/o$VAR_REQUEST_ID.out`
LOCAL_PATH=$AR_TOP/data
CTL_FILE_NAME=`echo$LOCAL_PATH/"arcontrol.ctl"`
DATA_FILE_NAME=`echo$LOCAL_PATH/"data.csv"`
CTL_FILE_LOG=`echo$LOCAL_PATH"/"data"$DATENOW".log"`
#echo$CTL_FILE_NAME
#echo$DATA_FILE_NAME
#echo$CTL_FILE_LOG
##########sqlldr##########
cd$LOCAL_PATH
#$ORACLE_HOME/bin/sqlldr$USER_PASSWDcontrol=$CTL_FILE_NAMElog=$CTL_FILE_LOG
$ORACLE_HOME/bin/sqlldr$USER_PASSWDcontrol=arcontrol.ctllog=$CTL_FILE_LOG
cat$CTL_FILE_LOG>>$OUT_FILE
##########updateinterfacedata##########
sqlplus-s$USER_PASSWD@$AR_TOP/sql/ARIMPORT_UPD.sql
{
printf("hello,worldn");
}