Microsoft Dynamics NAV (Archived)

How to convert Time into decimal?

(0) Share

Report

Posted on by Mahesh U

433

Hi all,

i need to convert a time into decimal. How to achieve this?

Ex:- 1:34:00AM(Time variable) Need to convert as 1.34(Decimal).

Thanks in Advance.

Mahesh U.

*This post is locked for comments

I have the same question (0)

All responses (7)

Answers (1)

Suggested answer

Jens Glathe 6,092 on at

Like (0)

Report
RE: How to convert Time into decimal?

The "old" production AddOns did this kind of trick: They converted all times to decimal, with 1 hour = 3.600, 1 second = 0.001. I have used this for timezone-based calculations a long time ago. Like this:

DatetimeTZ(Date : Date;Time : Time;TimeZoneCode : Code[10]) : Decimal //Create DateTime(Decimal) in UTC with respect to the time zone shift IF (Date = 0D) THEN EXIT(0); L_TZDiff:=GetTZOffset(Date,Time,TimeZoneCode); IF Time = 0T THEN EXIT((Date-01010000D) * 86.400 - L_TZDiff*3.600) ELSE EXIT(((Date-01010000D) * 86.400) + (Time - 000000T)/1000000 - L_TZDiff*3.600);

The nice part regarding the decimals is that you can simply add and multiply these values, and also convert them back to a real date, even when you cross a date (duration crosses a date border).

Was this reply helpful? Yes No
Community Member on at

Like (1)

Report

RE: How to convert Time into decimal?

Do you mean 'decimal' to mean just replacing the colon with a period? Search and replace?

Or do you mean doing the math to convert 34 minutes out of a 60 minute hour to be equal to .57 of an hour, giving 1.57 in your example?

Do you also want to incorporate a 24 hour format to account for AM vs PM? 1.57 being different than 13.57 for 1:34PM?

Or do you want to convert 1.57 hours out of a 24 hour day giving you .06541666... of a day?

What are you attempting to accomplish with the conversion?

Was this reply helpful? Yes No
Suggested answer

keoma 32,729 on at

Like (0)

Report

RE: How to convert Time into decimal?

use following code:

// variables

timeVal Time

decVal Decimal

strVal Text

// the code

timeVal := 013400T;

strVal := COPYSTR(FORMAT(timeVal),1,5); // get first 5 digits incl. : seperator

strVal := CONVERTSTR(strVal,':',','); // replace : by , or . acc. to your regional setting.

EVALUATE(decVal,strVal); // convert to dec. value

MESSAGE(FORMAT(decVal));

Was this reply helpful? Yes No
Verified answer

4BzSoftware 6,073 on at

Like (0)

Report

RE: How to convert Time into decimal?

Hi Mahesh U,

EVALUATE(gDec_Value, FORMAT(gTim_Value, 0, '<Hours24,2><Minutes,2>'));

gDec_Value := gDec_Value / 100;

1 people found this reply helpful.

Was this reply helpful? Yes No
Suggested answer

Binesh 7,885 on at

Like (0)

Report

RE: How to convert Time into decimal?

Hi! Mahesh Use This Function or Code According to ur requirements.

LOCAL TimeToDecimal(TimeP : Time) Result : Decimal

TymStr := FORMAT(TimeP);

MESSAGE(TymStr);

TymStr := DELSTR(TymStr,(STRLEN(TymStr)-1),2);

MESSAGE(TymStr);

TymStr := DELCHR(TymStr,'=',':');

MESSAGE(TymStr);

EVALUATE(Result,TymStr);

MESSAGE(FORMAT(Result));

//Where as

//TymStr is a Text Local Variable

Was this reply helpful? Yes No
Suggested answer

Miguel Llorca Gómez 7,019 User Group Leader on at

Like (0)

Report

RE: How to convert Time into decimal?

msdn.microsoft.com/.../dd338899.aspx

Was this reply helpful? Yes No
Mahesh U 433 on at

Like (0)

Report

RE: How to convert Time into decimal?

Can any one suggest me how to achieve this?

Was this reply helpful? Yes No