| | |
| | | newfilter := ""; |
| | | findcount := 0; |
| | | traverse( existfilterlist, Elements, filter ){ |
| | | if( filter.FindString( "EndDate()", 0 ) >= 0 ){ |
| | | if( filter.FindString( "StartDate()", 0 ) >= 0 ){ |
| | | if( newfilter = "" ){ |
| | | newfilter := "( object.EndDate() = " + this.Date().AsQUILL() + " )"; |
| | | newfilter := "( object.StartDate() = " + this.Date().AsQUILL() + " )"; |
| | | }else{ |
| | | newfilter := newfilter + " and " + "( object.EndDate() = " + this.Date().AsQUILL() + " )"; |
| | | newfilter := newfilter + " and " + "( object.StartDate() = " + this.Date().AsQUILL() + " )"; |
| | | } |
| | | findcount := 1; |
| | | }else{ |
| | |
| | | |
| | | if( findcount = 0 ){ |
| | | if( newfilter = "" ){ |
| | | newfilter := "( object.EndDate() = " + this.Date().AsQUILL() + " )"; |
| | | newfilter := "( object.StartDate() = " + this.Date().AsQUILL() + " )"; |
| | | }else{ |
| | | newfilter := newfilter + " and " + "( object.EndDate() = " + this.Date().AsQUILL() + " )"; |
| | | newfilter := newfilter + " and " + "( object.StartDate() = " + this.Date().AsQUILL() + " )"; |
| | | } |
| | | } |
| | | |