if empty(Startdate) startdate={01-01-1800} endif if empty(enddate) enddate={01-01-2500} endif>Hi all,
> >local lcSql,lcWhere > >lcSql = "" >lcWhere = "" > >lcSql = " select * from client " > >Local lcTxtDueDate,lcTxtDelDate > >lcTxtDueDate = "DueDate>='[StartDate]' And DueDate<='[EndDate]'" >lcTxtDueDate= Strtran( lcTxtDueDate, "[StartDate]", Dtoc(date()) >lcTxtDueDate= Strtran( lcTxtDueDate, "[EndDate]", Dtoc(date()) > >lcTxtDelDate = "DeliveryDate>='[StartDate]' And DeliveryDate<='[EndDate]'" >lcTxtDelDate= Strtran( lcTxtDelDate, "[StartDate]", Dtoc(date()) >lcTxtDelDate= Strtran( lcTxtDelDate, "[EndDate]", Dtoc(date()) > >lcWhere = " where " + lcTxtDueDate + " and " + lcTxtDelDate > >lcSql = lcSql + lcWhere > >