chenqinghong
2024-05-07 3ec06a830367465068963156dcc1d8e522571c13
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
Quintiq file version 2.0
#parent: ListAccounts
Response OnDrop (
  structured[Entity] source,
  Account_MP target
) id:Response_ListAccounts_OnDrop
{
  #keys: '[144528.2.71944754]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebList_OnDrop'
  Precondition:
  [*
    // Ensure all are units (prevent SP from unit cost creation)
    canCreate := UnitCost::CanCreate( source, feedback );
    
    return canCreate;
  *]
  QuillAction
  {
    Body:
    [*
      // Drag and drop one or more entities onto Account_MP to create unit costs
      // Auto check nav panel if entity not checked yet
      formNavPanel := DataHolderFormNavPanel.Data();
      allchildren := selectset( source, Elements.astype( Unit ).AllChildren.AsChildren, c, true );
      formNavPanel.ExtendEntitiesCheckedItem( &allchildren );
      
      units := selectset( source, Elements.astype( Unit ), u, true ); 
      dlg:= construct( DialogCreateEditUnitCost );
      dlg.NewForAccount( null( FormUnitCosts ), units, target );
    *]
    GroupServerCalls: false
  }
}