trc存档优化

lihongji

2024-11-22 2edaa39542c551f68522dab8680e8b750176ee5d

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
Quintiq file version 2.0
#parent: #root
Method New (
  internal[GUIComponent] parent,
  SWF_StepDefinition parentdefinition
) id:Method_SWF_DialogCreateEditStepDefinition_New
{
  #keys: '[113694.2.1096563628]'
  Body:
  [*
    // Create new step definitions
    data := null( SWF_StepDefinition );
    Dialog.Data( data );
    
    SelectionParent.Data( parentdefinition );
    CheckBoxParent.Checked( not isnull( parentdefinition ) );
    
    result := this.DoModal( parent );
    
    if( result > 0 )
    {
      selected_authorization := SWF_AuthorizationBase::GetSelectedAuthorizationFromStringSelections( SWF_WorkflowDataset,
                                                                                                     SWF_StringSelectionManagedBy.BoundValue(),
                                                                                                     SWF_StringSelectionManagedBy.SelectedElement() );
      service := SWF_WorkflowDataset.Service();
      service.TR_CreateUpdateStepDefinition(  Key::ZeroKey(), // SWF_WorkflowDataset.GetNewGlobalID(),
                                              EditorName.Text(),
                                              SWF_WorkflowDataset::FormatStringToNumber( EditorDueoffset.Text() ),
                                              StringSelectionIcon.BoundValue(),
                                              guard( SelectionParent.Data().ID(), Key::ZeroKey() ),
                                              guard( selected_authorization.DisplayName(), '' )
                                            );
    }
  *]
}