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
  | Quintiq file version 2.0 
 |  #parent: #root 
 |  Method PTF_ScrollGanttChartPageUpDown ( 
 |    String formname, 
 |    String ganttchartname, 
 |    Number pagecount, 
 |    output String response_o 
 |  ) as Boolean id:Method_LibPTF_pnlTestRunner_PTF_ScrollGanttChartPageUpDown 
 |  { 
 |    #keys: '[103546.0.55683738]' 
 |    Body: 
 |    [* 
 |      // Scrolls the Gantt Chart to up or down by page 
 |      issuccessful     := false; 
 |      targetganttchart := this.PTF_GetGanttChart( formname, ganttchartname, response_o ); 
 |       
 |      if( response_o.Length() = 0 ) //equals to not isnull( targetganttchart ); 
 |      { 
 |        // Perform (multiple) scroll up or down by page on gantt chart depending on pagecount value 
 |        if( pagecount > 0 ) 
 |        { 
 |          targetganttchart.ScrollUpPage( pagecount ); 
 |        } 
 |        else 
 |        { 
 |          targetganttchart.ScrollDownPage( ( -1 ) * pagecount ); 
 |        } 
 |        issuccessful := true; 
 |      } 
 |      else 
 |      { 
 |        MessageBox::Warning( this, response_o, "OK", 1 ); 
 |      } 
 |       
 |      return issuccessful; 
 |    *] 
 |  } 
 |  
  |