Taka様、いつもありがとうございます。
さっそく、デバッガでおって確認してみたのですが、
どうもうまくいきません。
まだ、他にミスをしているところがあるのでしょうか？
この際、コーディングチェックをお願いできませんか？

Integer li_ret = 777 
Any ls_data[10]
String ls_buff,ls_buff2
Long ll_data_cnt, ll_cnt

ll_data_cnt = dw_objname_input.RowCount()
IF ll_data_cnt > 0 THEN
ls_buff = \"(\"
FOR ll_cnt = 1 TO ll_data_cnt - 1
ls_buff = ls_buff + \"?,\"
NEXT
ls_buff = ls_buff + \"?)\"
ELSE
Close(w_syori_msg)
RETURN
END IF

String ls_sqlstatment

// プロシージャ宣言文の作成
ls_sqlstatment = \"EXECUTE \" + is_objname + ls_buff

DECLARE emp_proc DYNAMIC PROCEDURE FOR SQLSA;
PREPARE SQLSA FROM :ls_sqlstatment USING TRORA;

FOR ll_cnt = 1 TO ll_data_cnt - 1
ls_buff2 = ls_buff2 + \":ls_data[\" + String(ll_cnt) + \"], \"
NEXT
ls_buff2 = ls_buff2 + \":ls_data[\" + String(ll_cnt) + \"]\" 

FOR ll_cnt = 1 TO ll_data_cnt
ls_data[ll_cnt] = dw_objname_input.GetItemString(ll_cnt, \"as_objname\")
NEXT

// プロシージャの実行
EXECUTE DYNAMIC emp_proc USING :ls_buff2;
IF TRORA.SQLCode <> 0 THEN
MessageBox(\"エラー\",\"プロシージャの実行に失敗しました。\" + TRORA.SQLErrText)
/////// ここで、SQLCodeが１００になります。/////////

ELSE
FETCH emp_proc INTO :li_ret;
MessageBox(\"実行結果\", \"プロシージャのリターン値・・・\" +  String(li_ret))
END IF

以上です。