[KB功能解说] 如何自X3更改一个数据库序列？

lynn.yu

适用产品版本
Sage X3 V7、PU8、PU9、PU10


模块
管理


问题概要
你有重复键值或者你只是想要更改你的序列号。


详细信息
数据库序列没有设为正确的值，且生成了重复键值。


解决方法
以下代码可以将序列号设为所需的值：

Subprog SET_SEQUENCE(FOLDER,TABLE,SEQVALUE,ERR)
Value Char FOLDER #Folder NAME
Value Char TABLE #Table linked to the sequence
Value Integer SEQVALUE #Sequence value
Variable Integer ERR #Error value
ERR = 0
If func AFNC.PARTSEP(ver$(0),2," ")>="17r.221"
#valfil -i no_sequence DOSSIER TABLE
Call SYSTEME(adxmac(0),"valfil -i"-num$(SEQVALUE+1)-FOLDER-TABLE,"",ERR) From ORDSYS
Else
Local File =FOLDER+"."+TABLE [SVG]
While uniqid([SVG])<SEQVALUE+1
Wend
Close Local File [SVG]
Endif

End