单位取数问题

renhao

2023-09-25 16d75807e01a336adb18e4a6888eb8e7aa7948ee

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
Quintiq file version 2.0
#parent: #root
Response OnCreated () id:Response_FrmAuthorizeAndCountersign_Material_OnCreated
{
  #keys: '[414724.0.113356318]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebComponent_OnCreated'
  Precondition:
  [*
    return not isnull( MacroPlan);
  *]
  QuillAction
  {
    Body:
    [*
      // 获取选择后的SKU
      SelectItem := select( MacroPlan,H_MessagePassing,Obj,Obj.FKey()="FrmMaterial" and Obj.ItemKey()="ListSelect");
      if(not isnull( SelectItem))
      {
        if(SelectItem.Value().Length()>0)
        {
          StrValue := SelectItem.Value().Tokenize( ";");
          lb_SUK_FAACM.Text(StrValue.Element( 0));
          lb_MaterialCode_FAACM.Text(StrValue.Element( 1));
          lb_Unit_FAACM.Text(StrValue.Element( 2));
          lb_Operator_FAACM.Text(ApplicationMacroPlanner.GetUserName());
        }
      }
      // 获取选择后的SKU
      SelectItem := select( MacroPlan,H_MessagePassing,Obj,Obj.FKey()="FrmOrderForecast" and Obj.ItemKey()="ListSelect");
      if(not isnull( SelectItem) and SelectItem.Value().Length()>0)
      {
        StrValue := SelectItem.Value().Tokenize( ";");
        txt_CustomID_FAACM.Text(StrValue.Element( 2));
        txt_CustomName_FAACM.Text(StrValue.Element( 3));
      }
    *]
    GroupServerCalls: false
  }
}