Quintiq file version 2.0
#parent: ListInventorySupply
Response OnClick () id:Response_ListInventorySupply_MenuNewInventorySupply_OnClick
{
  #keys: '[124808.0.392147681]'
  Body:
  [*
    // Create a new InventorySupply
    pispips := ifexpr( DataHolderProductInSPIP.Data().Size() > 0,
                       DataHolderProductInSPIP.Data(),
                       null( ProductInStockingPointInPeriods ) );
    
    dlg := construct( DialogCreateEditInventorySupply );
    dlg.CreateInventorySupply( pispips, this );
  *]
  DefinitionID => /ListInventorySupply/Responsedef_ListInventorySupply_Menu_OnClick
  Initiator: 'MenuNewInventorySupply'
  Precondition:
  [*
    return Product_MP::HasProductAndHasPeriod( feedback, MacroPlan )
           and InventorySupply::CanCreate( feedback, DataHolderChildProducts.Data(), DataHolderChildStockingPoints.Data() );
  *]
  UserRequiresReadWrite: true
}