| | |
| | | [* |
| | | // Disabled button to prevent the possibility of multiple firing |
| | | |
| | | btnOk.Enabled(false,''); |
| | | //btnOk.Enabled(false,''); |
| | | |
| | | // OnOk |
| | | this.ApplyChanges(); |
| | | DataHolderFilling.Data().Commit(); |
| | | //DataHolderFilling.Data().Commit(); |
| | | |
| | | fillingData := DataHolderFilling.Data(); |
| | | //fillingData := DataHolderFilling.Data(); |
| | | |
| | | CustomerAndForecastOrder::CreateFillingCapacityOrder( MacroPlan, fillingData.WrappedInstance()); |
| | | //CustomerAndForecastOrder::CreateFillingCapacityOrder( MacroPlan, fillingData.WrappedInstance()); |
| | | |
| | | //if( not isnull( DataHolderForm.Data() ) ) |
| | | //{ |
| | |
| | | // DataHolderForm.Data().ListAssumptions().SelectByKey( DataHolderDialogData.Data().WrappedInstance().Key() ); |
| | | //} |
| | | |
| | | FillingCapacityOrder::CreateFillingCapacityOrder( MacroPlan, |
| | | DataHolderFilling.Data().OrderID(), |
| | | [Real]edtSalesAmount.Text(), |
| | | dsDemandDate.Date(), |
| | | dsForecastDemandDate.Date(), |
| | | ddslOrderType.Text(), |
| | | DataHolderFilling.Data().VerNo() |
| | | ); |
| | | |
| | | this.Close(); |
| | | *] |
| | | } |