志翔科技有限公司後勤網

後勤等待處理訊息站,請各位成員努力消除待工區
 
首頁首頁  會員註冊會員註冊  登入登入  

分享 | 
 

 User 自訂Function或window內含的資料拋轉處理範例說明

向下 
發表人內容
flying
Admin
avatar

文章數 : 207
注冊日期 : 2008-11-11

發表主題: User 自訂Function或window內含的資料拋轉處理範例說明   周四 11月 20, 2008 11:26 am

自訂函數function或自行設計的window要呼叫系統執行指定資料視窗之間的資料互拷或拋轉,需呼叫 workwindow.get_datafrom(string dw_destination,string dw_from)
dw_destination為目標資料視窗名稱,dw_from為來源資料名稱

下例為專案設計一個專用視窗w_import_data_use,用來供操作者輸入單號,之後按下匯入紐,將該單號資料匯入到單據視窗w_paper的目標料視窗中.

w_import_data_use的dw_from為指定P/O單號後的來源資料視窗,在w_import_data_use的button中臨時創建.在此自訂的window 中,將操作者輸入的單號,以指定資料視窗名稱="d_ictran_copyfr_podetl" 去讀取指定單號的資料,再透過原呼叫單據工作視窗 w_paper.get_datafrom(string dw_destination,string dw_from)的函數,拷貝資料給w_paper 的目標資料視窗dw_destination.

資料拷貝是以兩個資料視窗 dw_destination,dw_from 所預先設定好的 [指定互拷] 欄位執行資料互拷功能.

自訂window w_import_data_use,觸發button b_copydata 執行以下程式片段

程式中 dw_destination為目標資料視窗,此例=w_paper.dw_sub1

string mpurno P/O單號
long li_retrieve 來源資料筆數

w_top_bottom_paper w_paper
w_paper=dw_focus.getparent() 單據工作視窗指標

臨時建立指定單號後要放置來源資料的資料容器物件,需單一P/O單號當讀取參數
datastore dw_from
dw_from=create datastore
dw_from.dataobject="d_ictran_copyfr_podetl"
dw_from.SetTransObject(SQLCA)

mpurno=sle_purno.text 取得操作者在單號輸入區的P/O單號
li_retrieve=dw_from.retrieve(mpurno) 以單號讀取取料
if li_retrieve>0 then
 w_paper.get_datafrom(dw_destination,dw_from) 呼叫工作視窗內含的資料互拷函數
 messagebox('notice',string(li_retrieve)+' copy complete !!')
ELSE
 messagebox('notice','no copy !!')
end if
destroy dw_from

get_datafrom()本身只是執行資料抄錄的動作,並不代為執行存檔,以上例而言,一般是關掉w_import_data_use後回到原單據窗,再繼續操作.
回頂端 向下
檢視會員個人資料 http://idon.666forum.net
 
User 自訂Function或window內含的資料拋轉處理範例說明
回頂端 
1頁(共1頁)

這個論壇的權限:無法 在這個版面回復文章
志翔科技有限公司後勤網 :: 系統主題 :: 系統架構-
前往: