1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| Quintiq file version 2.0
| #parent: #root
| StaticMethod Create (LibMon_ServiceMonitor owner_i) as LibMon_PingResult
| {
| TextBody:
| [*
| owner_i.RemoveOldestPingResult();
|
| pingResult := owner_i.PingResult( relnew,
| PingID := [String]Key::NextPersistentKey(),
| TimestampStart := DateTime::ActualTime(),
| TimestampCounterStart := OS::PrecisionCounter() );
|
| return pingResult;
| *]
| }
|
|