AX 2009 时间类型函数操作

以下Job包括绝大部分AX 2009的时间操作

View Code

static void DateTest(Args _args)
{
Integer time, lTime;
Integer l;
utcDateTime dt;
;

info(strfmt("utcNow : %1", DateTimeUtil::utcNow()));

time = DateTimeUtil::time(DateTimeUtil::applyTimeZoneOffset(DateTimeUtil::utcNow(), DateTimeUtil::getUserPreferredTimeZone()));

info(strfmt("%1", time));

info(strfmt("%1", time/3600));

lTime = DateTimeUtil::time(DateTimeUtil::applyTimeZoneOffset(DateTimeUtil::utcNow(), DateTimeUtil::getUserPreferredTimeZone()));

l = lTime - time;

info(strfmt("%1", l));

info(date2str(today(),321,2,3,2,3,4));

dt = DateTimeUtil::applyTimeZoneOffset(DateTimeUtil::utcNow(), DateTimeUtil::getUserPreferredTimeZone());

info(DateTime2str(dt, 4));

//dt = DateTimeUtil::applyTimeZoneOffset(DateTimeUtil::utcNow(), DateTimeUtil::getUserPreferredTimeZone());

dt = DatetimeUtil::removeTimeZoneOffset(DateTimeUtil::utcNow(),datetimeutil::getCompanyTimeZone());

info(strfmt("%1 remove time zone : %2", DateTimeUtil::utcNow(), DateTime2str(dt, 4)));

info(strfmt("%1", DateTimeUtil::newDateTime(str2date("2010/11/24", 321), 1)));

info(DateTime2str(dt, 4));

info(strfmt("Date to DateTime : %1", DateTimeUtil::newDateTime(today(), 1)));

info(strfmt("Min DateTime : %1", DateTimeUtil::minValue()));

info(strfmt("Max DateTime : %1", DateTimeUtil::maxValue()));

info(strfmt("Get Date from DateTime : %1", DateTimeUtil::date(DateTimeUtil::utcNow())));

info(strfmt("previous qtr = %1", prevqtr(today())));

info(strfmt("previous week = %1", (today() - 6)));

info(strfmt("new date time = %1", DateTimeUtil::newDateTime(today(), str2time("00:00:00"))));

info(strfmt("next month = %1, date start next month = %2", nextMth(today()), DateStartMth(NextMth(today()))));
}