首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > PB >

明细表自动赋值解决方案

2012-09-14 
明细表自动赋值目录窗口传递参数long ilong jjdw_1.getrow()messagebox(,j)if j0 thenidw_1.object.i

明细表自动赋值
目录窗口传递参数
long i
long j
j=dw_1.getrow()
messagebox(" ",j)
if j>0 then
i=dw_1.object.id[j] 
messagebox(" ",i) 
 openwithparm(w_gwsm,i) 
else
 messagebox("系统提示","请选择记录!")
end if
 
详细窗口接收参数

long i
i=message.doubleParm
messagebox(" ",i)  
DW_1.Settransobject(sqlca)
dw_t_gwzz.settrans(sqlca)
dw_1.retrieve(i,"bh")
dw_t_gwzz.retrieve(i,"bh")

详细表的数据窗口加了一个添加按钮
long a;
long i
i=message.doubleParm
a=dw_t_gwzz.insertrow(0)
if a<0 then 
messagebox("插入错误","插入不成功")
return 0
end if
请问如何更改,添加的时候能自动把详细表的编号(t_gwzz_zzid)变成传递过来的数值message.doubleParm


[解决办法]
在详细窗口增加一个窗体变量 i_i
详细窗口接收参数

long i
i=message.doubleParm
i_i=i
messagebox(" ",i)
DW_1.Settransobject(sqlca)
dw_t_gwzz.settrans(sqlca)
dw_1.retrieve(i,"bh")
dw_t_gwzz.retrieve(i,"bh")

详细表的数据窗口加了一个添加按钮
long a;
a=dw_t_gwzz.insertrow(0)
dw_t_gwzz.object.dw_t_gwzz[a]=i_i

[解决办法]
就是增加一个实例变量来接收message.doubleparm
[解决办法]
实例变量
[解决办法]
就是实例变量
Declare 中选择 instance variables

热点排行