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