连续生产优化

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
Quintiq file version 2.0
#parent: pPreviousEditionCurve/cPreviousEditionCurve
Response OnUserChanged () id:Response_pPreviousEditionCurve_cPreviousEditionCurve_OnUserChanged
{
  #keys: '[414996.0.415683420]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebCheckbox_OnUserChanged'
  QuillAction
  {
    Body:
    [*
      efCurve.Enabled( not this.Checked(), "" );
      bCurve.Enabled( not this.Checked(), "" );
      
      if ( this.Checked() ) {
        // 为true，调用存档，把全局Curve放置局部Curve
        dhLocalBinaryDataCurve.Data( guard( BinaryData::FromBase64EncodedString( dhBinaryDataCurve.Data().AsBase64EncodedString() ), BinaryData::Construct() ) );
        dhLocalOriginalFileNameCurve.Data( guard( dhOriginalFileNameCurve.Data(), "" ) );
        
        // 替换全局Curve为上一版Curve
        previousAC := select( Archive, ArchiveFile.astype( ArchiveCurve ), tempAC, true );
        dhBinaryDataCurve.Data( BinaryData::FromBase64EncodedString( previousAC.SourceFileBinaryValue().AsBase64EncodedString() ) );
        dhOriginalFileNameCurve.Data( previousAC.Name() );
      } else {
        // 为false，不调用存储，把局部PPA防止全局PPA
        dhBinaryDataCurve.Data( BinaryData::FromBase64EncodedString( dhLocalBinaryDataCurve.Data().AsBase64EncodedString() ) );
        dhOriginalFileNameCurve.Data( dhLocalOriginalFileNameCurve.Data() );
      }
      
      cCurveEnable.Checked( true );
    *]
    GroupServerCalls: false
  }
}