全局函数说明
1. 全局函数gf_zz_kjkmbm()，如下表2-6-6所示。
表2-6-6 全局函数gf_zz_kjkmbm的说明
项 目 说 明
函数名 gf_zz_kjkmbm
作用 当前账套使用的会计科目编码表ZZ_KJKMBMB与所有账套使用的会计科目编码ZZ_KJKMBM表数据同步处理。
用当前账套使用的会计科目编码表ZZ_KJKMBMB中的数据更新会计科目编码ZZ_KJKMBM表当前账套会计科目数据。
参数 名称 说明 类型
r_zth 当前账套号 string g
脚本 ZZ_KJKMBM表当前账套会计科目数据
delete from zz_kjkmbm where zth=:r_zth;
insert into zz_kjkmbm select * from zz_kjkmbmb where zth=:r_zth ;
窗口设计说明
1. 会计科目增加论文范文http://www.chuibin.com/ 窗口w_kjkm_zj，如下表2-6-7所示。
表2-6-7 窗口w_kjkm_zj的设计说明
项 目 说 明
窗口名 w_kjkm_zj
所在的PBL库 账务处理系统.pbl
功能 会计科目新增
父窗口 window
界面设计
窗口控件说明
控件类型 控件名 控件名称 说明
数据窗口 dw_km_free 自由格式显示科目数据
数据窗口 dw_km_table 网格格式显示科目数据
单行编辑框 sle_count 数据窗口数据行信息
命令按钮 cb_zj &Z增加 增加数据行
命令按钮 cb_fw &F复位 清空数据窗口中的数据
命令按钮 cb_sc &S删除 删除数据窗口中的行
命令按钮 cb_bc &B保存 保存对数据窗口的修改
命令按钮 cb_tc &T退出 退出关闭窗口
事件 脚本
w_kjkm_zj:
Open! dw_km_table.dataobject="dw_zz_kjkmbmb_grid"
dw_km_free.dataobject="dw_zz_kjkmbmb_free"
this.title='会计科目增加'
dw_km_table.settransobject(sqlca)
dw_km_free.settransobject(sqlca)
dw_km_free.ShareData(dw_km_table)
cb_zj.TriggerEvent(Clicked!)
dw_km_free:
itemchanged! string r_colname,r_km_code,r_km_code1,r_bm1,r_bm2,r_bm3, r_bit,r_sjkm
integer r_row,r_cd,r_count,i,r_found
string r_sl_fzhs,r_bz_fzhs,r_dw_fzhs,r_bm_fzhs,r_zy_fzhs,r_sybj,r_tybj
this.accepttext()
r_row=this.getrow() //取得所选中的行号
r_count=this.rowcount() //当前行数
r_colname=this.getcolumnname() //取当前列名
CHOOSE CASE r_colname
CASE 'km_code'
//1 科目编码不能重复
r_km_code = this.getitemstring(r_row,'km_code')
//1-1 判断在数据窗口中输入的科目编码是否存在重复
上一页 [1] [2] [3] [4] [5] [6] [7] [8] 下一页