char msgid[80];
int m;
int i;
int p;
char str[1024];
char pid[64];
char WORKITEMID1[80];
lr_load_dll("d:\\getdata_382.dll");
i=init_db("DRIVER={Oracle in OraHome92};SERVER=192.168.103.119:1521;UID=USR_SYNCHRO;PWD=SYNCHRO;DBQ=TMS;DBA=W;APA=T;EXC=F;XSM=Default;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;GDE=F;FRL=Lo;BAM=IfAllSuccessful;MTS=F;MDI=Me;CSR=F;FWC=F;PFC=10;TLO=O;");
lr_output_message("i=%d",i);
m= atoi(lr_eval_string("{LCID}"));
p = itoa(m,pid,10);
strcpy(str,"select workitem_id from t_workitem where process_ins_id=");
strcat(str,p);
lr_output_message("str=%s",str);
i+=execSQL(str);
//i+=execSQL("select workitem_id from t_workitem where process_ins_id=3768");
lr_output_message("i=%d",i);
i+=bindCol(1,msgid,"i",7);
lr_output_message("i=%d",i);
i=fetchData();
lr_output_message("i=%d",i);
lr_output_message("i=%s",msgid);
disConnect();
i=atoi(msgid);
lr_output_message("i=%d",i);
itoa(i,WORKITEMID1,10);
lr_output_message("WORKITEMID1=%s",WORKITEMID1);
lr_save_string(WORKITEMID1,"WORKITEMID1");
我是看了kernzhang发的那个预定机票的DEMO后,突然一下明白"要执行的SQL保存到一个变量中去"这句话的意思了.,这样写,我的脚本很顺利通过,可能中间有段代码有点冗余,不过总算算是能把软件的工作流自动跑下去了.哈哈,谢谢!!! |