手把手 教你 peopleSoft之 主键自增长

如下图，点击增加 表格自增长主键

要设置的地方只有两个
component点击 编写 peopleCode

DoSave();

/*-----------------------------------*/
Local Rowset &PRIORWORK_RS;
Local number &I, &MAX_SEQ_NBR;

/*-----------------------------------*/
/* Determine Maximum Sequence Number */
/*-----------------------------------*/
&PRIORWORK_RS = GetLevel0()(1).GetRowset(Scroll.ZHOUXINGR);
&MAX_SEQ_NBR = 0;
For &I = 1 To &PRIORWORK_RS.ActiveRowCount;
   If &PRIORWORK_RS(&I).ZHOUXINGR.Z_NUMBER.Value > &MAX_SEQ_NBR Then
      &MAX_SEQ_NBR = &PRIORWORK_RS(&I).ZHOUXINGR.Z_NUMBER.Value;
   End-If;
End-For;
/*-----------------------------------*/
/* Set Sequence Number to Max + 1    */
/*-----------------------------------*/
ZHOUXINGR.Z_NUMBER = &MAX_SEQ_NBR + 1;

就可以实现，主键自增长功能。。

                         ==end==