Quintiq file version 2.0 
 | 
#parent: #root 
 | 
Method GetAllChildren () remote as owning Units 
 | 
{ 
 | 
  Description: 'return all children of this unit' 
 | 
  TextBody: 
 | 
  [* 
 | 
    // qty1 Feb-24-2017 (created) 
 | 
    allchildren := construct( Units ); 
 | 
     
 | 
    traverse( this, Child, child ) 
 | 
    { 
 | 
      allchildren.Add( child ); 
 | 
      local := child.GetAllChildren(); 
 | 
      allchildren := allchildren.Union( local ); 
 | 
    } 
 | 
     
 | 
    return &allchildren; 
 | 
  *] 
 | 
} 
 |