| | |
|---|
| | | factoryNameEnglish := factoryNameEnglish.SubString( 0,factoryNameEnglish.Length() - 1 ); |
|---|
| | | if( WebMessageBox::Question( Translations::RecycleBin_DispatchShiftSchedulingDispatchCheck( factoryNameChinese,factoryNameEnglish ),Translations::MessageBox_YesNo() ) = 0 ){ |
|---|
| | | if( cbCC.Checked() ){ |
|---|
| | | message := DispatchShiftSchedulingLine::DispatchCC( RecycleBin ); |
|---|
| | | WebMessageBox::Information( message ); |
|---|
| | | 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() ){ |
|---|
| | | message := DispatchShiftSchedulingLine::DispatchDL( RecycleBin ); |
|---|
| | | WebMessageBox::Information( message ); |
|---|
| | | respJSON := DispatchShiftSchedulingLine::DispatchDL( RecycleBin ); |
|---|
| | | result := respJSON.Get( "State" ).AsString(); |
|---|
| | | message := respJSON.Get( "Message" ).AsString(); |
|---|
| | | if( result = "Error" ){ |
|---|
| | | WebMessageBox::Error( "远程服务器返回了一个错误：" + message ); |
|---|
| | | }else{ |
|---|
| | | WebMessageBox::Information( message ); |
|---|
| | | } |
|---|
| | | } |
|---|
| | | WebMessageBox::Success( "下发成功" ); |
|---|
| | | }else{ |
|---|
