| Quintiq file version 2.0 | 
| #parent: mbMainMenu/MenuFindPeggingCircularity | 
| Response OnClick () id:Response_mbMainMenu_MenuFindPeggingCircularity_OnClick | 
| { | 
|   #keys: '[110880.6.1270944478]' | 
|   Body: | 
|   [* | 
|     // Find circularity in processes which causes circularity in pegging | 
|      | 
|     processes := construct( Process_MPs ); | 
|     string := MacroPlan.FindPeggingCircularity( processes ); | 
|      | 
|     // Opens the view related to an Assumption | 
|     opened := ApplicationScope.ViewManager().OpenView( "Pegging circular" ); | 
|      | 
|     if( opened ) | 
|     { | 
|       lanes := selectset( processes, Elements.astype( LaneLeg ).Lane, lane, true );       // LaneLeg is the detail list of lane. Thus, it should shown in the list to show the lane legs. | 
|       processes := processes.Union( lanes ); | 
|       DataHolderProcessesForPeggingCircular.Data( &processes );      // The filter is stored in the view itself | 
|     } | 
|      | 
|     MessageBox::Information( ApplicationLibMacroPlanner, string, '&OK' ); | 
|   *] | 
|   CanBindMultiple: false | 
|   DefinitionID: 'Responsedef_Menu_OnClick' | 
| } |