i wanna make the unit editable

tokio007

EnablePlanningControls()
PlanningGetParam.SetUpPlanningControls("Reordering Policy","Include Inventory",
ReorderCycleEnabled,SafetyLeadTimeEnabled,SafetyStockQtyEnabled,
ReorderPointEnabled,ReorderQuantityEnabled,MaximumInventoryEnabled,
MinimumOrderQtyEnabled,MaximumOrderQtyEnabled,OrderMultipleEnabled,IncludeInventoryEnabled);
CurrForm."Reorder Cycle".ENABLED := ReorderCycleEnabled;
CurrForm."Safety Lead Time".ENABLED := SafetyLeadTimeEnabled;
CurrForm."Safety Stock Quantity".ENABLED := SafetyStockQtyEnabled;
CurrForm."Reorder Point".ENABLED := ReorderPointEnabled;
CurrForm."Reorder Quantity".ENABLED := ReorderQuantityEnabled;
CurrForm."Maximum Inventory".ENABLED := MaximumInventoryEnabled;
CurrForm."Minimum Order Quantity".ENABLED := MinimumOrderQtyEnabled;
CurrForm."Maximum Order Quantity".ENABLED := MaximumOrderQtyEnabled;
CurrForm."Order Multiple".ENABLED := OrderMultipleEnabled;
CurrForm."Include Inventory".ENABLED := IncludeInventoryEnabled;

EnableCostingControls()
CurrForm."Standard Cost".ENABLED := "Costing Method" = "Costing Method"::Standard;
CurrForm."Unit Cost".ENABLED := "Costing Method" <> "Costing Method"::Standard;


what should i change?

tokio007

can any one help me doing it :P

kine

And what you really need? Is this some kind of homework?