hongji.li
2023-11-03 aefafd2142478d4fb07d6b8b45c3047e247389e0
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
Quintiq file version 2.0
#parent: #root
Method ShowAtGridPoint (
  StockingPoint_MPs stockingpoints,
  Number x,
  Number y
)
{
  Description: 'Move to a defined grid point'
  TextBody:
  [*
    if( stockingpoints.Size() > 0 )
    {
      gridx := 0;
      gridy := 0;
      Node::NearestGridPoint( x, y, gridx, gridy, this.GridPointDistance() );
    
      nodes := selectset( this, Node.astype( StockingPointNode ), node, exists( stockingpoints, Elements, sp, sp = node.StockingPoint_MP() ), true );
    
      traverse( nodes, Elements, node )
      {
        node.MoveToGridPoint( gridx, gridy );
        node.IsUserVisible( true );
      }
    }
  *]
}