Default Currency  :

//AX 2009 

//Datasource   field name 

Cctrans.transcurrencycode = companyInfo::find().currencycode;

AX 2012 

Cctrans.transcurrencycode = companyInfo::standardcurrency();

                           Default  today  date: 

  Cctrans.transdata= today