动态设置某列为下拉数据窗口

/* 动态设置某列为下拉数据窗口 */
/*
 * d_dddw_dep 数据窗口对象名称
 * dept_name  列名
 * dept_id    列名
*/
dw_1.Modify("department_id.DDDW.Name=d_dddw_dep ")
dw_1.Modify("department_id.DDDW.DisplayColumn='dept_name' ")
dw_1.Modify("department_id.DDDW.DataColumn='dept_id' ")
dw_1.modify("department_id.DDDW.autoretrieve = yes")
dw_1.modify("department_id.DDDW.allowEdit = no")
dw_1.modify("department_id.DDDW.useAsBorder= yes")
dw_1.modify("department_id.DDDW.vscrollbar = yes ")
或：
dw_1.object.department_id.dddw.name = "d_dddw_dep"    
dw_1.object.department_id.DDDW.DisplayColumn = "dept_name"
dw_1.object.department_id.DDDW.DataColumn = "dept_id"   

// 子数据窗口检索

dw_1.getChild("department_id",dwc_child)
dwc_child.setTransObject(sqlca)
dwc_child.retrieve()