1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| Quintiq file version 2.0
| #parent: #root
| Method CleanupIntegrationEvents
| {
| TextBody:
| [*
| maxAge := Duration::Days( 30 ); // TODO: configurable
| now := DateTime::Now();
|
| // Cleanup IntegrationEvent where the age is over 30 days
| traverse( this, IntegrationEvent, event,
| now - event.TimestampLastUpdated() > maxAge )
| {
| event.Delete();
| }
| *]
| }
|
|