Converting number to HH:MM 1

[acessn]

Using cr9.0

I use this formula to convert a number to hh:mm

NumberVar nbrTime := {@number};
NumberVar nbrHour := Truncate(nbrTime);
NumberVar nbrHold := (nbrTime-nbrHour)*100;
nbrHold := (60*nbrHold)/100;
NumberVar nbrMinute := Truncate(nbrHold);

ToText(nbrHour,0,"") + ":" + ToText(nbrMinute,0,"") + ":"

The problem is that when number is i.e. 65, it displays 65:0 instead of 65:00. It works fine with 65.5 which is displayed 65:30.

Does anyone know how to fix this?

Regards,
Bjorn

 

[IanWaterman]

Try

If nbrMinute = 0 then
ToText(nbrHour,0,"") + ":" + "00" + ":" else
ToText(nbrHour,0,"") + ":" + ToText(nbrMinute,0,"") + ":"

Ian

 

[vxxv]

Hi Bjorn,

I think the right approach is:

ToText(nbrHour,"00") + ":" + ToText(nbrMinute,"00")

You don't have to verify the nbrMinute variable.

Regards
vxxv