陈清红
2025-04-14 880f3c0257eeb8c37761d484258fdd102a369a19
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Quintiq file version 2.0
#parent: #root
StaticMethod Create (LibOpt_Channel channel, LibOpt_Link link, Boolean is_new) as LibOpt_ChannelNotify
{
  Description: 'Create a new instance of `LibOpt_ChannelNotify`.'
  TextBody:
  [*
    result := select( link, ChannelNotify, notify, notify.Channel() = channel );
    
    if( isnull( result ) )
    {
      result := channel.ChannelNotify( relnew,
                                       Link := link,
                                       IsNew := is_new );
    }
    else if( result.IsNew() <> is_new )
    {
      error( Translations::LibOpt_ChannelNotify_Create_IsNewInconsistent() );
    }
    
    return result;
  *]
  InterfaceProperties { Accessibility: 'Module' }
}