20230926测试后修正

yunchai

2023-09-26 164f52d48957b4d6291f003b18882a682b8f1f1d

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
Quintiq file version 2.0
#parent: PanelCustomDraw/CustomDrawDataLayerCurrentUser
Response OnDrawObject (
  SWF_User object
) id:Response_SWF_CustomDrawProcessDashboard_CustomDrawDataLayerCurrentUser_OnDrawObject
{
  #keys: '[136682.0.1319847910]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebCustomDrawDataLayer_OnDrawObject'
  GroupServerCalls: true
  QuillAction
  {
    Body:
    [*
      // Draw user info
      //this.Rectangle( region ); // Debug
      surface.TextColor( Color::GrayText() );
      
      if( not isnull( object ) )
      {
        gp                    := SWF_WorkflowDataset.GlobalParameter(); 
        bigfont               := FontSpecification::Construct( gp.DashboardFont(), gp.DashboardFontSizeBig() );
        mediumfont            := FontSpecification::Construct( gp.DashboardFont(), gp.DashboardFontSizeMedium() );
        leftmargin            := 25;
       
        user_and_date         := object.Name() + " - " + SWF_WorkflowDataset::GUI_ProcessDashboard_FormatDateToString( object.Dataset().GlobalParameter().CurrentDate() );
        nr_open_activity      := counter( object, AssignedActivity, aa, aa.Workflow().IsActive() and aa.Status() = SWF_ActivityBase::STATUS_Executable() );
        str_open_activity     := SWF_WorkflowDataset::GIU_ProcessDashboard_FormatActiveActivities( nr_open_activity );
          
        surface.Font( mediumfont );
        surface.Text( leftmargin, 55, user_and_date );
        surface.Text( leftmargin, 85, str_open_activity );
      }
    *]
  }
}