| | |
|---|
| | | Body: |
|---|
| | | [* |
|---|
| | | Form.ApplyChanges(); |
|---|
| | | componentmds := ApplicationScope.ComponentMDS(); |
|---|
| | | mdsinstance := select( componentmds, ComponentMDSKinds.ComponentMDSInstances, m, m.MDSID().MDSKey() = ddlMacroPlan.Data().DatasetMDSID() ); |
|---|
| | | handle := mdsinstance.GetMDSHandle() |
|---|
| | | macroplan := handle.AsMacroPlan(); |
|---|
| | | AOnlineAndMOfflinePlanPIR::GenerateData( InterfaceDataset, ddslFactory.Text(), macroplan, dsStartDate.Date(), dsEndDate.Date(), QuintiqUser::CurrentUser().DisplayName() ); |
|---|
| | | AOnlineAndMOfflinePlanPIR::GenerateData( InterfaceDataset, ddslFactory.Text(), efVersion.Text(), dsStartDate.Date(), dsEndDate.Date(), QuintiqUser::CurrentUser().DisplayName() ); |
|---|
| | | WebMessageBox::Success( "推送成功！" ); |
|---|
| | | Form.Close(); |
|---|
| | | *] |
|---|
