chenqinghong
2024-05-07 3ec06a830367465068963156dcc1d8e522571c13
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: #root
Method New (
  internal[GUIComponent] parent,
  SWF_Step step
) id:Method_SWF_DialogCreateEditActivity_New
{
  #keys: '[113694.2.1190086118]'
  Body:
  [*
    // Create new activity
    currentdate := SWF_WorkflowDataset.GlobalParameter().CurrentDate();
    
    data := SWF_WorkflowDataset.WorkflowDefinition().ActiveWorkflow().Element( relshadow, 
                                                                               SWF_Activity,
                                                                               ParentStep := step,
                                                                               DueDateManual := currentdate,
                                                                               HasParentStep := not isnull( step ) );                                                                           
    Dialog.Data( data );
    
    SelectionParent.Enabled( not isnull( step ) );
    
    result := this.DoModal( parent );
    
    if( result > 0 )
    {
      selected_authorization := SWF_AuthorizationBase::GetSelectedAuthorizationFromStringSelections( SWF_WorkflowDataset,
                                                                                                     SWF_StringSelectionManagedBy.BoundValue(),
                                                                                                     SWF_StringSelectionManagedBy.SelectedElement() );
      //Auto set created time and created user name
      description :=SWF_Translation::TRANSLATE_NewActivityCreatedBy( DateTime::Now(), SWF_WorkflowDataset.GetCurrentUser().Name() ) + String::NewLine() + data.Description();                                                                                                
      service := SWF_WorkflowDataset.Service();
      service.TR_CreateUpdateActivity(  Key::ZeroKey(), //SWF_WorkflowDataset.GetNewGlobalID(),
                                        data.Name(),
                                        description,
                                        true, // user-created activities can still be linked to a step for the progress KPIs, but the status of the activity never depend on the step dependencies.
                                        true,
                                        data.DueDateManual(),
                                        currentdate,
                                        SWF_WorkflowDataset.GetCurrentUserID(),
                                        guard( selected_authorization.DisplayName(), '' ),
                                        guard( data.ParentStep().ID(), Key::ZeroKey() ),
                                        data.ViewLink(),
                                        guard( data.ViewLinkWeb(), '' ) );                            
    Dialog.ShowInfoMessage();
    }
  *]
}