create cursor b1 (js n(1),m1 c(3),m2 c(10))
insert into b1 values (3,"a","aaa")
insert into b1 values (2,"b","bb")

可否根据js数和m1字符直接得到m2（即不用循环代码）？

找到了，REPLICATE()

REPLACE m2 WITH PADL(ALLTRIM(m2), js, m1) ALL
或者
REPLACE m2 WITH PADR(ALLTRIM(m2), js, m1) ALL
或者
REPLACE m2 WITH PADC(ALLTRIM(m2), js, m1) ALL
楼主的答案最为简洁

[此贴子已经被作者于2021-12-28 20:23编辑过]