陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Quintiq file version 2.0
#parent: #root
Method GetNextSetTypeID () as String
{
  Description:
  [*
    Retrieve the next unused set type ID.
    1) Should be unique across all channels and system on channels
  *]
  TextBody:
  [*
    // Timothy Guan Jul-8-2015 (created)
    
    nextSetTypeId := this.LastSetTypeID() + 1;
    this.LastSetTypeID( nextSetTypeId );
    
    return nextSetTypeId.Format( "N(LPad0(6))" );
  *]
}