【求助】字符串“AX00001”，如何让程序自动递增成“AX00002”（4GL）

cnfun

如题，字符串“AX00001”，如何让程序自动递增成“AX00002”，
需要通过程序，运行一次+1。
急，谢谢。

wenlq

弄个存储过程。

yunzhongyue

这样,

1. main
   
2. define a char(7)
   
3. define b int
   
4. let a='AX00001'
   
5. let b=a[3,7]
   
6. let b=b+1
   
7. let a=a[1,2],b using "&&&&&"
   
8. display a
   
9. end main
   

复制代码