窗口控件说明
控件类型 控件名 控件名称 说明
命令按钮 cb_bc &B保存 保存对数据窗口中数据的修改
静态文本框 st_tip_mjbj 提示【保存】按钮如何才有效
事件 脚本
w_kmyeb_cx _xg:
Open!
【覆盖父脚本】 i_type=message.stringparm
CHOOSE CASE i_type
CASE "zz_kmyeb_qc"
dw_km.dataobject="dw_zz_kjkmbmb_kmyeb_grid_r"
dw_km_free.dataobject="dw_zz_kjkmbmb_kmyeb_free"
//在会计科目余额表中插入默认的期初数据
INSERT INTO zz_kmyeb (zth,km_code,nkjqj,ykjqj,qcjfye,qcdfye,qcye,jffse,dffse,jflj,dflj,qmjfye,qmdfye,qmye)
select zth,km_code,:g_nkjqj,:g_ykjqj,0,0,0,0,0,0,0,0,0,0
from zz_kjkmbmb
where zth=:g_zth
and km_code not in
(select km_code from zz_kmyeb where zth=:g_zth and nkjqj=:g_nkjqj and ykjqj=:g_ykjqj);
CASE ELSE
return
END CHOOSE
this.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.Object.DataWindow.ReadOnly="no"
dw_km_free.Object.DataWindow.ReadOnly="no"
em_nkjqj.text=g_nkjqj
em_ykjqj_min.text=g_ykjqj
em_ykjqj_max.text=g_ykjqj
em_nkjqj.enabled=false
em_ykjqj_min.enabled=false
em_ykjqj_max.enabled=false
cb_bc.enabled=false
dw_km:
itemchanged! integer r_row
string r_col_name,r_yefx_code
dec r_qcye, r_qcjfye,r_qcdfye
dw_km.accepttext()
r_row=this.getrow()
if r_row>0 then
this.setrow(r_row)
this.selectrow(0,false)
this.selectrow(r_row,true)
gf_dw_count(this,sle_count)//在sle_count.text中显示行数
end if
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] 下一页