先說下情況！！！A表和B表·是兩張關聯的主表和附表···A表里是基本資訊··B表是詳細資訊~~我做了資料視窗DW_ADD1
例如：A表 ID NAME SEX 等等··
B表··input_date next_of_kin ··
DW_ADD1視窗 AS ID AS NAME SEX input_date next_of_kin
我想在我新增記錄的時候可以去到主記錄的基本資訊··同時在B表添加一行 用戶可以對起編輯·保存后B表新增一行·A表跟新基本資訊··
我的解決方法：
dw_detail.ShareData(dw_add1) //dw_update資料視窗共享dw_detail資料
//寫資料
ls_mid = dw_master.GetItemString(ll_currow,"hid")
ls_bid = dw_master.GetItemString(ll_currow,"patient_id") //ID號
ls_cs = dw_master.GetItemNumber(ll_currow,"visit_id") //住院次數
ls_vid = dw_master.GetItemString(ll_currow,"inp_no") //住院號
ls_name= dw_master.GetItemString(ll_currow,"name") //姓名
ls_sex = dw_master.GetItemString(ll_currow,"sex") //性別
ls_dept= dw_master.GetItemString(ll_currow,"dept") //科室
ls_zd = dw_master.GetItemString(ll_currow,"diagnosis_desc") //診斷
ls_dh = dw_master.GetItemString(ll_currow,"next_of_kin_phone") //電話
ls_gzdw= dw_master.GetItemString(ll_currow,"unit_in_contract") //作業單位
ls_dz = dw_master.GetItemString(ll_currow,"mailing_address") //家庭住址
ls_jgys= dw_master.GetItemstring(ll_currow,"doctor_in_charge") //經管醫生
ls_flag= dw_master.GetItemstring(ll_currow,"flag") //提交
if isnull(ls_bid) then ls_bid = ''
if dw_detail.RowCount() > 0 then
ls_mid = dw_detail.GetItemString(1,"mid")
end if
////實體變數
dw_add1.SetItem(1,"patient_id",ls_bid)
dw_add1.SetItem(1,"visit_id",string(ls_cs))
dw_add1.SetItem(1,"inp_no",ls_vid)
dw_add1.SetItem(1,"NAME",ls_name)
dw_add1.SetItem(1,"dept",ls_dept)
dw_add1.SetItem(1,"sex",ls_sex)
dw_add1.SetItem(1,"date_of_birth",string(ls_date))
dw_add1.SetItem(1,"MAILING_ADDRESS",ls_dz)
dw_add1.SetItem(1,"NEXT_OF_KIN_PHONE",ls_dh)
dw_add1.SetItem(1,"UNIT_IN_CONTRACT",ls_gzdw)
dw_add1.SetItem(1,"doctor_in_charge",ls_jgys)
dw_add1.SetItem(1,"DIAGNOSIS_DESC",ls_zd)
dw_add1.SetItem(1,"operator",gs_username)
dw_add1.SetItem(1,"flag",ls_flag)
現在的問題是··為什么我共享后的資料視窗只顯示第一行的資料！而不是我插入B表的空行！！！！！求教！！！！！
uj5u.com熱心網友回復：
ShareData兩dw資料源要一致uj5u.com熱心網友回復：
是一致的~~我已經可以共享資料了··我只是想共享替他行！！！！比如·我共享的第一行有資料··第二行沒有資料時我新插入的·我想共享第二行·怎么控制~？？？轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/63649.html
標籤：腳本語言
上一篇：pb如何實作語音讀姓名功能