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();
|
|
currentuser := QuintiqUser::CurrentUser().DisplayName();
|
|
AOnlineAndMOfflinePlanMS64::GenerateData( InterfaceDataset, efFactory.Text(), dsStartDate.Date(), dsEndDate.Date(), macroplanF, macroplanT, cbActiveVersion.Checked(), dhProducts.Data(), currentuser );
|
|
Form.Close();
|
*]
|
}
|
