账务处理系统会计科目查询修改模块 第4页

窗口函数说明 函数名 wf_retrieve
 作用 检索dw_km中的数据
 脚本 dw_km.retrieve(g_zth,i_s_tjcx.km_code,i_s_tjcx.km_name,&   i_s_tjcx.kmlb_code,i_s_tjcx.mjbj_code,i_s_tjcx.kmjb,&    i_s_tjcx.kmxz_code,i_s_tjcx.yefx_code,& i_s_tjcx.sl_fzhs,i_s_tjcx.bz_fzhs,i_s_tjcx.dw_fzhs,i_s_tjcx.bm_fzhs,&     i_s_tjcx.zy_fzhs,i_s_tjcx.sybj_code,i_s_tjcx.tybj_code) 
gf_dw_count(dw_km,sle_count)
事件 脚本
W_kjkm_cx:
Open! i_type=message.stringparm
dw_km.dataobject="dw_zz_kjkmbmb_grid_r"
dw_km_free.dataobject="dw_zz_kjkmbmb_free"
i_title='会计科目'
this.title=i_title + '查询'

dw_km.settransobject(sqlca)
dw_km_free.settransobject(sqlca)
dw_km.Object.DataWindow.ReadOnly="Yes"
dw_km_free.Object.DataWindow.ReadOnly="Yes"
dw_km_free.visible=false
dw_km.sharedata(dw_km_free)
//数据窗口大小相同
dw_km_free.x=dw_km.x
dw_km_free.y=dw_km.y
dw_km_free.width=dw_km.width
dw_km_free.height=dw_km.height
dw_km:
Clicked! i_row=row
if not i_row>0 then return
this.setrow(i_row)
if row>0 then
 this.SELECTROW(0,FALSE)
 this.SELECTROW(i_row,TRUE) 
end if
gf_dw_count(this,sle_count)
dw_km:
doubleClicked! i_row=row
if not i_row>0 then return
this.setrow(i_row)
dw_km_free.ScrollToRow ( i_row )
dw_km_free.visible=true 

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] 下一页

账务处理系统会计科目查询修改模块 第4页下载如图片无法显示或论文不完整，请联系qq752018766