PB楼盘房地产销售管理系统 第21页
end if
dw_1.retrieve( )
end if
23、欠费管理窗口的查看费用管理按钮的代码
integer currentrow
integer key
currentrow=dw_1.getrow( )
if currentrow>0 then
key=dw_1.getitemnumber( currentrow, "customernumber")
OpenWithParm(w_moneymanage,string(key))
end if
24、欠费管理窗口的详细信息按钮的代码
integer currentrow
integer key
currentrow=dw_1.getrow( )
if currentrow>0 then
key=dw_1.getitemnumber( currentrow, "customernumber")
OpenWithParm(w_lackofmoney,string(key))
end if
25、客户信息录入窗口的确定按钮的代码
dw_2.update( )
if SQLCA.sqlcode = 0 then
dw_1.retrieve( )
dw_2.clear( )
dw_2.insertrow( 0)
else
messagebox("提示","添加用户信息失败！")
end if
26、客户信息搜索窗口的数据窗口1的代码
string name
name = dw_1.getitemstring( currentrow, 2)
dw_2.setfilter("customername='"+name+"'")
dw_2.retrieve()