Quintiq file version 2.0
|
#parent: ListEntityTreeInPanel
|
Response OnDrop (
|
structured[Unit] information,
|
StockingPoint_MP target
|
) id:Response_ListEntityTreeInPanel_OnDrop_30
|
{
|
#keys: '[127710.1.1019131188]'
|
Body:
|
[*
|
// Add as output stocking point for unit
|
// #9446: Added CTRL modifier to link in reverse direction
|
feedback := '';
|
if( dropaction.IsLink()
|
and not target.CanLinkToUnits( feedback, information, false ) ) //if shift+control is hold and can unlink
|
{
|
target.RemoveAsOutputFromUnits( information );
|
}
|
else //this intends to link (shift+control is not hold)
|
{
|
target.LinkToUnits( information, dropaction.IsControl() );
|
}
|
*]
|
DefinitionID: 'Responsedef_GUIComponent_OnDrop'
|
Precondition:
|
[*
|
ret_value := true;
|
|
if( not dropaction.IsLink() ) //if shift+control not hold, means linking and need to check preconditions
|
{
|
ret_value := target.CanLinkToUnits( feedback, information, dropaction.IsControl() );
|
}
|
|
return ret_value;
|
*]
|
}
|
