批量维护产能占用事件日期显示

lazhen

2024-07-15 9eb6f8d2d115e4b290958f1f319c60c31e03d690

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
48
Quintiq file version 2.0
#parent: PanelCustomDraw/CustomDrawDataLayerSWF_step
Response OnDrawObject (
  SWF_Step object
) id:Response_PanelCustomDraw_CustomDrawDataLayerSWF_step_OnDrawObject
{
  #keys: '[136682.0.710317542]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebCustomDrawDataLayer_OnDrawObject'
  QuillAction
  {
    Body:
    [*
      // Draw step info
      gp := SWF_WorkflowDataset.GlobalParameter(); 
      surface.TextColor( Color::GrayText() );
      bigfont := FontSpecification::Construct( gp.DashboardFont(), gp.DashboardFontSizeBig() );
      smallfont := FontSpecification::Construct( gp.DashboardFont(), gp.DashboardFontSizeSmall() );
      leftmargin := 60;
      
      surface.Image( 8,
                     [Number]( ( gp.DashboardGaugeHeight() / 2 ) - ( gp.DashboardImageHeight() / 2 ) ),
                     gp.DashboardImageWidth(),
                     gp.DashboardImageHeight(),
                     object.Definition().IconName() );
      
      surface.Font( smallfont );
      
      displayname := SWF_WorkflowDataset::GUI_ProcessDashboard_FormatName( object.Name() );
      
      surface.Text( leftmargin, 20, displayname + ' - ' + SWF_WorkflowDataset::GUI_ProcessDashboard_FormatDateToString( object.DueDate() ) );
      
      if( not object.IsCompleted() and object.HasLateness() )
      {
        surface.TextColor( ColorScheme.CustomDraw_ActivityLate() );
      }
      else
      {
        surface.TextColor( ColorScheme.CustomDraw_ActivityOnTime() );
      }
      
      surface.Font( bigfont );
      surface.Text( leftmargin, 40, object.DisplayStatus() )
      surface.Text( leftmargin, 75, SWF_WorkflowDataset::GUI_ProcessDashboard_FormatRealToString( object.CompletionPercentage() ) );
    *]
    GroupServerCalls: false
  }
}