连续生产优化

admin

2024-10-22 ef42765827dbd7c60d23dffd9a5bd510d0d76617

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
Quintiq file version 2.0
#parent: #root
Method ReceiveDataExchange (String data_i)
{
  Description: 'Receive data-exchange and determine its type.'
  TextBody:
  [*
    // Jacky CHAN Apr-20-2016 (created)
    nvt := LibDEF_DataAccessor::NVTDeserialize( data_i );
    
    senderGUID := LibDEF_DataAccessor::GetHeaderPropertyAsString( nvt, LibDEF_DataAccessor::HEADER_SYSTEMGUID_FROM() );
    event      := this.EventCreate( senderGUID, true );
    
    LibDEF_Util::EventLog( event, "Receiving Data Exchange" );
    
    if( this.VerifyHeaderDomainGUID( nvt, event )
        and this.VerifyCompatibilityAndUpdateSystemVersion( senderGUID, nvt, event ) )
    {
      // mark the system as available
      sender := LibDEF_System::MarkAvailability( this, senderGUID, true, event );
    
      if( LibDEF_DataAccessor::HasChildNamed( nvt, nvt.Root(), LibDEF_DataAccessor::HANDLE_CONFIGURATION() ) )
      {
        // Handle configuration message
        this.ReceiveConfiguration( &nvt, event );
      }
      else
      {
        // restrict non-Configuration message requires a valid System entry
        if( isnull( sender ) )
        {
          // log restrictive error
          LibDEF_Util::EventLogError( event,
                                      "Failed to process Data-Exchange message",
                                      "Non-configuration message received from unknown sender with S-GUID '" + senderGUID + "' is rejected." );
        }
        else
        {
          if( LibDEF_DataAccessor::HasChildNamed( nvt, nvt.Root(), LibDEF_DataAccessor::HANDLE_METADATA() ) )
          {
            // Handle metadata message
            this.ReceiveMetadata( &nvt, sender, event );
          }
          else if( LibDEF_DataAccessor::HasChildNamed( nvt, nvt.Root(), LibDEF_DataAccessor::HANDLE_DATA() ) )
          {
            // Handle set-data message
            this.ReceiveData( nvt, sender, event );
          }
          else
          {
            LibDEF_Util::EventLogError( event,
                                        "Failed to process Data-Exchange message",
                                        "Failed to process Data-Exchange message, message format cannot be recognized." );
          }
        }
      }
    }
  *]
}