How to find one week& one month transactions  in ax 2012

I want to find out last one week transactions in InventTrans form.

Override the executeQuery() in form data source.

public void executeQuery()

{

    date  fromdate = today()-7;

    date todate = today();

   this.query().dataSourceTable(tablenum(InventTrans)).addRange(fieldnum(InventTrans,DatePhysical)).value(queryRange(fromdate,todate));

}

I want to find out last one month transactions in CustTrans form

Override the executeQuery() in form data source.

public void executeQuery()

{

        TransDate TransDate = today();
    TransDate PresentMnth,PrevMnth;
   PresentMnth = mkdate(dayOfMth(today()),mthofyr(TransDate),year(TransDate));
     PrevMnth    = mkDate(dayOfMth(today()),mthOfYr(TransDate)-1,year(TransDate));

//In order to get 2012 transactions we have to change this as
 //PresentMnth = mkdate(dayOfMth(today()),mthofyr(TransDate),year(TransDate)-3);
    // PrevMnth    = mkDate(dayOfMth(today()),mthOfYr(TransDate)-1,year(TransDate)-3);
     THIS.QUERY().DATASOURCETABLE(TABLENUM(CustTrans)).ADDRANGE(FIELDNUM(CustTrans,TransDate)).VALUE(QUERYRANGE(PrevMnth,PresentMnth));

}