有關客戶端傳參數給中間層時返回數據問題??(100分)

我有兩個主從表主表:a1(單據號,供應商,日期,總數量,總金融,經手人,備注);從表a2(單據號,
商品編號,數量,單價,單位)
1:我在中間層寫一過程Doogs_find通過客戶端輸入單據號傳給中間層過程Doogs_find怎樣把
查找到的數據返回給客戶端?這個過程怎樣寫?
2:我在中間層寫一過程用來保存數據(包括新增保存,修改保存,刪除保存),請問這過程如何寫?
3.客戶顯示從表用什麼控件好?
以上兩過程:能提供代碼?
請各位大哥大姐幫我!!!!!!!.

中间层放adoquery、datasetprovide、ADOConnection1构件
proceduredo
ogs_find(var djh:integer);
begin
adoquery.sql.text:='select * from 表名 where 单据号=:dh';//dh是一个变量；
adoquery.params.parambyname('dh').integer:=djh;
adoquery.open;
end;
客户端放一个ClientDataSet1、SocketConnection1、dbgrid、DataSource等构件，把它
们按需要连接起来。现在掉用中间层的过程用下面的一句话
SocketConnection1.AppServer.doogs_find(2);//doogs_find(2)括号中的数据就是你
想要查找的单号值，可以随你写。这样就可以把你想要的记录在dbgrid中显示出来。

我是說的主從表,不是一個單表?

請各位高手幫幫忙吧!!
在下將感激不盡!!!!

各位高手幫助呀,不要只顧掙錢,幫幫小弟,謝謝!!