| | |
| | | ValueJsonString := JSON::Object().Add( "SKU",selection.SKU()) |
| | | .Add( "Util",selection.Util()) |
| | | .Add( "CustomCode",selection.CustomCode()) |
| | | .Add( "CustomName",selection.CustomName()).Build().AsString()); |
| | | .Add( "CustomName",selection.CustomName()) |
| | | .Add( "ForecastQty",selection.ForecastQty()) |
| | | .Add( "NeedTime",selection.NeedTime().AsQUILL()) |
| | | .Add( "OrderCode",selection.OrderCode()).Build().AsString()); |
| | | } |
| | | else |
| | | { |
| | |
| | | SelectItem.ValueJsonString(JSON::Object().Add( "SKU",selection.SKU()) |
| | | .Add( "Util",selection.Util()) |
| | | .Add( "CustomCode",selection.CustomCode()) |
| | | .Add( "CustomName",selection.CustomName()).Build().AsString()); |
| | | .Add( "CustomName",selection.CustomName()) |
| | | .Add( "ForecastQty",selection.ForecastQty()) |
| | | .Add( "NeedTime",selection.NeedTime().AsQUILL()) |
| | | .Add( "OrderCode",selection.OrderCode()).Build().AsString()); |
| | | } |
| | | Application.OpenForm( "FrmMaterial","popout"); |
| | | |
| | | jResult := H_FunctionClass::SM_GetMaterialData( MacroPlan,selection.SKU(),selection.ForecastQty(),selection.OrderCode(),"-",selection.NeedTime()); |
| | | if(jResult.Get( "Status").GetBoolean()) |
| | | { |
| | | Application.OpenForm( "FrmMaterial","popout"); |
| | | } |
| | | else |
| | | { |
| | | WebMessageBox::Warning( jResult.Get( "Msg").GetString()); |
| | | } |
| | | *] |
| | | GroupServerCalls: false |
| | | } |