1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
| Quintiq file version 2.0
| #parent: #root
| StaticMethod Create (KpiTracker owner, Duration retentionPeriod, String identification) as KpiPeriodRetentionPolicy
| {
| Description: 'Creates a new instance of a KpiPeriodRetentionPolicy, and enforces correct usage of the type.'
| TextBody:
| [*
| // Check for an existing retentionpolicy with the same name and error out if that happens.
| if ( exists( owner, RetentionPolicy, rp, rp.Identification() = identification ) )
| {
| error( "A retention policy with identification ", identification, " already exists. " );
| }
|
| rp := owner.RetentionPolicy( relnew, KpiPeriodRetentionPolicy,
| Identification := identification,
| RetentionPeriod := retentionPeriod );
|
| return rp;
| *]
| }
|
|