Quintiq file version 2.0
#parent: PanelOrderLockHeader_545/DateSelectorOrderLockHeaderCustomerOrder
Response OnChanged () id:Response_PanelOrderLockHeader_545_DateSelectorOrderLockHeaderCustomerOrder_OnChanged
{
  #keys: '[412960.0.221842202]'
  CanBindMultiple: false
  DefinitionID: 'Responsedef_WebDateTimeFieldBase_OnChanged'
  GroupServerCalls: true
  QuillAction
  {
    Body:
    [*
      existfilter := DataExtractorOrderLock.FixedFilter();
      if( existfilter = "true" ){
        existfilter := "";
        }
      existfilterlist := existfilter.Tokenize( " and " );
      
      newfilter := "";
      findcount := 0;
      traverse( existfilterlist, Elements, filter ){
        if( filter.FindString( "StartDate()", 0 ) >= 0 ){
          if( newfilter = "" ){
            newfilter := "( object.StartDate() = " + this.Date().AsQUILL() + " )";
            }else{
              newfilter := newfilter + " and " + "( object.StartDate() = " + this.Date().AsQUILL() + " )";
              }
          findcount := 1;
          }else{
            if( newfilter = "" ){
              newfilter := filter;
              }else{
                newfilter := newfilter + " and " + filter;
                }
            }
        }
      
      if( findcount = 0 ){
        if( newfilter = "" ){
          newfilter := "( object.StartDate() = " + this.Date().AsQUILL() + " )";
          }else{
            newfilter := newfilter + " and " + "( object.StartDate() = " + this.Date().AsQUILL() + " )";
            }
        }
      
      info( newfilter );
      
      DataExtractorOrderLock.FixedFilter( newfilter );
    *]
  }
}