611
社区成员
发帖
与我相关
我的任务
分享string ls_FieldName,ls_UserName
DECLARE emp_user CURSOR FOR
SELECT FieldName,UserName
FROM table_user;
OPEN emp_user;
FETCH emp_user INTO :ls_FieldName,:ls_UserName;
do while SQLCA.SQLCode=0
dw_1.Modify(trim(ls_FieldName + ".text='" + trim(ls_UserName) + "'") //根据数据,动态修改显示内容
FETCH emp_user INTO :ls_FieldName,:ls_UserName;
loop
CLOSE emp_user;