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
35
36
37
38
39
40
41
42
43
44
45
46
47
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  StaticMethod CreateOrDelete ( 
 |    Operation sourceoperation, 
 |    Operation destinationoperation, 
 |    output BaseOperationLinks trash, 
 |    Number sourcegorupid, 
 |    Number destinationgroupid, 
 |    Real sourcequantity, 
 |    Boolean destinationhasuserquantity, 
 |    Real destinationquantity, 
 |    Real destinationminquantity, 
 |    Real destinationmaxquantity, 
 |    Real destinationgroupquantity 
 |  ) as OperationLink 
 |  { 
 |    Description: 'Create or delete operation link operation link' 
 |    TextBody: 
 |    [* 
 |      // DWE2 Jan-29-2016 (created) 
 |       
 |      ol := OperationLink::FindOperationLinkTypeIndex( sourceoperation.ID(), destinationoperation.ID() ); 
 |       
 |      if( isnull( ol ) ) 
 |      { 
 |        ol := OperationLink::Create( sourceoperation, 
 |                                      destinationoperation, 
 |                                      sourcegorupid, 
 |                                      destinationgroupid, 
 |                                      sourcequantity, 
 |                                      destinationhasuserquantity, 
 |                                      destinationquantity, 
 |                                      destinationminquantity, 
 |                                      destinationmaxquantity, 
 |                                      destinationgroupquantity, 
 |                                      false, 
 |                                      true ); 
 |      } 
 |      else 
 |      { 
 |        // Add to trash for delete 
 |        trash.Add( ol ); 
 |      } 
 |       
 |      return ol; 
 |    *] 
 |  } 
 |  
  |