1
2
3
4
5
6
7
8
9
10
11
12
13
14
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method VerifyChecksum (String payload_i) as Boolean 
 |  { 
 |    Description: 'Verify that the reassembled payload matches the checksum.' 
 |    TextBody: 
 |    [* 
 |      // Jacky CHAN Aug-4-2016 (created) 
 |      binaryData := BinaryData::FromBase64EncodedString( payload_i ); 
 |      md5        := binaryData.MD5().AsBase64EncodedString(); 
 |       
 |      return this.Checksum() = md5; 
 |    *] 
 |  } 
 |  
  |