admin
2025-01-22 7e31442f0e9b07764e9c6a9680d3d4aeba5fe1de
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;
  *]
}