hongji.li
2023-11-11 df5a7e1ad6835e78b2f9eb7428817b0c23b116bc
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
49
50
51
52
53
54
55
56
57
58
Quintiq file version 2.0
#parent: PanelOrderLockHeader_545/ButtonOrderLockHeader
Response OnClick () id:Response_PanelOrderLockHeader_545_ButtonOrderLockHeader_OnClick
{
  #keys: '[412960.0.221841965]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebButton_OnClick'
  GroupServerCalls: true
  QuillAction
  {
    Body:
    [*
      thisfilter := "( object.OrderID().LikeUserLocale( " + EditFieldOrderLockHeader.Text().AsQUILL() + " )"  
      + " or " + "object.ProductID().LikeUserLocale( " + EditFieldOrderLockHeader.Text().AsQUILL() + " )"  
      + " or " + "object.UnitOfMeasureName().LikeUserLocale( " + EditFieldOrderLockHeader.Text().AsQUILL() + " )" 
      + " or " + "object.StockingPointID().LikeUserLocale( " + EditFieldOrderLockHeader.Text().AsQUILL() + " )" 
      + " or " + "object.CustomerName().LikeUserLocale( " + EditFieldOrderLockHeader.Text().AsQUILL() + " )" 
      + " or " + "object.SalesSegmentName().LikeUserLocale( " + EditFieldOrderLockHeader.Text().AsQUILL() + " ) )" ;
      
      existfilter := DataExtractorOrderLock.FixedFilter();
      if( existfilter = "true" ){
        existfilter := "";
        }
      existfilterlist := existfilter.Tokenize( " and " );
      
      newfilter := "";
      findcount := 0;
      traverse( existfilterlist, Elements, filter ){
        if( filter.FindString( "OrderID()", 0 ) >= 0 ){
          if( newfilter = "" ){
            newfilter := thisfilter;
            }else{
              newfilter := newfilter + " and " + thisfilter;
              }
          findcount := 1;
          }else{
            if( newfilter = "" ){
              newfilter := filter;
              }else{
                newfilter := newfilter + " and " + filter;
                }
            }
        }
      
      if( findcount = 0 ){
        if( newfilter = "" ){
          newfilter := thisfilter;
          }else{
            newfilter := newfilter + " and " + thisfilter;
            }
        }
      
      info( newfilter );
      
      DataExtractorOrderLock.FixedFilter( newfilter );
    *]
  }
}