Quintiq file version 2.0 
 | 
#parent: PanelDispatchShiftSchedulingInformation/bDispatch 
 | 
Response OnClick () id:Response_PanelDispatchShiftSchedulingInformation_bDispatch_OnClick 
 | 
{ 
 | 
  #keys: '[414996.1.172931481]' 
 | 
  CanBindMultiple: false 
 | 
  DefinitionID: 'Responsedef_WebButton_OnClick' 
 | 
  Precondition: 
 | 
  [* 
 | 
    return cbCC.Checked() or cbDL.Checked(); 
 | 
  *] 
 | 
  QuillAction 
 | 
  { 
 | 
    Body: 
 | 
    [* 
 | 
      factoryNameChinese := ""; 
 | 
      factoryNameEnglish := ""; 
 | 
      if( cbCC.Checked() ){ 
 | 
        factoryNameChinese := factoryNameChinese.Concat( "长春工厂;" ); 
 | 
        factoryNameEnglish := factoryNameEnglish.Concat( "CC;" ); 
 | 
      } 
 | 
      if( cbDL.Checked() ){ 
 | 
        factoryNameChinese := factoryNameChinese.Concat( "大连工厂;" ); 
 | 
        factoryNameEnglish := factoryNameEnglish.Concat( "DL;" ); 
 | 
      } 
 | 
      factoryNameChinese := factoryNameChinese.SubString( 0,factoryNameChinese.Length() - 1 ); 
 | 
      factoryNameEnglish := factoryNameEnglish.SubString( 0,factoryNameEnglish.Length() - 1 ); 
 | 
      if( WebMessageBox::Question( Translations::RecycleBin_DispatchShiftSchedulingDispatchCheck( factoryNameChinese,factoryNameEnglish ),Translations::MessageBox_YesNo() ) = 0 ){ 
 | 
        if( cbCC.Checked() ){ 
 | 
          respJSON := DispatchShiftSchedulingLine::DispatchCC( RecycleBin ); 
 | 
          result := respJSON.Get( "State" ).AsString();  
 | 
          message := respJSON.Get( "Message" ).AsString(); 
 | 
          if( result = "Error" ){ 
 | 
            WebMessageBox::Error( "远程服务器返回了一个错误:" + message ); 
 | 
          }else{ 
 | 
            WebMessageBox::Information( message ); 
 | 
          } 
 | 
        } 
 | 
        if( cbDL.Checked() ){ 
 | 
          respJSON := DispatchShiftSchedulingLine::DispatchDL( RecycleBin );  
 | 
          result := respJSON.Get( "State" ).AsString(); 
 | 
          message := respJSON.Get( "Message" ).AsString(); 
 | 
          if( result = "Error" ){ 
 | 
            WebMessageBox::Error( "远程服务器返回了一个错误:" + message ); 
 | 
          }else{ 
 | 
            WebMessageBox::Information( message,Translations::MessageBox_OK() ); 
 | 
          } 
 | 
        } 
 | 
        WebMessageBox::Success( "下发成功" ); 
 | 
      }else{ 
 | 
        WebMessageBox::Success( "Cancel" ); 
 | 
      } 
 | 
    *] 
 | 
    GroupServerCalls: false 
 | 
  } 
 | 
} 
 |