| | |
|---|
| | | [* |
|---|
| | | Form.ApplyChanges(); |
|---|
| | | if( WebMessageBox::Question( this, '是否确认推送', 'OK|Cancel' ) = 0 ){ |
|---|
| | | AOnlineAndMOfflinePlanPIR::GenerateData( InterfaceDataset, ddslFactory.Text(), efVersion.Text(), dsStartDate.Date(), dsEndDate.Date(), QuintiqUser::CurrentUser().DisplayName() ); |
|---|
| | | WebMessageBox::Success( "推送成功！" ); |
|---|
| | | msg := AOnlineAndMOfflinePlanPIR::GenerateData( InterfaceDataset, ddslFactory.Text(), efVersion.Text(), dsStartDate.Date(), dsEndDate.Date(), QuintiqUser::CurrentUser().DisplayName() ); |
|---|
| | | WebMessageBox::Success( msg ); |
|---|
| | | } |
|---|
| | | Form.Close(); |
|---|
| | | *] |
|---|
