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
  }
}
