r_col_name=this.GetColumnname()
CHOOSE CASE i_type
CASE "zz_kmyeb_qc"
CHOOSE CASE r_col_name
CASE "zz_kmyeb_qcjfye"
r_qcjfye=GetItemDecimal(r_row,'zz_kmyeb_qcjfye')
r_qcdfye=0
this.setitem(r_row,'zz_kmyeb_qcdfye',0)
CASE "zz_kmyeb_qcdfye"
r_qcdfye=GetItemDecimal(r_row,'zz_kmyeb_qcdfye')
r_
论文范文http://www.chuibin.com/ qcjfye=0
this.setitem(r_row,'zz_kmyeb_qcjfye',0)
END CHOOSE
r_yefx_code=getitemstring(r_row,'zz_kjkmbmb_yefx_code')
CHOOSE CASE r_yefx_code
CASE '借'
r_qcye=r_qcjfye - r_qcdfye
CASE '贷'
r_qcye= r_qcdfye - r_qcjfye
END CHOOSE
this.setitem(r_row,"zz_kmyeb_qcye",r_qcye)
this.setitem(r_row,"zz_kmyeb_qmjfye",r_qcjfye)
this.setitem(r_row,"zz_kmyeb_qmdfye",r_qcdfye)
this.setitem(r_row,"zz_kmyeb_qmye",r_qcye)
END CHOOSE
wf_tiptext() //提示信息显示
dw_km:
itemerror! return 1
cb_cx:
Clicked!
【扩展父脚本】 //根据查询条件，控制删除与修改操作
CHOOSE CASE i_type
CASE "zz_kmyeb_qc"
if i_s_tjcx.mjbj_code<>'Y%' then //非末级科目，不能进行初始化操作
cb_bc.enabled=false
dw_km.Object.DataWindow.ReadOnly="yes"
else
cb_bc.enabled=true
dw_km.Object.DataWindow.ReadOnly="no"
end if
END CHOOSE
cb_bc:
Clicked! integer rtn,Net
string r_nkjqj,r_ykjqj_min,r_ykjqj_max
dw_km.accepttext()
dw_km_free.accepttext()
if not (dw_km.modifiedcount()>0 or dw_km.deletedcount()>0 ) then return//判断数据窗口中的数据是否被更改或删除
Net=messagebox('提示','是否真的保存？',exclamation!,yesno!,2)
if Net=2 then return
rtn=dw_km.update()
if rtn=1 then
commit using sqlca;
CHOOSE CASE i_type
CASE "zz_kmyeb_qc"//向上汇总
gf_kmyebhz(g_zth,g_nkjqj,g_ykjqj) //所有会计科目余额表汇总计算
END CHOOSE
messagebox('提示','保存成功！')
r_nkjqj= em_nkjqj.text+'%'
r_ykjqj_min= em_ykjqj_min.text
r_ykjqj_max= em_ykjqj_max.text
wf_retrieve(r_nkjqj,r_ykjqj_min,r_ykjqj_max) //检索数据
if dw_km_free.visible=true then
dw_km.setrow(i_row)
dw_km_free.ScrollToRow ( i_row )
gf_dw_count(dw_km,sle_count)
end if
else
rollback using sqlca;
messagebox('提示','保存失败!')
end if
【运行效果】
进入【会计科目】→【科目余额初始】操作界面，即可进入科目余额初始窗口，对末级科目进行初始余额输入。
图2-8-1 科目余额初始菜单
图2-8-2 科目余额初始窗口
点击【复位】按钮，即可清空数据窗口中的所有数据。
点击【查询】按钮，将打开科目期初余额查询条件窗口。
图2-8-3 科目期初余额查询条件窗口
科目期初余额查询条件窗口与会计科目查询条件窗口极为相似，只是增加了余额范围查询条件，其操作与会计科目查询条论文范文http://www.chuibin.com/ 件窗口一样。注意：当查询条件中的末级标记设置为“Y”时，科目余额初始窗口中的【保存】按钮才有效。因此，要输入科目初始余额，需要在科目期初余额查询条件窗口中将末级标记设置为“Y”。
设置需要进行科目期初余额输入的查询条件后，点击【确定】按钮，即可查询出满足查询条件的数据。
在科目余额初始窗口中，输入科目的期初借方余额或期初贷方余额，系统将根据余额方向自动计算出期初余额。同时，在数据窗口底部将提示期初借方余额合计以及期初贷方余额的合计金额。
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] 下一页
账务处理系统会计科目初始余额管理模块 第8页下载如图片无法显示或论文不完整，请联系qq752018766
