Question

pb数据窗口中给字段赋值

以下代码是在数据串口中给文本类型赋值的。
注释部分是给文本类型赋值。我想把这个改成给字段赋值。我自己设了TECUSTPO和TESTYLENO 。 注释下面是我改的 大家帮我看一下，我用了SETITEM但实现不了 我要的效果。
integer li_rownum
string ls_OldPo, ls_OldStyle
string ls_PoStr, ls_StyleStr
Datawindowchild dwc_detail

if not isvalid(dwc_detail) then
return
end if

ls_OldPo = ""
ls_OldStyle = ""
for li_rownum = 1 to dwc_detail.rowcount( )
if ls_OldPo <> dwc_detail.getitemstring(li_rownum, "custpo") then
ls_OldPo = dwc_detail.getitemstring(li_rownum, "custpo")
ls_PoStr = ls_PoStr + "/" + ls_OldPo
end if

if ls_OldStyle <> dwc_detail.getitemstring(li_rownum, "style") then
ls_OldStyle = dwc_detail.getitemstring(li_rownum, "style")
ls_StyleStr = ls_StyleStr + "/" + ls_OldStyle
end if
Next

ls_PoStr = mid(ls_PoStr, 2)
ls_StyleStr = mid(ls_StyleStr, 2)
dw_sheet.setredraw( false )
/*if Trim(ls_PoStr) <> "" then
dwc_detail.modify("t_Po.text='" + ls_PoStr + "'")
end if
if Trim(ls_StyleStr) <> "" then
dwc_detail.modify("t_style.text='" + ls_StyleStr + "'")
end if*/
if Trim(ls_PoStr) <> "" then
dwc_detail.setitem(1 , "tecustpo", ls_PoStr)
dwc_detail.accepttext()
end if
if Trim(ls_StyleStr) <> "" then
dwc_detail.setitem(1 , "testyleno" , ls_StyleStr)
dwc_detail.accepttext()
end if
dw_sheet.setredraw( true )
dwc_detail.object.testyleno[1] = ls_StyleStr
改成这样的话会报错的。子数据窗口类型不相容。

Answer 1

你把注释打开，看文本是否设置成功，另外，你确保字段名称没错吧？试下这种格式：
dwc_detail.setitem(1 , "tecustpo", ls_PoStr)
改成：
dwc_detail.object.tecustpo[1] = ls_PoStr

dwc_detail.setitem(1 , "testyleno" , ls_StyleStr)
改成：
dwc_detail.object.testyleno[1] = ls_StyleStr

看看是否报错。