程序代码：

create cursor b1 (a n(3),p_1 c(3), p_2 c(3), p_3 c(3),p_4 c(3))
insert into b1 values (2,"","","","")
insert into b1 values (1,"","","","")
insert into b1 values (3,"","","","")
insert into b1 values (4,"","","","")
insert into b1 values (2,"","","","")

SCAN
kk="p_"+TRANSFORM(a)

REPLACE &kk WITH "P_"+TRANSFORM(a)
ENDSCAN