账务处理系统凭证录入模块 第3页

返回值 说明 类型
 返回自动产生的凭证论文范文http://www.chuibin.com/  号 string
脚本 string r_pzh
integer r_pzh1
select  max(convert(int,pzh)) into :r_pzh1
 from zz_pzzb
 where pzlx_code=:r_pzlx and zth=:r_zth and nkjqj=:r_nkjqj and ykjqj=:r_ykjqj;
if  dec(r_pzh1)<1 or isnull(r_pzh1) then
 r_pzh='1'
else
 r_pzh=string(r_pzh1+1)   //凭证号自动加1
end if
return r_pzh

窗口设计说明
1. 凭证输入窗口w_pz，如下表2-10-4所示。
表2-10-4  窗口w_pz的设计说明
项    目 说    明
窗口名 w_pz
所在的PBL库 账务处理系统.pbl
功能 凭证输入
父窗口 window
界面设计 

 窗口控件说明
 
 控件类型 控件名 控件名称 说明
 数据窗口 dw_main  凭证主项
 数据窗口 dw_item  凭证明细项
 命令按钮 cb_zjpz &Z增加凭证 增加凭证主项数据
 命令按钮 cb_zjh &H增加行 增加凭证明细项数据
 命令按钮 cb_fw &F复位 清空数据窗口中的数据
 命令按钮 cb_sc &S删除行 删除数据窗口中的行
 命令按钮 cb_bc &B保存 保存对数据窗口的修改
 命令按钮 cb_tc &T退出 退出关闭窗口
窗口函数说明 函数名 wf_fill_row
 作用 通过增加空行，填满明细项数据窗口
 脚本 integer r_row,r_rowcount
r_rowcount=dw_item.rowcount()
for r_row=1 to 5 - r_rowcount
 cb_zjh.triggerevent(clicked!)
next
事件 脚本
w_pz:
Open! dw_main.dataobject="dw_zz_pzzb_free_pz"
dw_item.dataobject="dw_zz_pzmxb_tab_pz"
dw_main.settransobject(sqlca)
dw_item.settransobject(sqlca)

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

账务处理系统凭证录入模块 第3页下载如图片无法显示或论文不完整，请联系qq752018766