lihongji
2024-07-09 5ed2c2076e3b8a907ac2d271ea627cc9f9c9b3f4
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 );
  *]
}