1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
| Quintiq file version 2.0
| #parent: #root
| StaticMethod CreateUpdate (
| SCK_SyncObjectCheck owner,
| Object violated_object
| ) as SCK_SyncObjectMessage
| {
| TextBody:
| [*
| message := owner.GetMessageForObject( violated_object );
|
| if ( isnull( message ) )
| {
| message := owner.MessageOwned ( relnew, SCK_SyncObjectMessage
| , CheckName := owner.Name()
| , ViolatedObjectKey := violated_object.Key() );
| }
|
| message.Update( owner, violated_object );
|
| return message;
| *]
| }
|
|