This function combines two simple decimal time calculations with a switch to select formats. Very handy for anyone that bills for their time.
DecimalTime (theTime;format)
Case (
format = "Minutes" ;
Div ( theTime ; 60 ) + ( Mod ( theTime ; 60 ) / 60 ) ;
format = "Hours" ;
Div ( theTime ; 3600 ) + (Mod ( theTime ; 3600 ) / 3600 )
) // end case