Quintiq file version 2.0
|
#parent: #root
|
Method OnOk () id:Method_DialogZEDPPSMS64_OnOk
|
{
|
#keys: '[415136.0.1043064582]'
|
Body:
|
[*
|
Form.ApplyChanges();
|
//componentmds := ApplicationScope.ComponentMDS();
|
//mdsinstanceF := select( componentmds, ComponentMDSKinds.ComponentMDSInstances, m, m.MDSID().MDSKey() = ddlOriginMacroPlan.Data().DatasetMDSID() );
|
//handleF := mdsinstanceF.GetMDSHandle()
|
//macroplanF := handleF.AsMacroPlan();
|
//
|
//mdsinstanceT := select( componentmds, ComponentMDSKinds.ComponentMDSInstances, m, m.MDSID().MDSKey() = ddlDestinationMacroPlan.Data().DatasetMDSID() );
|
//handleT := mdsinstanceT.GetMDSHandle()
|
//macroplanT := handleT.AsMacroPlan();
|
|
if( WebMessageBox::Question( this, '是否确认推送', 'OK|Cancel' ) = 0 ){
|
currentuser := QuintiqUser::CurrentUser().DisplayName();
|
|
msg := AOnlineAndMOfflinePlanMS64::GenerateData( InterfaceDataset, ddslFactory.Text(), dsStartDate.Date(), dsEndDate.Date(), efVersionFrom.Text(), efVersionTo.Text(), cbActiveVersion.Checked(), dhProducts.Data(), currentuser );
|
WebMessageBox::Success( msg );
|
}
|
Form.Close();
|
*]
|
}
|
