lazhen
2025-01-09 8afe90b633046db39042aada36b88193062f8cff
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Quintiq file version 2.0
#parent: #root
Method LinkPISPs (
  OperationInputOutputPISPNodes nodes
)
{
  Description: 'Like PISP node to operation input as siblings input (In a group).'
  TextBody:
  [*
    existing := selectset( nodes, Elements.OperationInputOutput.astype( OperationInput ), oi,
                           oi.Operation() = this.Operation() and guard( oi.OperationInputGroup() <> this, true ) );
                           
    this.MoveOperations( existing );
    
    
    new := selectset( nodes, Elements.PISPNodeInRouting, pisp, 
                      not exists( this, OperationInput, oi, oi.PISPNodeInRouting() = pisp ) );
    
    this.LinkPISPs( new );
  *]
}